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Introducción 





Este libro es una continuación a la Guía del usuario del CP/M Osborne de 
Thom Hogan. Es un libro técnico escrito principalmente para programado- 
res que necesitan un conocimiento profundo de la estructura interna del 
CP/M —cómo trabajan las distintas piezas del CP/M, cómo utilizar CP/M 
como sistema operativo y, finalmente, cómo implementar el CP/M en 
diferentes computadoras—. Este libro está dedicado a aquellos que 


e han trabajado con microcomputadoras que funcionan con el sistema 
operativo CP/M de Digital Research; 

e comprenden las interioridades del mundo de los microprocesadores 
—bits, bytes, puertos, RAM, ROM y toda la jerga de los programa- 
dores: 


e saben escribir en lenguaje ensamblador para los chips, unidad central 
de procesamiento, Intel 8080 o Zilog Z80. 


Si el lector no posee este tipo de conocimientos básicos, deberá 
comenzar adquiriendo experiencia práctica en un sistema que funcione con 
CP/M y leyendo los siguientes libros de Osborne/McGraw-Hill: 
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e Introducción a los microcomputadores: Volumen 1. Conceptos básicos 
Este libro describe los conceptos fundamentales y los aspectos de los 
mismos que es necesario conocer acerca de los microprocesadores 
para programarlos. Si se carece realmente de conocimientos elemen- 
tales, puede utilizarse el volumen 0 titulado El libro del principiante. 


e Programación en el lenguaje ensamblador 80804/8085 
Este libro cubre todos los aspectos de la escritura de programas en 
lenguaje ensamblador del 8080, presentando múltiples ejemplos. 


e Guía del usuario de CP/M de Osborne 
Este libro introduce el sistema operativo CP/M. Enseña a utilizar éste 
como herramienta para obtener datos determinados en una computa- 
dora. 


El libro que ahora presentamos se ocupa únicamente de la versión 2.2 de 
CP/M para los chips 8080 o Z80. Durante su período de redacción han 
aparecido nuevas versiones de CP/M y de MP/M (el sucesor multiusuario y 
multitarea de CP/M). Han aparecido el CP/M-86 y el MP/M-86 para el chip 
Intel 8086 y el MP/M-II para los chips 8080 o Z80, con CP/M 3.0 (8080 o 
Z80) en los talones. El 8086, aunque relacionado estructuralmente con el 
8080, difiere de éste lo suficiente como para hacer imposible el detallarlo en 
este libro; y aunque MP/M-II y MP/M-86 son similares a CP/M, presentan 
múltiples aspectos que no se adaptan a la finalidad de este libro. 





Descripción del contenido 











Este libro aborda los temas desde el vértice superior de la pirámide, 
aportando sucesivas capas sobre la misma relacionadas con el mismo 
material, pero proporcionando más detalles. 

El primer capítulo incluye una breve descripción de la notación utilizada 
en este libro para los programas ejemplo escritos en lenguaje ensamblador 
de Intel 8080 y en el lenguaje de programación C. 

El capítulo 2 está dedicado a la estructura del CP/M, describiendo sus 
partes principales, sus posiciones en memoria y sus funciones. 

El capitulo 3 se ocupa del sistema de ficheros del CP/M, con el máximo 
detalle posible, dada su naturaleza. Se describen la entrada al directorio, el 
bloque de parámetros del disco y la organización de ficheros. 

El capítulo 4 está dedicado al procesador de órdenes de consola 
—Console Commands Processor (CCP)—, examinando la forma de intro- 
ducir líneas de órdenes, las órdenes de CP/M construidas en el CCP, la 
forma en que el CCP carga los programas y cómo transfiere el control a 
estos programas. 
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En el capítulo 5 comienza la sección de programación. Maneja las 
llamadas del sistema que los programas pueden hacer a la parte de alto 
nivel de CP/M, el sistema operativo básico de disco (Basic Disk Operating 
System, BDOS). 

Los capitulos 6 al 10 se refieren al sistema básico de entrada/salida 
(BIOS). Esta es la parte de CP/M que es distinta en cada computadora. Es 
la parte que el programador escribirá e implementará para su propia 
computadora. 

El capítulo 6 describe una implementación estándar del BIOS. 

El capítulo 7 describe el mecanismo de reinstalación de CP/M para una 
configuración distinta. 

El capítulo 8 muestra la forma de escribir un BIOS mejorado. 

El capítulo 9 contempla detenidamente la forma de manejar los errores 
de hardware —cómo detectarlos y corregirlos, haciendo esta tarea más 
sencilla para la persona que utiliza la computadora. 

El capítulo 10 aborda los problemas que pueden presentarse cuando se 
desarrolla un código BIOS propio. Incluye subrutinas para dicho desarrollo 
y describe técnicas para ahorrar tiempo y preocupaciones. 

El capítulo 11 describe programas de utilidad, algunos de los cuales 
funcionan con las características del BIOS mejorado del capítulo 3 y otros 
que pueden trabajar con todas las implementaciones del CP/M 2. 

El capítulo 12 se refiere a mensajes de error y a algunas particularidades 
que se descubrirán, a veces con grandes esfuerzos, en el CP/M. Se explican 
los mensajes y se documentan algunas de las probables causas que provocan 
resultados extraños. 

Los apéndices contienen información práctica, así como resúmenes de 
informaciones que pueden necesitarse para diseñar, codificar y comprobar 
programas que funcionen en CP/M o en sus rutinas BIOS propias. 








Notación 





Al programar una computadora, el programador estará sentado ante el 
terminal dialogando con CP/M y con los programas de utilidad que 
funcionan supeditados a éste. Las secciones que siguen describen la 
notación utilizada para representar el diálogo que aparece en el terminal y 
la salida que aparece en la impresora. 


Diálogo de consola 


Este libro sigue los convenios utilizados en la Guía del usuario del CP/M 
Osborne, ampliados ligeramente para manejar diálogos más complejos. En 
este libro 
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e <nombre> significa el carácter ASCII nombrado entre los corchetes 
angulares, < y >. Por ejemplo, <BEL> es el carácter ASCII timbre 
o campana (bell) y <HT> es el carácter ASCII d2 tabulación 
horizontal (Horizontal Tab). (Véase el apéndice A para el conjunto 
completo de caracteres ASCII.) 

e <cr> significa presionar (pulsar) la tecla de RETORNO DE CARRO 
(CARRIAGE RETURN). 


e 123 0 un número sin sufijo significa un número decimal. 
e 100B o cualquier número seguido de B significa un número binario. 
e VASH o un número cualquiera seguido de H significa un número 


hexadecimal. Un número hexadecimal que comienza por una letra irá 
normalmente precedido de un 0 para evitar confusiones. 


e *x significa mantener oprimida la tecla de control (CTRL) mientras se 
pulsa la tecla x. 

e Los subrayados indican entradas escritas sobre el teclado. La salida de 
la computadora se muestra sin subrayar. 





Ejemplos de programas en lenguaje ensamblador 


Este libro utiliza los nemotécnicos del Intel 8080 desde el principio hasta 
el fin como un “minimo común denominador” —la CPU Z80 contiene 
particularidades de las que carece el 8080, pero no a la inversa—. La salida 
del ensamblador ASM de Digital Research se muestra de tal forma que 
pueda verse el código objeto generado, así como el fuente. 


Ejemplos en lenguaje de alto nivel 


Los programas de utilidad descritos en el capitulo 11 están escritos en C, 
un lenguaje de programación que se presta especialmente a la descripción 
clara de algoritmos sin perderse en burocracias lingúísticas. Se han evitado 
expresiones rebuscadas en favor de aquellas que muestran de la forma más 
clara posible cómo resolver el problema. Se comenta ampliamente el 
código. 

Un libro excelente para aquellos que no saben programar en C es El 
lenguaje C de programación de Brian Kernighan y Dennis Ritchie (Prentice- 
Hall). El apéndice A de este libro es el manual de referencia C. 








Ejemplos de programas en disquete 





Los ejemplos de programas de este libro han sido ensamblados con 
ASM y comprobados con DDT (Digital Research's Dynamic Debugging 
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Tool), la herramienta de depuración dinámica de Digital Research. Los 
ejemplos en C se compilaron utilizando el compilador C BDS de Leor 
Zolman (versión 1.50) y comprobados utilizando el BIOS mejorado del 
capítulo 8. 

Todo lo que se presenta en este libro en código fuente está disponible en 
un disquete de 8 pulgadas de una sola cara y simple densidad (formato IBM 
3740). Para solicitar este disquete. pueden llamar o escribir a 


Johnson-Laird, Inc. 
Attn: The CP/M Programmer's Handbook Diskette 
6441 SW Canyon Court 
Portland, OR 97221 
Tel: (503) 292-6330 


El disquete se vende al precio de 50 dólares más gastos de envío. 





El CP/M de Digital Research 

Las piezas del CP/M 
Formato del disquete CP/M 
Carga del CP/M 
Procesador de órdenes de consola (CCP) 
Sistema operativo básico de disco 

(BDOS) 

Sistema básico de entrada/salida (BIOS) 
Interacciones del CCP, BDOS y BIOS 


La estructura 
del CP/M 





Este capitulo introduce las piezas que componen CP/M —cómo son y 
cómo trabajan—. Esta visión general del CP/M establecerá un armazón 
previo a los capítulos posteriores, que añadirán información más detallada. 

Puede haberse adquirido la versión estándar de CP/M directamente de 
Digital Research, pero probablemente se ha adquirido el CP/M al comprar 
el sistema microprocesador o su sistema de discos. O puede haberse 
adquirido CP/M sólo de un distribuidor de software. En cualquier caso, este 
distribuidor o la compañía que fabrica el sistema o el disco ya habrá 
modificado la versión estándar de CP/M adaptándola para que trabaje en 
su hardware particular. La mayor parte de las versiones de CP/M que se 
encuentran en el mercado tienen más ficheros en su sistema de disquetes 
que los que se describen aquí como versión estándar de Digital Research. 

Algunos fabricantes han reescrito toda la documentación, por lo que el 
comprador no recibe todos los manuales CP/M de Digital Research. Si este 
es el caso, habrán de solicitarse estos manuales a Digital Research, porque 
el programador los necesita como referencia. 
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El CP/M de Digital Research 








Digital Research proporciona una versión estándar del CP/M “con 
sabor a vainilla”, que funciona sólo en el sistema de desarrollo de las 
microcomputadoras Intel (MDS). El paquete de programas CP/M de 
Digital Research contiene siete manuales y un disquete estándar de 8 
pulgadas, de una sola cara y simple densidad, formato IBM 3740. 

Con este sistema CP/M van los siguientes manuales: 


e Una introducción a las particularidades y habilidades del CP/M. Se 
trata de una breve descripción de CP/M y de los programas de 
utilidad que se encuentran en el disquete. Describe únicamente la 
versión 1.4 de CP/M. 


e Guía del usuario del CP/M 2.0. Digital Research escribió este manual 
para describir las nuevas características del CP/M 2.0 y las extensio- 
nes realizadas al CP/M 1.4. 


e ED: Un editor de texto para el sistema CP/M de disco. Frente a los 
productos estándar actuales, ED es un editor de líneas primitivo, pero 
puede utilizarse también para realizar cambios en los ficheros que 
contienen texto ASCIT, tales como el código de fuente del BIOS. 


e Ensamblador del CP/M (ASM). ASM es un ensamblador sencillo 
pero rápido que puede utilizarse para traducir el código fuente BIOS 
del disquete al código máquina. Como quiera que el ASM es 
simplemente un ensamblador en esqueleto, muchos programadores 
utilizan actualmente su sucesor, el MAC (también de Digital 
Research). 


e La herramienta de depuración dinámica del CP/M —Dinamic Debug- 
ging Tool (DDT)—. El DDT es un programa extremadamente útil 
que permite cargar programas en formato de código máquina y 
comprobarlos a continuación, ejecutando el programa bien una 
instrucción máquina cada vez o bien deteniéndose sólo cuando la 
CPU alcanza un punto específico en el programa. 


e Guía de alteraciones del CP/M. Existen dos manuales con este título, 
uno de la versión 1.4 del CP/M y otro para la 2.0. Ambos manuales 
describen, en forma codificada, cómo modificar el CP/M. 


e Guía de interfases del CP/M. Existen también dos versiones, para el 
1.4 y el 2.0. Estos manuales indican cómo escribir programas que 
comuniquen directamente con el CP/M. 


El disquete que suministra Digital Research posee los ficheros si- 
guientes: 
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ASM.COM 
El ensamblador del CP/M. 


BIOS.ASM 
Un fichero en código fuente que contiene una muestra de BIOS para 
el sistema de desarrollo de micros Intel (MDS). A menos que se 
posea el MDS, este fichero sólo es útil como ejemplo de BIOS. 


CBIOS.ASM 
Otro fichero en código fuente para BIOS. Este es tipo armazón: 
existen espacios de forma que se puedan insertar códigos para cada 
computadora particular. 


DDT.COM 
El programa herramienta de depuración dinámica. 


DEBLOCK.ASM 
Un fichero en código fuente que puede tenerse necesidad de utilizar 
en el BIOS en el caso de que la computadora utilice tamaños de 
sector distintos de 128 bytes. Es un ejemplo de cómo bloquear y 
desbloquear sectores de 128 bytes al tamaño de sector deseado o 
viceversa. 


DISKDEF.LIB 


Una biblioteca de textos fuente a utilizar cuando se tiene una copia 
del ensamblador avanzado MAC, de Digital Research. 


DUMP.ASM 
La fuente para un programa ejemplo. El DUMP lee un fichero 
CP/M en disco y lo presenta en forma hexadecimal en la consola. 


DUMP.COM 
El programa práctico ejecutable derivado del DUMP.ASM. 


ED.COM 
El editor de ficheros fuente. 


LOAD.COM 
Un programa que toma el fichero de salida del ensamblador, ASM, 
en código máquina y crea otro fichero con los datos reordenados de 
tal forma que se pueda ejecutar el programa únicamente mecanogra- 
fiando su nombre en el teclado. 


MOVCPM.COM 
Un programa que crea versiones de CP/M para diferentes tamaños 
de memoria. 


PIP.COM 
Un programa para copiar información de un lugar a otro (PIP es la 
abreviatura de Peripheral Interchange Program). 
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STAT.COM 
Un programa que muestra estadísticas sobre el CP/M y otras 
informaciones que se hayan almacenado en discos. 

SUBMIT.COM 
Un programa que se utiliza para entrar automáticamente órdenes 
CP/M. Ayuda a evitar el mecanografiado de secuencias de órdenes 
largas. 

SYSGEN.COM 
Un programa que escribe CP/M en disquetes. 

XSUB.COM 
Una versión extendida del programa SUBMIT. Los ficheros mencio- 
nados previamente se dividen en dos grupos: uno se utiliza única- 
mente para reconstruir el CP/M, mientras que el otro conjunto está 
formado por herramientas de programación de propósito general. 








Las piezas del CP/M 





El CP/M está formado por el sistema operativo básico de disco (BDOS), 
el procesador de órdenes de consola (CCP) y el sistema básico de entrada/ 
salida (BIOS). 

Ocasionalmente se presentan en los manuales del CP/M referencias a 
algo denominado FDOS, que significa “sistema operativo de disco flexi- 
ble”. Se da este nombre a la porción del CP/M formada por el BDOS y el 
BIOS y es una reliquia que ha permanecido desde la versión original. Como 
quiera que casi nunca es necesario referirse al BDOS y al BIOS combinados 
como una entidad única, no se aludirá más en este libro al FDOS. 

El BDOS y el CCP son las partes características de CP/M. A menos que 
se desee pagar varios miles de dólares, no se puede obtener el código fuente 
de las mismas. Tampoco es necesario. El CP/M está diseñado de tal forma 
que todo lo referente al código que varía de una máquina a otra está 
contenido en el BIOS, y el programa de fuente del BIOS se obtiene en 
Digital Research. Algunas compañías construyen BIOS's especializados 
para diferentes computadoras. En muchos casos, al igual que algunos 
fabricantes de hardware CP/M, no está disponible el código fuente para sus 
BIOS; han empleado tiempo y trabajo en la construcción de estos BIOS, y 
desean preservar la naturaleza peculiar que le han dado. 

A veces hay que construir una configuración especial del CP/M para una 
computadora determinada. Para ello no son necesarios más que los cuatro 
pasos siguientes: 


1. Obtener una versión del BDOS y del CCP para el tamaño de 
memoria de la computadora que se utilice. 
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2. Escribir una versión modificada del BIOS, de acuerdo con el 
hardware de la computadora en cuestión. 


3. Escribir un pequeño programa para cargar el CP/M en la memoria al 
presionar el botón de RESET de la computadora. 


4. Ensamblar todas las piezas juntas y escribirlas en el disquete. 


Estos pasos se explican en los capítulos 7, 8 y 9. 

En el tercer paso se escribe un pequeño programa que carga el CP/M en 
la memoria al presionar el botón RESET de la computadora. Este programa 
se denomina normalmente cargador “de cordón de bota”. También se 
llama a veces la “bota” o bien el cargador de arranque en frio. La 
denominación de “cordón de bota” surge de la idea de que al conectar una 
computadora por primera vez no hay ningún programa a realizar. La tarea 
de obtener este primer programa en la computadora es tan complicada 
conceptualmente como la de intentar levantarse a sí mismo del suelo 
tirando de los cordones de las propias botas. En los primeros tiempos de las 
computadoras esta operación se realizaba mediante la introducción manual 
de instrucciones posicionando gran cantidad de conmutadores (la computa- 
dora que estaba construida para leer los conmutadores apenas se conecta- 
ba). Hoy en día, las microcomputadoras contienen algunos fragmentos 
pequeños de programa en memoria “no volátil” de sólo lectura —memoria 
que retiene datos aun cuando la computadora se desconecta—. Este 
programa almacenado, normalmente como un chip de memoria de sólo 
lectura programable (PROM), puede cargar el programa de arranque en 
frío, que a su vez carga el CP/M. 


Formato del disquete CP/M 


La versión estándar de CP/M está dispuesta en un disquete de 8 
pulgadas, de una sola cara. Los disquetes de otros tipos probablemente 
tienen distintas disposiciones; los discos duros son totalmente diferentes. 

El formato físico del disquete estándar de 8 pulgadas se muestra en la 
figura 2-1. El disquete tiene un total de 77 pistas concéntricas numeradas 
de 0 (la más exterior) a 76 (la más interna). Cada una de estas pistas está 
dividida radialmente en 26 sectores. Estos sectores fisicos están numerados 
del 1 al 26; el sector físico cero no existe. Cada sector tiene espacio 
suficiente para 128 bytes de datos. 

Incluso cuando el CP/M se implementa en un disco duro mayor con 
tamaños de sector mucho mayores, trabajar con sectores de 128 bytes. El 
BIOS posee instrucciones especiales que convierten los sectores reales en 
sectores de 128 bytes de estilo CP/M. 

Una nota final acerca del formato físico: el disquete de 8 pulgadas, 
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Agujero indice 
(señala Sector 1) 


Agujero central 


Pista 76 


Medio material 
del disquete 


Pista 0 





Sector 26 


Sector 1 











Figura 2-1. 


Disposición del disquete 


sectorizado por software, de una sola cara, simple densidad (formato IBM 
3740) es el único formato estándar. Todos los formatos restantes serán 
exclusivos de los fabricantes de hardware que los usen. Es impensable que 
se pueda leer un disquete en una computadora de un fabricante si ha sido 
escrito en otra, aunque su forma sea aparentemente la misma. Por ejemplo, 
disquete de una sola cara, de doble densidad, escrito en un sistema de 
desarrollo Intel no puede ser leído en una computadora de Digital 
Microsystems, aun cuando ambas usen formato de doble densidad. Si se 
desea cambiar datos de una computadora a otra, hay que usar disquetes de 
$ pulgadas, de una sola cara, con formato de simple densidad y entonces 
funcionará. 

Para ver cómo está almacenado el CP/M en un disquete, obsérvense las 
dos primeras pistas del mismo, que son la 0 y la 1. La figura 2-2 muestra 
cómo se almacenan los datos en estas pistas. 
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Figura 2-2, 


Disposición del CP/M en las pistas O y 1 del disquete. 


Carga del CP/M 


Los sucesos que ocurren después de conectar por primera vez la 
computadora y después de colocar el disquete en su unidad de disco son los 
mismos que los que ocurren al presionar el botón de RESET —la computa- 
dora genera una señal de RESET. 

El botón de RESET detiene a la unidad central de procesamiento (CPU). 
Todas las variables internas de la CPU se colocan en el estado inicial y 
todos los registros se ponen a cero. El contador de programa se pone 
también a cero de forma que cuando la señal de RESET desaparece 
(permanece únicamente durante algunas milésimas de segundo), la CPU 
comienza a ejecutar instrucciones en el lugar 0000H de la memoria. 

Los chips de memoria, al recibir por primera vez energía, no contienen 
ningún valor particular. Por consiguiente, los diseñadores de hardware 
hacen que algunas instrucciones iniciales sean forzadas en la memoria en el 
lugar 0000H y así sucesivamente. Aquí es donde parece que uno quiera 
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elevarse tirando de los cordones de las propias botas. ¿Cómo puede 
conseguirse que la computadora obedezca una instrucción determinada 
cuando no existe “nada” (con valor sensible) dentro de la máquina? 

Existen dos técnicas comunes para colocar las instrucciones en la 
memoria: 


De alimentación forzada (Force-feeding) 

En esta opción el diseñador de hardware supone que cuando se 
aplica la señal de RESET alguna parte del sistema de cálculo, 
típicamente el controlador de disco, puede enmascararse como 
memoria. Exactamente antes de que el CPU se desconecte, el 
controlador del disco asumirá el control de la computadora y 
copiará un pequeño programa en la memoria en el lugar 0000H y 
sucesivos. A partir de este momento se permite a la CPU empezar la 
ejecución de instrucciones en la posición O000H. El controlador del 
disco preserva las instrucciones incluso en caso de desconexión, 
porque éstas están almacenadas en firmware no volátil basado en 
PROM. Estas instrucciones hacen que el controlador del disco lea el 
primer sector de la primera lista del disquete del sistema en la 
memoria y entonces transfiere a ésta el control. 


ROM fantasma (Shadow ROM) 

Es una variación de la técnica de alimentación forzada. El fabricante 
del hardware dispone alguna ROM en el lugar 0000H. Existe 
también memoria normal de lectura/escritura en el lugar 0000H, 
pero ésta se encuentra desconectada electrónicamente cuando la 
señal de RESET se activa. La CPU, desconectado el lugar 0000H, 
empieza a ejecutar las instrucciones de la ROM. La primera 
operación que realiza el programa ROM es copiarse a sí mismo en la 
memoria de lectura/escritura en algún lugar conveniente situado más 
adelante en la memoria y transferir el control de la máquina a esta 
copia. En este momento puede conectarse la memoria real del lugar 
0000H, desconectarse la ROM y leerse el primer sector del disco. 





Con cualquiera de estas técnicas, el resultado es el mismo. El primer 
sector del disco se lee en la memoria y el control se transfiere a la primera 
instrucción contenida en el sector. 

El primer sector contiene el programa principal del cargador del CP/M. 
Este programa inicializa algunos aspectos del hardware y entonces lee en el 
resto de la pista O y en la mayoría de los sectores de la pista 1 (el número 
exacto depende de la longitud total del propio BIOS). El cargador del CP/M 
contendrá sólo una administración más primitiva de errores del disquete, 
intentando leer el disco una y otra vez si el hardware indica que tiene 
problemas al leer un sector. 





Capitulo 2: La estructura del CP/M 15 


El “cargador” carga el CP/M en el sitio correcto de la memoria; la 
dirección de carga es una constante del programa. Si se necesita construir 
una versión de CP/M que utilice más memoria, será necesario cambiar esta 
dirección de carga dentro del programa cargador, así como la dirección de 
salto para cuando se ha leído todo el CP/M. Esta dirección es también una 
constante del programa de carga. 

El cargador transfiere el control a la primera instrucción del BIOS, el 
punto de entrada en frío. “Frío” significa que la operación empieza “en 
frío” a partir de una computadora vacía. 

El código de carga en frío del BIOS pone a punto el hardware de la 
computadora. Es decir, programa los distintos chips que controlan la 
velocidad a la cual los puertos serie transmiten y reciben datos, inicializa los 
propios chips puerto-serie y, en general, prepara la computadora. Su acción 
final es transferir el control a la primera instrucción del BDOS con el fin de 
poner en marcha adecuadamente el CP/M. 

Una vez que el BDOS recibe el control, se inicializa a sí mismo, examina 
el directorio de ficheros del disquete del sistema y transfiere el control al 
CCP. Entonces el CCP hace salir inmediatamente “A>" en la consola y 
espera la entrada de una orden; CP/M está preparado entonces para realizar 
las órdenes que se le den. 

Al llegar a este punto, es recomendable repasar las partes de CP/M que 
están en memoria, comprobando cuáles son y qué funciones realizan. 

Esta comprobación se dirigirá en primer lugar a la memoria. La figu- 
ra 2-3 muestra las posiciones en la memoria del procesador de órdenes de 
consola, del sistema operativo básico de disco y del sistema básico de 
entrada/salida. 

Al tratar estos componentes principales de la memoria —el CCP, el 
BDOS y el BIOS— consideraremos los módulos que interaccionan con 
ellos, cómo se pasan los requerimientos de acción y las funciones que 
pueden realizar. 


Procesador de órdenes de consola 


Como puede verse en la figura 2-3, el CCP es la primera parte del CP/M 
que “sube” a través de las direcciones de memoria, lo que es significativo 
cuando se considera que el CCP sólo es necesario entre programas. Cuando 
CP/M está a la espera (idle), necesita el CCP para interaccionar con el 
operador, para aceptar la próxima orden. Una vez que el CP/M ha 
comenzado a ejecutar la orden, el CCP está de más, ya que cualquier 
interacción con la consola se realizará más bien a través del programa que 
se está llevando a cabo que por medio del CCP. El CCP lleva, por tanto, 
una existencia muy desigual en la memoria. Se carga cuando se pone en 
marcha por primera vez el CP/M. Cuando, por medio del CCP, se solicita al 
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Posiciones en 








hexadecimal 
FFFFH»| 
Sistema básico de entrada/salida 
(BIOS) 
FO A ====<2+ == ===> +-64640 
Sistema operativo básico 
en disco (BDOS) 
AAA + — —— 459008 
ESB Procesador de órdenes 
es de consola (CCP) sd 


L Memoria disponible para «Ll 
e programas > 


A + 256 
o0001=L__Atea reservada al CP/M 














Figura 2-3, 


Representación de la memoria con el CP/M cargado. 


CP/M que ejecute un programa, este programa puede escribirse sobre el 
CCP y utilizar la memoria ocupada por éste para sus propios fines. Cuando 
acaba el programa que se ha solicitado, el CP/M necesita volver a cargar el 
CCP, dispuesto para su interacción con el operador. Este proceso de recarga 
del CCP se conoce con el nombre de arranque en caliente. El arranque en 
caliente no es totalmente un “arranque en frio”, sino exactamente una 
recarga del CCP y no se tocan ni el BDOS ni el BIOS. 

¿Cómo comunica un programa al CP/M que ha terminado y que debe 
realizar un arranque en caliente? Saltando a la posición 0000H. En el 
momento en que el BIOS se inicializa a sí mismo durante la rutina de 
arranque en frío, coloca en la posición 0000H una instrucción de salto a la 
rutina de arranque en caliente, que está también en el BIOS. Una vez que la 
rutina de arranque del BIOS ha vuelto a cargar el CCP desde el disco, 
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transferirá el control al CCP. (Las rutinas de arranque en frío y en caliente 
se presentan más detalladas en el capítulo 6.) 

Esta breve descripción indica que todas las órdenes que se dan provocan 
que se cargue un programa, que se escriba quizá sobre el CCP, que se 
ejecute el programa en cuestión y que el CCP se recargue cuando el 
programa salte al punto 0000H al completar su tarea. Esto no es completa- 
mente cierto, algunas de las instrucciones que se necesitan frecuentemente 
se encuentran en el CCP. Utilizar una de estas órdenes significa que el 
CP/M no tiene que cargar nada del disquete; los programas están ya en la 
memoria como parte del CCP. Estas órdenes, conocidas como “intrínsecas” 
o “residentes” o permanentes, se indican a continuación con una breve 
descripción de las funciones que llevan a cabo. (Todas ellas están descritas 
de forma más detallada en el capitulo 4.) Las órdenes “residentes” son: 


DIR Muestra los ficheros que existen en el disquete. 

ERA Borra los ficheros de un disquete. 

REN Cambia nombres de los ficheros del disquete. 

TYPE Muestra los contenidos de ficheros de texto en la consola. 
SAVE Salva parte de la memoria como fichero en el disquete. 
USER Cambia el identificador de usuario. 


Sistema operativo básico de disco 


El BDOS es el corazón del CP/M. El CCP y todos los programas que se 
utilizan con el CP/M dialogan con el BDOS para todos los contactos con el 
exterior. El BDOS realiza tareas tales como entrada/salida de la consola, 
salida de impresora, organización de ficheros (creando, borrando y volvien- 
do a escribir ficheros y leyendo y escribiendo sectores). 

El BDOS realiza todas estas cosas de una forma bastante independiente. 
Está relacionado únicamente con las tareas lógicas que se manejan en lugar 
de con la acción detallada de llevar un sector de un disquete a la memoria, 
por ejemplo. Estas operaciones de “bajo nivel” se realizan por el BDOS en 
colaboración con el BIOS. 

Pero ¿cómo trabaja un programa con el BDOS? Por medio de otra 
instrucción de salto colocada estratégicamente en la memoria. Recuérdese 
que el arranque en frío colocaba el salto a la rutina de arranque caliente del 
BIOS en el lugar 0000H. En la posición 0005H coloca una instrucción de 
salto que transfiere el control a la primera instrucción del BDOS. Entonces 
cualquier programa que transfiera el control a la posición 0005H encontra- 
rá su camino en el BDOS. Típicamente, los programas realizan una 
instrucción CALL al lugar 0005H, de forma que una vez que el BDOS ha 


18 CP/M Manual para programadores 


realizado la tarea encomendada pueda volverse al programa de llamada en 
el sitio correcto. El programa que recurre a la ayuda del BDOS coloca 
valores especiales en algunos de los registros de la CPU antes de realizar la 
llamada a la posición 0005H. Estos valores comunican al BDOS cuál es la 
operación que se requiere, así como los restantes valores requeridos para la 
Operación específica. 


Sistema básico de entrada/salida 


Como se ha indicado anteriormente, el BDOS trata la entrada y salida 
de información de forma independiente, sin preocuparse de los detalles 
materiales del hardware de la computadora. El BIOS es el que comunica 
directamente con el hardware, los puertos y los dispositivos periféricos 
conectados con él. 

Esta separación de la entrada/salida lógica en el BDOS de la entrada/sa- 
lida material del BIOS es una de las razones principales por las que el CP/M 
es tan popular. Significa que la misma versión del CP/M puede adaptarse a 
todos los tipos de computadoras, cualesquiera que sean las particularidades 
del diseño del hardware. Digital Research les informará de que hay más de 
200.000 computadoras en el mundo que funcionan con CP/M. Casi en todas 
ellas funcionan copias idénticas del CCP y del BDOS. Unicamente el BIOS 
es distinto. Si se escribe un programa que funcione bajo las reglas 
establecidas y que interaccione únicamente con el BDOS para obtener cosas 
determinadas, funcionará en casi todas estas 200.000 computadoras sin 
que haya que cambiar una sola línea del código. 

La palabra “casi” del párrafo anterior quizá ha llamado la atención. A 
veces los programadores pasan órdenes directamente al BIOS y no al 
BDOS, lo que conduce a problemas. El BIOS debe quedar fuera de los 
límites del programa. Es necesario saber qué es y cómo funciona, a fin de 
construir una versión adecuada del CP/M, pero nunca se deben escribir 
programas que dialoguen directamente con el BIOS si se desea que 
funcionen en otras versiones de CP/M. 

Una vez planteados los peligros del diálogo con el BIOS, se puede 
describir la forma en que el BDOS se comunica con él. Contrariamente al 
BDOS, que posee un solo punto de entrada y utiliza el valor de un registro 
para especificar la función que se ha de realizar, el BIOS presenta varios 
puntos de entrada. Las primeras instrucciones del BIOS son todas puntos 
de entrada independientes, cada una de las cuales toma tres bytes de 
memoria. El BDOS introducirá al BIOS en la instrucción apropiada, según 
la función que se haya de realizar. Este grupo de puntos de entrada es 
similar en su funcionamiento a una estación de ferrocarril de mercancías. 
Dirige el BDOS a su destino correcto en el BIOS para la función que 
necesita realizar. El grupo de puntos de entrada consiste en una serie de 
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instrucciones JUMP, cada una de una longitud de tres bytes. El grupo, en su 
conjunto, se denomina tabla de saltos o vector de saltos del BIOS. El 
significado de cada punto de entrada se ha definido previamente. Estos 
puntos se detallan y comentan en el capítulo 6. 


Interacciones del CCP, BDOS y BIOS 


La figura 2-4 resume las funciones que realizan el CCP, el BDOS y el 
BIOS, la forma en que estas partes del CP/M se comunican entre si y la 
forma en que un programa que funciona con el CP/M interacciona con el 























BDOS. 
Sistema Maneja todas las entradas/salidas fisicas 
básico de ) | a la consola, la impresora, entradas/salidas 
entrada/salida ) |. serie y discos (adaptado por [Puntos de entrada 
(BIOS) el usuario) a la tabla JMP. 
Sistema Maneja todas las entradas/salidas lógicas 
operativo a la consola, a la impresora, entradas/salidas 
sico serie, incluyendo la administración de ficheros 
de disco en el sistema del disco. 
(BDOS) (No cambiable por el usuario.) 
Procesador Maneja la comunicación con la consola; 
de órdenes acepta lineas de órdenes; tiene algunas 
de consola órdenes grabadas, o las carga desde el 
(CCP) disco. (No cambiable por el usuario.) 





Programa corriendo 
bajo CP/M 





CALL $ para hacer peticiones 
al CP/M 


—JMP 0 cuando se acaba 
el proceso 














Posición 
»5  JMPBDOS 
L—=0  JMP RESTART 


























Figura 2-4. Desglose funcional de CP/M. 


Cómo CP/M ve el disco 
Creación de un fichero 
Tablas de definición del disco 
Organizaciones de ficheros 


El sistema de ficheros 
del CP/MI 





Este capítulo proporciona una visión clara del sistema de ficheros del 
CP/M. El sistema operativo básico de disco (BDOS) es responsable del 
sistema de ficheros: Mantiene un directorio de los ficheros en el disco, 
anotando dónde están almacenados los datos verdaderamente en el disco. 
Como quiera que el sistema de ficheros retiene automáticamente esta 
información, pueden ignorarse los detalles de cuáles son las pistas y los 
sectores del disco que poseen datos de un fichero determinado. 











Cómo CP/M ve el disco 








Para manipular ficheros en el disco, CP/M trabaja con el disco en 
términos lógicos y no en términos materiales de pistas y sectores. CP/M 
trata al disco como si estuviera dividido en tres zonas principales. 

Estas zonas se denominan: área reservada, que contiene el programa de 
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control de arranque y el propio CP/M; directorio del fichero, que contiene 
una o más entradas para cada fichero almacenado en el disco; y el área de 
almacenamiento de datos, que ocupa el resto del disco. CP/M asigna 
memoria a los ficheros al mismo tiempo que son creados por el programa. 

El sistema básico de entrada/salida (BIOS) tiene tablas internas que 
indican al CP/M los tamaños respectivos de las tres áreas. Estas tablas se 
denominan tablas de definición del disco, y se describen más adelante en este 
mismo capítulo. 


Bloques de asignación 


Más bien que trabajar con los sectores individuales de 128 bytes, el 
CP/M reúne lógicamente algunos de estos sectores para formar un bloque. 
Típicamente, un bloque contendrá ocho sectores de 128 bytes (lo que hace 
una longitud total de 1.024 ó 1K bytes). Esto hace que la manipulación del 
disco sea más sencilla, ya que la magnitud de los números afectados se 
reduce. Por ejemplo, un disco flexible normalizado de 8 pulgadas, densidad 
simple y una sola cara posee 1.950 sectores de 128 bytes; los discos rígidos 
pueden tener 120.000 o más. Utilizando bloques que tratan ocho sectores 
del disco a la vez, el número de unidades de almacenamiento a utilizar se 
reduce sensiblemente. El número total es importante porque la información 
numérica se maneja como números enteros de 16 bits en los microprocesa- 
dores 8080 y Z80 y, por consiguiente, el número sin signo mayor posible es 
OFFFFH (65.535 ó 64K decimal). 

Cuando el CP/M se refiere a un bloque específico, todo lo que necesita es 
un simple número. El primer bloque es el número 0, el siguiente el número 
1, etc., hasta la capacidad total restante del disco. 

El bloque típico contiene 1.024 (1K) bytes, u ocho sectores de 128 bytes. 
Para los discos rígidos más grandes, el bloque puede ser de 16.384 (16K) 
bytes, que equivale a 128 sectores de 128 bytes. Al CP/M se le da la 
asignación por medio de una entrada en las tablas de definición del disco en 
el BIOS. 

El tamaño del bloque no es arbitrario, sino un compromiso. El creador 
del BIOS que corre en el sistema —bien el fabricante o el diseñador de 
sistema operativo— elige el tamaño considerando la capacidad total de 
almacenamiento del disco. Esta elección está afectada por el hecho de que si 
un fichero está creado con sólo un único byte de datos en él, ése ocupará un 
bloque completo. Los bloques grandes pueden desperdiciar memoria del 
disco si hay muchos ficheros pequeños, pero pueden ser útiles cuando se 
exigen algunos ficheros muy grandes. 

Consideremos el caso de un bloque de 1K byte. Si se crea un fichero muy 
pequeño que contenga nada más que un único byte de datos, se habrá 
ocupado un bloque completo, los 1.023 bytes restantes no se utilizarán. Se 
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pueden utilizar mediante la adición de nuevos datos al fichero, pero en su 
creación este fichero de un byte fijará un espacio muerto demasiado grande. 
Este es el problema: Cada fichero del disco tendrá normalmente un bloque 
parcialmente lleno. Si estos bloques son muy grandes, la cantidad de 
espacio desperdiciado (no utilizado) puede ser enorme. Un disco de 10 
megabytes, con bloques de 16K bytes, puede llenarse lógicamente con todos 
los bloques “ocupados” con sólo 3 megabytes de datos en él 

Por otra parte, cuando se usan bloques grandes, el rendimiento del 
CP/M se mejora sensiblemente, ya que el BDOS se refiere al directorio con 
menos frecuencia. Por ejemplo, puede leer un fichero de 16K bytes con sólo 
una única referencia al directorio. 

Por tanto, cuando se considere la asignación de bloques, deben tenerse 
en cuenta las siguientes cuestiones: 


¿De qué tamaño es el disco lógico? 
Con un disco mayor se pueden tolerar los espacios desperdiciados 
debidos a bloques incompletos. 


¿Cuál es el tamaño medio de un fichero? 
Si está previsto utilizar muchos ficheros pequeños, deben usarse 
bloques pequeños, de forma que se posea un “suministro” mayor de 
bloques. Si está previsto utilizar un número menor de ficheros de 
mayor tamaño, deberán usarse bloques mayores, con el fin de 
obtener operaciones más rápidas con el fichero. 


Cuando se crea un fichero por primera vez, se le asigna un bloque único 
en el disco. El bloque que se le asigne depende de los otros ficheros que se 
tengan ya en el disco y de los bloques que ya hayan sido situados en él. 
CP/M mantiene una tabla de los bloques que están ocupados y de los que 

-están disponibles. Si el fichero acumula más datos, se llenará el primer 
bloque. Cuando esto sucede, CP/M extenderá el fichero y situará otro 
bloque en él. Entonces, según crece el fichero, ocupa más bloques. No es 
preciso que estos bloques sean adyacentes dentro del disco y el fichero 
puede existir como una serie de bloques esparcidos por todo el disco. Sin 
embargo, si se necesita ver el fichero completo, el CP/M presenta los 
bloques en el orden correcto. Por tanto, los programas de aplicación pueden 
ignorar los bloques. CP/M conserva la información de los bloques que 
pertenecen a cada fichero a través del directorio de ficheros. 


El directorio de ficheros 
El directorio de ficheros está inserto entre el área reservada y el área de 


almacenamiento del disco. El tamaño real del directorio está definido en las 
tablas de definición del disco del BIOS. El directorio puede tener un número 
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de entradas múltiplo de dos, con una o más entradas para cada fichero que 
existe en el disco. Para un disquete flexible estándar de 8 pulgadas habrá 
sitio para 64 entradas al directorio; para un disco rígido no son raras 1.024 
entradas. Cada entrada del directorio tiene una longitud de 32 bytes. 

Mediante la utilización de simples operaciones aritméticas puede calcu- 
larse el espacio que ocupa el directorio en un disquete flexible. Por ejemplo, 
para un disco flexible la fórmula es 64x 32=2.048 bytes=2 bloques de 
1.024 bytes cada uno. 

Cada entrada al directorio contiene el nombre del fichero junto a una 
lista de los bloques utilizados actualmente por él. Naturalmente, una sola 
entrada al directorio de 32 bytes no puede contener todos los bloques 
necesarios para un fichero de 5 megabytes, especialmente debido a que el 
CP/M usa sólo 16 bytes del total de 32 bytes para almacenamiento de los 
números de los bloques. 


Extensiones 


A menudo hace falta que el CP/M controle ficheros que necesitan 
muchos bloques. Lo lleva a cabo mediante la creación de más de una 
entrada del directorio. En este caso las entradas segunda y subsiguientes 
tienen el mismo nombre de fichero que las primeras y uno de los otros bytes 
de la entrada del directorio se utiliza para indicar el número de secuencia de 
la entrada al directorio. Cada nueva entrada lleva consigo una nueva 
aportación de bytes que pueden ser utilizados para contener más números 
de bloque. En la jerga del CP/M, cada entrada del directorio se denomina 
extensión (extent). Comoquiera que la entrada del directorio para cada 
extensión tiene 16 bytes para almacenar números de bloque, puede 
almacenar bien 16 números de un byte o bien 8 números de dos bytes. Por 
consiguiente, el número total de bloques posibles en cada extensión es de 8 
(para discos con más de 255 bloques) o 16 (para discos más pequeños). 








Bloque de control de ficheros 


Antes de que CP/M pueda hacer algo con un fichero, tiene que tener 
alguna información de control en la memoria. Esta información está 
almacenada en un bloque de control de fichero, o FCB. El FCB se ha 
descrito como un “motel” para entradas del directorio —un lugar para que 
residan cuando no están “en casa” dentro del disco—. Cuando las Operacio- 
nes de un fichero se completan, el CP/M transforma otra vez el FCB en una 
entrada de directorio y vuelve a escribirlo en la entrada original. Al final de 
este capítulo se presenta detalladamente el FCB. 

Como resumen, la figura 3-1 muestra las relaciones entre los sectores del 
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“Puntos” de entrada del directorio 


Memoria a los bloques utilizados 









Bloque de control de ficheros creado 
desde la entrada del directorio con el fin 
de procesar ficheros por programa 























Figura 3-1. Relación jerárquica entre sectores, bloques, entradas del directorio y FCBs. 


disco, los bloques, las entradas del directorio y los bloques de control de 
fichero. 








Creación de un fichero 








Para reforzar todo lo que se ha aprendido acerca del sistema de ficheros 
CP/M, esta sección echa un vistazo a lo que ocurre cuando un programa 








26  CP/M Manual para programadores 


que funciona con CP/M crea un fichero, escribe datos en él y lo cierra a 
continuación. 

Supongamos que se ha cargado un programa en la memoria y que la 
CPU está a punto de ponerse a ejecutarlo. En primer lugar, el programa 
creará un espacio en la memoria para el FCB y colocará en él algunos 
valores determinados previamente, el más importante de los cuales es el 
nombre del fichero. El área del FCB que contenga los números del bloque 
según son asignados, está llena inicialmente con 0 (ceros/binarios). Como el 
primer bloque que está disponible para datos del fichero es el bloque 1, un 
número de bloque 0 significará que no se ha ocupado ningún bloque. 

El programa empieza a ejecutarse. Realiza una llamada al BDOS (vía 
posición 0005H) solicitando que el CP/M cree un fichero. Transfiere al 
BDOS la dirección en memoria del FCB. Entonces el BDOS sitúa una 
entrada disponible en el directorio, crea una entrada nueva basada en el 
FCB en el programa, y vuelve al programa, preparado para escribir datos 
en el fichero. Obsérvese que el CP/M no se ocupa de ver si hay ya un fichero 
con el mismo nombre en el disco. Por esta razón, en programas más reales, 
una petición para abrir un fichero va precedida por una petición de borrar 
todos los ficheros existentes con el mismo nombre. 

El programa comienza ahora escribiendo datos en el fichero, sector de 
128 bytes por sector de 128 bytes. El CP/M no está preparado para escribir 
un byte de cada vez. Maneja los datos únicamente sector por sector, 
vertiendo los sectores al disco según se van llenando. 

La primera vez que un programa solicita al CP/M (vía una petición 
BDOS) que escriba un sector en un fichero del disco, el BDOS encuentra un 
bloque sin utilizar y le asigna al fichero. El número del bloque se coloca 
dentro del FCB en memoria. Cuando todos los bloques están llenos, se 
encuentra uno nuevo y se le asigna, y su número se añade a la lista de 
bloques dentro del FCB. Finalmente, cuando el FCB no tiene más sitio para 
números de bloque, el BDOS: 


e Escribe la entrada actualizada del directorio en el disco. 
e Busca una nueva entrada disponible en el directorio. | 


e Vuelve a colocar el FCB en la memoria para indicar que está 
trabajando en ese momento en la segunda extensión del fichero. 


e Borra el área de bloques del FCB y espera el sector siguiente del 
programa. 


Entonces continúa el proceso. Se abren automáticamente nuevas exten- 
siones hasta que el programa determina que es hora de terminar, escribe el 
último sector en el disco y solicita del BDOS que cierre el fichero. Entonces 
el BDOS convierte el FCB en una entrada final del directorio y la escribe 
en él. 
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Entrada del directorio 


El directorio consiste en una serie de entradas de 32 bytes con una o más 
entradas para cada fichero del disco. El número total de entradas depende 
del formato del disco (será de 64 para un disco flexible estándar y quizá de 
2.048 para un disco rigido). 

La figura 3-2 muestra la estructura detallada de una entrada del 
directorio. Obsérvese que la descripción es realmente en código fuente del 
Intel 8080 para las definiciones de los datos que se necesitan para manipular 
una entrada del directorio. Muestra una serie de instrucciones EQU 
— instrucciones equivalencia usadas para asignar valores o expresiones a 
una etiqueta, y en este caso usadas para acceder a una entrada-—. Muestra 
también una serie de DS o instrucciones de definición de memori. 
para declarar la memoria para una entrada. Los comentarios de cada línea 
describen la función de cada uno de los campos. Cuando los elementos de 
datos son menores de un byte, el comentario identifica los bits que se usan. 

Al mirar la figura 3-2 se observa que hay en ella cierta terminología que 
aún no se ha usado. Esta se describe en las secciones siguientes. 





Número del usuario del fichero (byte 0) — Los 4 bits menos significativos (bajo 
orden) del byte O de entrada del directorio contienen un número del 0 al 1 
Este es el número de usuario al que pertenece el fichero. Un nombre más 
adecuado para éste habría sido el de número de grupo de ficheros. Trabaja 
de la siguiente forma: Supongamos que varios usuarios comparten una 
computadora con un disco rígido que no puede ser extraído del sistema sin 
graves problemas. ¿Cómo puede estar seguro cada usuario de no enredarse 














0000 = FDESUSER Eu 0 ¿Número de usuario del fichero (LS 4 bits) 
0001 FDESNANE Eu ¿Nombre de fichero (8 bytes) 
0009 = FOESTYP EU 9 ¿Tipo de fichero 
¿Sobrante de bits utilizados en el tipo 
9009 = FOESRO Eu? ¿Bit 7 = 1 Sólo Lectura 
9004 FOESSYS 010 1 = Modo sístena 
0008 = FDESCHANGE Eo 14 ¿ait 7 = 0 = Fichero escrito 
000c = FDESEXTENT Eu 12 ¿Número de extensión 
313, 14 reservados para CP/M 
000F FDESRECUSED EQU 18 ¿Registros utilizados en esta extensión 
0010 = FDESABUSED EQU dé ¿Bloques utilizados 
1 
0090 FDSUSER: Ds ¿Número de usuario 
0001 FDIMAME+ ES 8 ¿Nombre de fichero 
0009 FDSTYP+ ES 3 ¿Tipo de Fichero 
0000 FDSEXTENT+ pS 1 ¿Extensión 
0000 FDARESV: pS 2 ¿Reservado para CP/M 
000F FDSRECUSED: DS 1 ¿registros utilizados en esta extensión 
0010 FDSABUSED: ES 16 ¿Bloques utilizados 








Figura 3-2. Declaraciones de datos para entradas de directorio de ficheros de CP/M. 
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Nombre 


con los ficheros de otros usuarios? Una solución sería que utilizase cada uno 
iniciales individuales como caracteres en los nombres del fichero. Así cada 
uno podría decir a simple vista si un fichero pertenece a otro y evitar el 
tocar los ajenos. Un inconveniente de este esquema es que las posiciones 
valorables de caracteres se usarían en el nombre del fichero, sin mencionar 
los inconvenientes que se generarían si varios usuarios tuviesen las mismas 
iniciales. 

Los números de usuario del fichero están como prefijo en cada fichero y 
pueden considerarse en sí mismos como una parte del nombre, Cuando el 
CP/M se utiliza por primera vez, el usuario 0 es el usuario por defecto —el 
que será escogido a menos que se haya designado otro-—. Cualquier fichero 
creado entrará en el directorio llevando el número de usuario 0. Estos 
ficheros se identifican como pertenecientes al área de usuario 0. Sin 
embargo, con un sistema de cálculo compartido hay que hacer varias 
modificaciones para adaptarlos a las áreas de múltiples usuarios. La orden 
USER hace que esto sea posible. Los números y áreas de usuario van del 0 
al 15. Por ejemplo, un usuario del área 7 no podrá conseguir un directorio, 
acceder o borrar ficheros en el área de usuarios 5. 

Este byte de número de usuario sirve también para otro propósito. Si 
este byte se fija al valor OESH, el CP/M considera que la entrada al 
directorio se ha borrado e ignora por completo los 31 bytes de datos 
restantes. El número OESH no se ha elegido caprichosamente. Cuando IBM 
definió por primera vez el estándar para los disquetes flexibles, eligió la 
secuencia binaria 11100101 (OESH) como adecuada para comprobación. Un 
disquete nuevo formateado para ser utilizado no posee más que bytes 
OESH. Por tanto, el proceso de borrar un fichero es un borrado “lógico”, en 
el que únicamente el primer byte de la entrada del directorio se cambia a 
0ESH. Si accidentalmente se borra un fichero (y si no se ha llevado a cabo 
ninguna otra actividad en el directorio), puede resucitarse simplemente 
cambiando este primer byte a un número de usuario razonable. Este 
proceso se explicará en el capitulo 11. 























y tipo de fichero (bytes 1-8 y 9-11) Como puede verse en la figura 3-2, 
el nombre de fichero en una entrada al directorio tiene una longitud de ocho 
bytes: y el tipo de fichero tres bytes. Estos dos campos se utilizan para 
denominar un fichero de forma no ambigua. El nombre de un fichero puede 
ser menor de ocho caracteres y el tipo del mismo menor de tres, pero en 
estos casos las posiciones correspondientes a caracteres no utilizados se 
rellenan con espacios. 

Siempre que se escriban juntos el nombre y tipo de fichero, se separan 
con un punto. Esto no es necesario si no se utiliza el tipo de fichero (lo que 
equivale a decir que el tipo de fichero estará formado en su totalidad por 
espacios). Algunos ejemplos de nombres de ficheros son: 











a 
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READ.ME 
LONGNAME.TYP 
1 

12 


El nombre y el tipo de fichero pueden contener caracteres de A aZ, de 0 
a 9 y algunos de los llamados caracteres especiales, tales como **/” y * 
También pueden utilizarse letras minúsculas, pero hay que tener cuidado 
cuando se introducen órdenes en el sistema utilizando el CCP; éste convierte 
todas las minúsculas en mayúsculas, de forma que resulta imposible, en la 
práctica, encontrar ficheros que tengan letras minúsculas en la entrada del 
directorio. Hay que evitar la utilización excesiva de caracteres especiales. 
Algunos de los que se pueden usar son 











LO AS%()-+ 


Los caracteres que no se deben utilizar son 





<>.,5:=?8[] 
Estos caracteres se utilizan por el CP/M en líneas de órdenes normales, lo 
que ocasionaría problemas al utilizarlos en los nombres de ficheros. 

Se pueden usar caracteres raros en los nombres de ficheros si se desea. 
Por ejemplo, si se crean ficheros con caracteres no gráficos en sus nombres 
o tipos, el único modo de acceder a ellos es desde dentro de programas. No 
se pueden manipular estos ficheros desde el teclado, excepto utilizando 
nombres ambiguos (descritos en la próxima sección). Esto hace más dificil 
el borrado accidental, ya que no pueden especificarse los nombres directa- 
mente desde la consola. 








Nombres de fichero ambiguos El CP/M está capacitado para referirse a uno o 
más nombres de ficheros utilizando caracteres especiales “comodin” en los 
nombres de fichero. El signo **?” es el principal carácter comodín. Siempre 
que se solicite que el CP/M realice algo relacionado con ficheros, empareja- 
rá un signo *?” con cada carácter que encuentre en el nombre del fichero. 
En el caso más extremo, el nombre y tipo de fichero * 
refieren a todos y cada uno de los nombres de fichero. 

Para poner otro ejemplo: todos los capítulos de este libro se colocaron 
en ficheros denominados “CHAP1.DOC”, “CHAP2,DOC”, etc. Sin embar- 
go, frecuentemente se les atribuyó la denominación “CHAP?.DOC” 
qué dos signos interrogativos? Si se hubiera usado solamente uno, por 
ejemplo, “CHAP?.DOC”, el CP/M no habría podido emparejarlo con el 
“CHAP10.DOC”, ni con cualquier otro capítulo cuya numeración constara 
de dos digitos. El emparejamiento que realiza el CP/M es estrictamente 
carácter por carácter. 
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Comoquiera que el mecanografiar signos interrogativos puede resultar 
aburrido y debe ponerse especial atención para saber el número exacto que 
se ha introducido, se dispone de una abreviación adecuada. El asterisco “«” 
puede utilizarse con el significado de “tantos ? como se necesiten para 
completar el campo del nombre o del tipo”. Entonces, *?????222,29” puede 
escribirse “*.*"” y “CHAP?.DOC” puede también volverse a escribir 
“CHAPx*.DOC”., 

El uso de “+” está permitido únicamente cuando se introducen nombres 
de fichero desde la consola. La notación del signo interrogativo, sin 
embargo, puede utilizarse para algunas operaciones del BDOS, con el 
campo nombre de fichero y tipo en el FCB puestos a “?” cuando sea 
necesario. 


Convenios sobre el tipo de fichero Aunque se tiene plena libertad para idear 
nombres de fichero, los tipos de éste están sujetos a convenios y, en uno o 
dos casos, a las instrucciones del propio CP/M. 

Los tipos que causarán problemas si no se usan correctamente son: 


.ASM 
Fuente en lenguaje ensamblador para el programa ASM. 


MAC 
Lenguaje macroensamblador. 


HEX 

Fichero hexadecimal de salida de los ensambladores. 
«REL 

Fichero reubicable de salida de los ensambladores. 


.COM 
Fichero de órdenes que es ejecutado al introducir únicamente su 
nombre. 


.PRN 
Fichero de impresión escrito en el disco cuando conviene. 


LIB 
Fichero de biblioteca de programas. 


«SUB 
Entrada para el programa de utilidad SUBMIT del CP/M. 


Los ejemplos de tipos convencionales de fichero son: 


Código fuente en C. 
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.PAS 
Código fuente Pascal. 


.COB 
Código fuente COBOL. 


FIN 
Código fuente FORTRAN. 


APL 

Programas APL. 
TXT 

Ficheros de texto. 


.DOC 
Ficheros de documentación. 


INT 
Ficheros intermedios 


.DTA 
Ficheros de datos. 


JDX 
Ficheros de indices. 


ISS 
Ficheros temporales. 


El tipo de fichero es también útil para conservar algunas copias del 
mismo fichero; por ejemplo, “TEST.001”, “TEST.002”, etc. 


Estados de un fichero Cada uno de los estados sólo lectura, sistema y fichero 
modificado requiere solamente un bit único en la entrada del directorio. 
Para evitar el uso de espacios innecesarios se han encajado en los tres bytes 
utilizados para el campo tipo de fichero. Como estos bytes están almacena- 
dos como caracteres en ASCII (que es un código de siete bits), el bit más 
significativo no se utiliza para el tipo de fichero y, por tanto, se encuentra 
disponible para indicar el estado. 

El bit 7 del byte 9 muestra el estado de sólo lectura. Como indica su 
nombre, si un fichero está situado para ser de sólo lectura, el CP/M no 
permitirá que se escriba o que se borre ningún dato en él. 

Si se declara que un fichero está en estado “sistema” (bit 7 del byte 10), 
no aparecerá cuando se muestre el directorio de ficheros. Tampoco podrá 
copiarse el fichero de un sitio a otro con utilidades normalizadas de CP/M, 
tales como PIP, a menos que se solicite especificamente. En la práctica 
normal se deben situar las herramientas software y los programas de 
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aplicación de forma que sean tanto sólo lectura como modo sistema. Sólo 
lectura, de forma que no se puedan borrar accidentalmente, y modo 
sistema, de forma que no desordenen la composición del directorio. 

El bit fichero modificado (bit 7 del byte 11) está siempre puesto a 0 
cuando se cierra un fichero en el cual se ha estado escribiendo. Esto puede 
ser útil junto con un programa de utilidad de copia de ficheros (backup) 
que coloca este bit a 1 cuando se hace una copia del mismo. Precisamente, 
examinando el directorio, este programa de utilidad puede determinar qué 
ficheros han sido modificados desde la última pasada y hacer la copia 
únicamente de aquellos que han sido modificados. Esto es mucho más facil 
que recordar qué ficheros se han modificado desde que se hicieron las 
últimas copias. 

Con un sistema de disco flexible hay menos necesidad de preocuparse de 
las copias fichero a fichero —es exactamente igual de sencillo copiar todo el 
disquete—. Este sistema es útil, sin embargo, con un sistema de disco rígido 
que posea cientos de ficheros almacenados en el disco. 


Extensión de un fichero (byte 12) Cada entrada del directorio representa una 
exterisión del fichero. El byte 12 de la entrada del directorio identifica el 
número de extensión. Si se tiene un fichero de menos de 16.384 bytes, se 
necesitará sólo una extensión —la número 0-—. Si se escribe m: 
ción en el misma, se necesitarán más extensiones. El número de exten 
aumenta en | según se crea cada nueva extensión. 

El número de extensión está almacenado en el directorio de ficheros 
porque las entradas del directorio están en secuencia aleatoria. El BDOS 
deberá realizar una búsqueda secuencial desde el principio del directorio 
para estar seguros de encontrar cualquier extensión del fichero. Si el 
directorio es largo, como podría ocurrir en un sistema de disco rígido, esta 
búsqueda puede durar segundos. 










n 








Bytes reservados 13 y 14 Estos bytes son utilizados por las partes propias del 
sistema de ficheros del CP/M. Desde el punto de vista del programador 
estarán puestos a 0, 





Número de registro (byte 15) El byte 15 contiene la cuenta del número de 
registros (sectores de 128 bytes) que han sido utilizados en el último bloque 
parcialmente lleno referenciado en esta entrada del directorio. Comoquiera 
que el CP/M crea un fichero de forma secuencial, únicamente el bloque 
ocupado más recientemente no está completamente lleno. 


Mapa del disco (bytes 16-31) Los bytes del 16 al 31 almacenan los números de 
bloque utilizados por cada extensión. Existen 16 bytes en esta área. Si el 
número total de bloques (como ha definido el programador en las tablas de 
disco del BIOS) es menor de 256, esta área puede mantener hasta 16 
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números de bloque. Si se ha descrito el disco conteniendo más de 255 
bloques de situación, el CP/M utiliza esta área para almacenar ocho valo- 
res de dos bytes. En este caso los bloques pueden tomar valores mucho 
mayores. 

Una entrada del directorio puede almacenar bien 8 o bien 16 números de 
bloque. Si el fichero no se ha extendido lo suficiente para requerir este 
número total de bloques, las posiciones no utilizadas de la entrada se 
rellenan con ceros. Puede pensarse que esto creará problemas, por lo que 
parece que varios ficheros serán situados una y otra vez en el bloque 0. En 
realidad no existe problema porque el propio directorio de ficheros ocupa 
siempre el bloque 0 (y, dependiendo de su tamaño, algunos de los bloques 
siguientes). Para todos los propósitos prácticos, el bloque O “no existe”, por 
lo menos para el almacenamiento de datos. 

Obsérvese que si accidentalmente se pierde la relación entre los ficheros 
y sus bloques —por ejemplo, si los datos de un bloque determinado se 
escriben más allá de su lugar asignado, o bien si dos o más entradas activas 
del directorio contienen el mismo número de bloque—, el CP/M no puede 
acceder a la información de manera adecuada y el disco se inutiliza. 

Algunos programas de utilidad disponibles comercialmente manipulan 
el directorio. Se pueden usar para inspeccionar y cambiar el directorio 
dañado, reviviendo ficheros borrados si es necesario, Existen otros progra- 
mas de utilidad que se pueden utilizar para anular sectores inservibles del 
disco, Estos programas encuentran las áreas inservibles, trabajan hacia 
atrás a partir de los números de pista y de sector, y calculan el bloque en el 
que ocurre el error. Una vez se conocen los números del bloque, crean un 
falso fichero, bien en el área de usuario 15 o, en algunos casos, en un área 
de usuario “imposible” (una mayor de 15), que parece “apropiarse” de 
todos los bloques inservibles. 

Un buen programa de utilidad protege la integridad del directorio 
verificando que cada bloque de situación está “poseido” únicamente por 
una entrada de directorio. 























Tablas de definición del disco 








Como se ha mencionado previamente, el BIOS contiene tablas que 
indican al BDOS cómo ha de ver las unidades de disco que forman parte del 
sistema de cálculo. Estas tablas estarán construidas por el programador. Si 
se utilizan disquetes normalizados de 8 pulgadas, de una sola cara, de 
simple densidad, pueden usarse los ejemplos del manual de Digital Re- 
search Guía de modificaciones de CP/M 2. Pero si usa algún otro sistema má: 
complicado hay que seguir criterios más cuidadosos. Cualquier error en las 
tablas de definición del disco puede crear problemas graves, especialmente 
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cuando se intenta corregir disquetes creados utilizando las tablas erróneas. 
El programador deberá asegurarse de la corrección de las tablas poniendo el 
máximo cuidado. 

Un último detalle antes de entrar en la estructura de la tabla: El hecho 
de que las tablas existan y definan un “patrón” particular del disco no 
significa que este disco tenga que estar necesariamente conectado al 
sistema. Las tablas describen los discos lógicos y no existe forma alguna 
para el hardware de controlar si las tablas del disco son correctas. Puede 
tenerse una computadora con un solo disco duro; entonces describir el disco 
como si estuviera dividido en varios discos lógicos. El CP/M visualizará 
cada uno de tales “discos” independientemente y deberán ser considerados 
como discos separados. 


Tabla cabecera de parámetros del disco 


Esta tabla es el punto de partida en las tablas de definición del disco. Es 
la estructura más alta y no contiene más que las direcciones de otras 
estructuras. Existe una entrada en esta tabla para cada disco lógico que se 
quiera describir. Existe un punto de entrada en el BIOS que devuelve la 
dirección de la tabla cabecera de parámetros para un disco lógico especifico. 

Un ejemplo del código necesario para definir una tabla cabecera de 
parámetros del disco se muestra en la figura 3-3. 


Desplazamiento de sectores Para definir el desplazamiento de sectores, llamado 
también entrelazamiento de sectores, imagínese un disquete girando en la 
unidad del disco. Los sectores de la pista sobre la cual se encuentra la 
cabeza están pasando por ésta ano tras otro —sector 1, sector 2, etc.— 
hasta que el disquete ha girado en su totalidad. Entonces la secuencia se 
repite. Un disquete estándar de 8 pulgadas posee 26 sectores en cada pista 
y el disco gira a 360 rpm. Un giro del disquete dura 60/360 segundos, 
aproximadamente 166 milésimas de segundo por pista, o 6 milésimas de 
segundo por sector. 

Imagínese ahora al CP/M cargando un programa para tal disquete. El 
BDOS toma un número finito de tiempo para leer y tratar cada sector, ya 
que lee un solo sector a la vez. Tiene que realizar repetidamente lecturas 
para cargar un programa. En el momento en que el BDOS ha leído y 
cargado el sector n, será demasiado tarde para leer el sector n+ 1. Este sector 
ya habrá pasado por la cabeza y no volverá a pasar hasta 166 milésimas de 
segundo después. Procediendo de esta forma, se necesitan casi cuatro 
segundos y medio para leer una pista completa. 

Este problema puede resolverse mediante la simple numeración de 
sectores lógicamente, de forma que haya algunos sectores materiales entre 
cada sector lógico. Este procedimiento, denominado desplazamiento de 
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0037 
002 


0014 
0018 
Ta 
0020 
0024 
0028 
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O0AA 


00c9 























DPBASE: ¿Base de La cabecera de parámetros 
7 (usada para acceder a Las cabeceras) 
1000 . SKEWTABLE ¿Apuntador a La tabla de conversión 
5 de sectores lógicos a físicos 
9000 Es) o ¿Area de anotaciones usada por CP/M 
0000 E] o 
0000 De o 
2400 DM DIRBUF ¿Apuntador al área de trabajo de 
5 la memoria de directorio 
ADO E Deo ¿Apuntador al bloque de parámetros del disco 
900 De Haco ZApuntador al área de trabajo (utilizada 
? para comprobación de cambios de disquetes) 
0900 .. ALVECO ¿Apuntador al vector de situación 
, 
, Las equivalencias siguientes podrían deducirse de Los valores que 
, se encuentran en el bloque de parámetros del disco. 
, Se muestran aquí sólo para completar. 
, 
- MODE EQU $3 ¿Número de entradas al directorio 
= NOAB= EQU 242 ¿Número de bloques 
, 
, Ejemplo de definiciones de datos para aquellos objetos 
1 apuntados por Los parámetros cabecera del disco 
, 
SKEMTABLE: ¿Tabla de desplazamiento de sectores 
indexada por sectores lógicos 
01070013 Da 91,07,13,19 stores lógicos 0,1,2,3 
19050811 e 25,05,11,17 +5.6.7 
1703090F De 23,03,09,15  18,9,10,11 
1502080€ De 21:02,08,14 — 312,13,1 
141A060C De 12 116/17,1 
12180404 ES 210 120,21,2: 
1016 ES 124,25 
, 
DIRBUF+ DS 128 ¡Memoria intermedia de directorio 
DPBO: DS 15 ¿Bloque de parámetros del disco 
¿Esta es normalmente una tabla 
7 de constantés. 
lestra de una definición 
Acticia 
HACD: DS (NODE+1)/4 rea de trabajo para comprobación de directorio 
¿Se usa Unicamente 
ALVECO: DS (NOAB/9)+1 ¿El vector de situa 
¿Necesita 1 b 
7 por bloque 





Figura 3-3. 


3 ». A A 
Declaraciones de datos para una cabecera de parámetros de disco. 


sectores o entrelazamiento de sectores, se muestra en la figura 3-4. Nótese 
que, a diferencia de los sectores materiales, los sectores lógicos están 
numerados de 0 a 25. 

La figura 3-4 muestra el entrelazamiento de sectores estándar del CP/M 
para disquetes de 8 pulgadas, de una cara y de simple densidad. Puede 
apreciarse que el sector lógico O tiene seis sectores entre él y el sector lógi- 
co 1. Existe un hueco similar entre cada uno de los sectores lógicos, de for- 
ma que existen seis “tiempos de sector” (aproximadamente 38 milésimas de 
segundo) entre dos sectores lógicos adyacentes, lo que da tiempo suficiente 
para que el software tenga acceso a cada sector. Son necesarias varias 
vueltas completas del disco para leer todos los sectores por orden, En la 
figura 3-4 las columnas verticales de los sectores lógicos muestran cuáles 
son los sectores que se leen en cada una de las vueltas sucesivas. 
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Sector lógico 
Sector físico 
Paso Paso Paso Paso Pa Pao 
1 2 3 4 5 6 
1 o 
2 n 
3 9 
4 E 
5 s 
6 l5 
7 1 
» 15 
9 10 
10 » 
" b 
3 19 
B 2 
1 15 
is " 
16 2 
Dn 7 
15 2 
19 Ñ 
E 16 
a 2 
» * 
2 a 
2 4 
% " | 
Nora: Sector adicional entre los sectores lógicos 12 y 13 ] 








Figura 3-4. Desplazamiento de sectores físicos a lógicos. 


Un entrelazamiento erróneo puede afectar profundamente al rendimie 
to. No es un efecto gradual; si se “yerra” en el entrelazamiento, se percibi 
un rendimiento muy lento. En el ejemplo que se cita se necesitan seis 
vueltas del disquete para leer toda la pista —esto dura un segundo, en 
oposición a los cuatro y medio que dura sin entrelazamiento—. Pero no 
debe imaginarse que se puede cambiar impunemente el entrelazamiento; los 
ficheros escritos con un entrelazamiento permanecen en la misma forma. 
Hay que estar seguros de que se leen con el mismo entrelazamiento con el 
que fueron escritos. 

Algunos controladores de disco pueden simplificar este procedimiento. 
Cuando se formatea el disquete se pueden escribir las direcciones de los 
sectores en el disquete, con el entrelazamiento construido ya en él. Cuando 
el CP/M solicita el sector n, la parte electrónica del controlador espera hasta 
que ve pasar la cabecera del sector requerido. Entonces inicia la operación 
de lectura o escritura. En este caso se puede encajar el entrelazamiento 
correctamente en el formateado del disquete. 

Comoquiera que un entrelazamiento erróneo produce un rendimiento 
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malísimo, es fácil saber cuándo se ha elegido el correcto. Algunos progra- 
madores utilizan el tiempo requerido para formatear un disquete como 
criterio de rendimiento para optimizar el entrelazamiento. Esta práctica no 
es correcta, ya que en circunstancias normales se empleará poquisimo 
tiempo en el formateado de disquetes. El tiempo que se tarda en cargar 
programa será un árbitro más exacto, ya que se requiere mucho más tiempo 
para esta operación. Podría decirse que actualizar un fichero es más 
representativo, pero, en realidad, muchas actualizaciones producen una 
actividad del disco lenta y esporádica. Esta forma de utilización del disco no 
es, pues, conveniente para colocar el entrelazamiento correcto. 

Los discos rígidos no presentan problemas para el entrelazamiento. 
Giran a 3.600 rpm o más, y a esta velocidad no puede servir ningún 
entrelazamiento. Se pueden usar algunos trucos para mejorar el rendimien- 
to de un disco rígido tos se tratarán en la sección denominada 
“Consideraciones especiales para discos rígidos”, más adelante en este 
mismo capitulo. 

Para entender mejor estas teorías, estudiaremos un ejemplo de la tabla 
de entrelazamientos normalizados, o tabla de deslizamiento. No debe 
olvidarse que al programa que accede a esta tabla se le dará, en primer 
lugar, un sector lógico. Por consiguiente, tiene que volver el sector fisico 
adecuado. 

La figura 3-5 muestra el programa para la tabla desplazamientos y el 
programa que puede utilizarse para acceder a ella. Esta está provista de un 





| 








(UR 





SKEMTABLE: +Sector Lógico 
0000 01070013 DE 29123 
0004 19050B11 DB 516,7 
9008 17030905. De 10,11 
000C 1502080€ De 21,02,08,14 , 3, 14,13 
0010 1818060C DE 20,26,06,12 '  116,17,18,19 
OO1A 12180404 ES 19,24,04,10 — 120,21,22,23 
0018 1016 De 16,22 124,25 


El programa de traducción de sectores lógicos 
a sectores físicos es el siguiente: 


A La entrada, el sector Lógico será transferido al 
registro BC desde CP/M como un número de 16 bits 

CP/M transfiere también La dirección de la tabla 

de desplazamiento (La encuentra buscando en La cabecera de entrada de 
parámetros del disco). 


A la salida, el sector físico se sitúa 
en Los registros HL. 








SECTRAN: 
0014 EB xcHo ¿HL —> dirección base tabla de desplazamientos 
0018 09 DAD a ¿HL > entrada por sector físico 

en la tabla de desplazamientos 
O01c se moy LM ÉL = sector físico 
0010 $0 MOY MO ¿HL = sector físico 
o01E c9 RET ¿Retorno de control al BD0S 








Figura 3-5, Declaraciones de datos para la tabla de enlazamiento para disquetes normalizados. 
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indice de sectores lógicos y la correspondiente entrada de tabla es el sector 
físico. Puede comprobarse que el programa considera que el primer sector 
lógico asignado por el CP/M es el sector número 0. Luego no hay necesidad 
de restar 1 del número del sector antes de utilizarlo como subíndice de la 
tabla. 


Areas no utilizadas en la tabla cabecera de parámetros del disco Las tres 
palabras presentadas como ceros en la figura 3-3 son usadas por el CP/M 
como variables temporales durante las operaciones del disco. 


Memoria intermedia de directorio (Directory Buffer) (DIRBUF) La memoria 
intermedia de directorio es un área de 128 bytes usada por el CP/M para 
almacenar un sector del directorio mientras se procesan las entradas del 
mismo. Se necesita únicamente una memoria intermedia, ya que puede ser 
compartida por todos los discos lógicos del sistema. 


Bloque de parámetros del disco (DPB0) El bloque de parámetros del disco des- 
cribe las caracteristicas particulares de cada disco lógico. En general, se 
necesitará un bloque de parámetros separado para cada tipo de disco lógico. 
Los discos lógicos pueden compartir un bloque de parámetros únicamente 
si sus caracteristicas son idénticas. Se puede usar, por ejemplo, un único 
bloque de parámetros para describir todas las unidades de disquete de una 
sola cara y simple densidad que se tengan en el sistema. Sin embargo, se 
necesitaría otro bloque de parámetros para describir las unidades de 
disquetes de dos caras y doble densidad. También es dificil compartir 
bloques de parámetros cuando un disco rígido está dividido en varios discos 
lógicos. El motivo se entenderá más tarde al contemplar los contenidos de 
un bloque de parámetros que se describe más adelante en este mismo 
capítulo. 


Area de trabajo para comprobar cambios de disquetes (WACD) Uno de los 
mayores problemas con que se enfrenta el CP/M cuando trabaja con medios 
transportables como disquetes es que el operador de la computadora, sin 
ningún tipo de aviso, puede abrir la unidad de disquetes y sustituirlo por un 
disquete diferente. En las versiones primitivas del CP/M el resultado era que 
en el disquete insertado nuevamente se escribían datos sobre los que ya 
contenía el disquete original. 

Con la versión actual del CP/M puede pedirse que el CP/M controle si el 
disquete ha sido cambiado. Después de esta solicitud, el CP/M examina las 
entradas del directorio con las que ha trabajado y, si detecta que el disquete 
ha sido cambiado, declara que el disquete completo está en condiciones de 
sólo lectura e inhibe cualquier escritura posterior en el mismo. Esta 
situación tendrá efecto hasta que se realice la siguiente operación de 
arranque caliente. Un arranque caliente se realiza cuando termina un 
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programa o cuando se introduce un CONTROL-C en el CCP, reinicializando 
el sistema operativo. 

El valor del WACD es la dirección de una memoria intermedia o área de 
almacenamiento temporal, que el CP/M puede utilizar para comprobar el 
directorio. La longitud de esta memoria intermedia está definida (algunas 
veces fuera de lugar) en el bloque de parámetros de disco. 


Vector de situación (ALVECO) El CP/M visualiza cada disco como un conjunto 
de bloques, asignando bloques a los ficheros individuales según éstos van 
siendo creados o expandidos, así como ir abandonando bloques según se 
van borrando los ficheros. 

El CP/M necesita algún mecanismo para mantener información de los 
bloques que se usan y los que están libres. Utiliza el vector de situación para 
formar un mapa de bits, donde cada bit del mapa corresponde a un bloque 
especifico. El bit más significativo (el 7) del primer byte corresponde al 
primer bloque, número 0. El bit 6 corresponde al bloque 1, y así 
sucesivamente para todo el disco. 

Siempre que se requiere del CP/M que utilice un disco lógico, el CP/M 
examinará el disco. Esto consiste en leer el directorio de ficheros y, para 
cada entrada o extensión activas, interaccionar con los bloques que “posee” 
la entrada o extensión de que se trate. Para cada número de bloque de la 
extensión, el bit correspondiente del vector de situación se pone a 1. Al final 
de este proceso, el vector de situación representará cuidadosamente un 
mapa sobre los bloques que están en uso y los que están libres. 

Cuando el CP/M está buscando un bloque de situación no utilizado, 
trata de encontrar uno próximo al último utilizado, con el fin de evitar que 
los ficheros queden demasiado fragmentados. 

Con el fin de reservar espacio suficiente para el vector de situación, es 
preciso reservar un bit por cada bloque. El cálculo del número de bloques se 
trata en la sección “Número máximo de bloques”, que se encuentra más 
adelante en este mismo capitulo. 


Bloque de parámetros del disco 


El bloque de parámetros del disco en versiones anteriores del CP/M 
estaba construido en el BDOS y era un secreto celosamente guardado del 
sistema de ficheros del CP/M. Para hacer el CP/M adaptable a sistemas de 
disco rígido, Digital Research decidió desplazar el bloque de parámetros al 
BIOS, en el que cualquiera puede adaptarlos. Debido a la naturaleza 
particular del sistema de ficheros del CP/M, se encontrarán aun algunos 
espacios aparentemente sobrantes y la explicación que se da aquí puede 
parecer algo superficial. Sin embargo, la falta de aclaraciones no disminuye 
en absoluto la capacidad para utilizar el CP/M como herramienta. 
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La figura 3-6 muestra el programa necesario para definir un bloque de 
parámetros para disquetes de 8 pulgadas, de una sola cara. Esta tabla está 
apuntada por una entrada en la tabla cabecera de parámetros del disco —es 
decir, su dirección está dada en ésta—. Cada una de las entradas que se 
muestran en el bloque de parámetros del disco está explicada en las 
secciones siguientes. 


Sectores por pista Es el número de sectores de 128 bytes por pista. El disquete 


normalizado presentado en el ejemplo tiene 26 sectores. Como puede verse, 
el hecho de indicar que el CP/M tiene 26 sectores por pista no aclara si el 
primer sector está numerado 0 ó 1. El CP/M supone que el primer sector 
es 0); se encomienda a una subrutina de traducción de sectores el que halle 
a qué sector material corresponde. 

Los discos rigidos tienen normalmente un tamaño de sector mayor de 
128 bytes. Esto se trata en la sección de consideraciones para discos rigidos. 


Desplazamiento de bloques, enmascaramiento y máscara de extensión 


Estos campos de nombre misterioso se utilizan dentro de CP/M durante las 
operaciones de ficheros del disco. Los valores que se especifiquen para ellos 
dependen, en primer lugar, del tamaño de bloque que se desee. 

El tamaño de bloque puede variar de 1.024 (1K) a 16.384 (16K) bytes. 
Existe un término medio entre estos dos extremos, como se indicó en la 
sección de bloques, al principio de este capítulo. 

Se requiere un tamaño de bloque de 1.024 (1K) bytes para disquetes con 
capacidades de más de un megabyte, y un tamaño de bloque de 4.096 (4K) 
bytes para disquetes mayores o discos rígidos. 

Si se puede definir el tamaño de bloque que se desea usar, pueden 
seleccionarse entonces los valores para el desplazamiento de bloques y el 
enmascaramiento de bloques en la tabla 3-1. 





0000 1A00 
0002 03 
0003 07 
0008 03 


0007 3500 
0009 co 


000D 0200 








DPEO: 
26 
De 3 
Da 7 
De 3 
E 242 
E] ss ¿Número de entradas al directorio=1 
De 1100800008 ¿Mapa de bits para Los bloques usados 
De O00080000B ; por el directorio 
E 16 ¿Número de bytes en La memoria de comprobación del directorio 
De 2 ¿Número de pistas antes del directorio 





Figura 3-6. Declaraciones de datos para el bloque de parámetros del disco para disquetes 


normalizados. 





A a 


Capitulo 3: El sistema de ficheros del CP/M 41 


Tabla 3-1, Valor del desplazamiento y el enmascaramiento de bloques. 


“Tamaño del bloque Desplazamiento de bloque Máscara de bloques 








Hay que seleccionar el tamaño del bloque requerido en la columna de la 
izquierda, la tabla indica entonces los valores de desplazamiento y enmasca- 
ramiento de bloque que hay que introducir en el bloque de parámetros del 
disco. 

La última de estas tres variables, la máscara de extensión, depende no 
sólo del tamaño del bloque, sino también de la capacidad total de memoria 
del disco lógico. En cuanto a esta última consideración sólo es importante 
para el cálculo el hecho de que haya o no menos de 256 bloques en el disco 
lógico. Para comprobarlo únicamente hay que dividir la capacidad del 
disco lógico por el tamaño del bloque elegido y ver si resultan menos de 256 
bloques. 

Manteniendo en la mente esta respuesta y el tamaño del bloque, 
consúltese la tabla 3-2 para obtener el valor adecuado para el campo de 
máscara de extensión del bloque de parámetros. Selecciónese la línea 
adecuada según el tamaño del bloque elegido. Entonces, según el número 
total de bloques del disco lógico, selecciónese la máscara de extensión en la 
columna correspondiente. 











Número máximo de bloques Este valor es el número del último bloque del disco 
lógico. Como el primer número de bloque es 0, este valor es menor en una 
unidad que el número total de bloques del disco. Cuando exista únicamente 
un bloque parcial, el número de bloques se redondea por defecto. 


Tabla 3-2. Valores de la máscara de extensión. 











[ Número de bloques 1] 
Tamaño del bloque 

| La 255 De 256 en adelante 

1.024 0 Imposibl 

2.048 1 h En Ne) 

4.096 a 1 

8.192 7 3 

16.384 15 y 
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Número de entradas del 


La figura 3-7 presenta un ejemplo para disquetes de 8 pulgadas, de una 
sola cara y simple densidad. Obsérvese que el CP/M utiliza dos pistas 
reservadas en el formato de este disquete. 





rectorio menos 1 No debe confundirse esta entrada 
con el número de ficheros “que pueden almacenarse en el disco lógico; es 
únicamente el número de entradas (menos una). Cada extensión de cada 
fichero toma una entrada del directorio, por lo que ficheros muy grandes 
consumirán bastantes entradas. Obsérvese también que el valor en la tabla 
es menor en una unidad que el número de entradas. 

En un disquete normalizado de 8 pulgadas, el valor es de 63 entradas. 
En un disco rígido, puede desearse utilizar 1.023 o bien 2.047. Recuérdese 
que el CP/M realiza un examen secuencial a través del directorio y que éste 
lleva una cantidad apreciable de tiempo. Por tanto, habrá que equilibrar el 
número de discos lógicos con la estimación del tamaño del mayor fichero 
que se desee soportar. 

Como nota final, habrá que asegurarse de elegir un número de entradas 
que se ajuste igualmente a uno o más bloques. Cada entrada del directorio 
necesita 32 bytes, de forma que puede calcularse el número de bytes 
requerido. Hay que asegurarse de que este número sea divisible por el 
tamaño del bloque que se ha elegido sin que quede ningún resto. 


Bloques para el directorio Este es un valor raro; no es un número, sino un mapa 


de bits. Al mirar la figura 3-6 se observa que el valor ejemplo está 
totalmente escrito en binario, para explicar cómo se define este valor. Este 
valor de 16 bits posee un bit puesto a 1 para cada bloque que ha de 
utilizarse para el directorio. 








Características físicas: Calcular: 
77  Pistas/disquete 77  Pistas/disquete 
26  Sectores/pista — 2 Pistas reservadas para CP/M 
128  Bytes/sector 75 Pistas para almacenamiento de ficheros 
2 Pistas reservadas para CP/M x26 Número de sectores 
1.024  Bytes/bloque 1.950 Sectores para almacenamiento de ficheros 


«128 — Bytes por sector 
Bytes para almacenamiento de ficheros 
Bytes/bloque 
Número total 
de bloques 
242 Número del último bloque 
(redondeado y basado 
en que el primer bloque 
es el bloque 0) 








Figura 3-7. 


Cálculo del número máximo de bloques para disquetes normalizados. 
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Este valor se calcula a partir del número de entradas del directorio que 
se desea tener en el disco y del tamaño del bloque que se desea usar. Una 
constante en este cálculo es que el tamaño de todas las entradas del 
directorio es de 32 bytes. 

En el ejemplo se requieren 64 entradas (recuérdese que el número 
indicado es uno menos que el valor requerido). Cada entrada tiene 32 bytes. 
El número total de bytes requerido por el directorio es entonces de 64 veces 
32, o sea, 2.048 bytes. Dividiendo éste por el tamaño del bloque, que es 
1.024, resulta que hay que reservar dos bloques para el directorio. En el 
valor del ejemplo puede verse que se colocan los dos bits más significativos 
del valor de 16 bit 

Una advertencia: no debe caerse en la tentación de declarar este valor 
utilizando una pseudo operación DW (definición de palabra). Al actuar así 
se almacena el valor invertido por bytes. 








Tamaño de la memoria intermedia para comprobación del directorio Como 
se ha indicado anteriormente, al tratar sobre la cabecera de parámetros del 
disco, el CP/M puede ser utilizado para comprobar las entradas del 
directorio siempre que esté trabajando en éste. Para hacer esto, el CP/M 
necesita un área de comprobación, denominada área de trabajo para 
comprobar los disquetes cambiados, o WACD, en la cual puede mantenerse 
trabajando variables que conservan un registro comprimido de lo que está 
en el directorio. La longitud de esta área de memoria intermedia se conserva 
en el bloque de parámetros del disco; su dirección se especifica en la 
cabecera de parámetros. Comoquiera que el CP/M conserva una grabación 
comprimida del directorio, se necesita solamente proveer un byte para cada 
cuatro entradas al directorio. Como puede verse en la figura 3-6, hay 16 
bytes para mantener información de las 64 entradas del directorio. 


Número de pistas antes del directorio La figura 3-8 muestra la disposición del 
CP/M en un disquete. Como puede verse, las dos primeras pistas están 
reservadas, conteniendo el código inicial de arranque en frío y al propio 
CP/M. El ejemplo de la figura 3-6, que presenta el código para un disco 
flexible normalizado, muestra dos pistas reservadas (número de pistas 
reservadas antes del directorio). 

Este valor de desplazamiento de pistas, como se denomina a veces, 
procura un método conveniente para la división de un disco fisico en varios 
discos lógicos. 


Consideraciones especiales para discos rígidos 


Si se desea que el CP/M trabaje con un disco rígido, hay que procurarse 
un programa y construir tablas que hagan que el CP/M trabaje como si 
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Figura 3-8. Disposición de un disquete normalizado. 


estuviera funcionando con un disco flexible muy amplio. También habrá 
que incluir sectores de 128 bytes. Sin embargo, esto no presenta dificultad 
alguna. 

Para adaptar discos rígidos al tamaño de sector de 128 bytes, hay que 
proveerse de un programa en el controlador de disco en el BIOS, de manera 
que parezca que se está leyendo y escribiendo en sectores de 128 bytes, 
aunque esté trabajando realmente en sectores de 512 bytes. Este programa 
se denomina rutina de bloqueo/desbloqueo. 

Si los discos rigidos tienen tamaños de sector distintos de 128 bytes, 
¿cuál habrá de ser el número de sectores por pista y cuál el número de 
pistas? 

Los discos rigidos existen en todos los tamaños. La situación es más 
confusa en los controladores de disco, el hardware que controla el disco. En 
muchos casos se puede considerar el disco como una serie de sectores sin 
ninguna clase de pistas. El controlador, dando un número de sector relativo 
por medio del BIOS, puede traducir este número de sector en: la pista, la 
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cabeza de lectura/escritura (si existe más de una) y el sector que se esté 
utilizando prácticamente. 

Además, muchos discos rigidos giran tan rápidamente que no se gana 
nada utilizando un algoritmo de desplazamiento de sectores. No existe 
ningún medio de leer más de un sector físico por revolución; no hay tiempo 
suficiente. 

En muchos casos es deseable dividir un disco rigido único en varios 
discos lógicos más pequeños, lo que se hace principalmente por razones de 
rendimiento: Discos pequeños, con directorios menores, se traducen en 
operaciones de fichero más rápidas. 

La cabecera de parámetros del disco tendrá ceros para la entrada 
desplazamiento de sectores y el apuntador para la memoria intermedia 
WACD. En general, los discos rígidos no pueden cambiarse, al menos no sin 
desconectar el aparato y cambiar toda la unidad de disco. Si se utiliza uno 
de los discos de la nueva generación que son discos rígidos transportables, 
se necesitará utilizar la comprobación de directorio de CP/M. 

El bloque de parámetros del disco para un disco rigido será muy 
diferente del usado para un disquete. El número de sectores por pista 
necesita ser cuidadosamente considerado. Recuérdese que este es el número 
de sectores de 128 bytes. La conversión del tamaño del sector fisico a 
sectores de 128 bytes se hará en el controlador del disco en el BIOS. 

Si se tiene un controlador de disco que trabaja en términos de sectores y 
pistas, todo lo que se necesita es calcular el número de sectores de 128 bytes 
en cada pista. Multiplicando el número de sectores físicos por pista por su 
tamaño en bytes y dividiendo entonces el resultado por 128 se obtiene el 
número de sectores de 128 bytes por cada pista física. 

Pero ¿qué ocurre con los controladores que visualizan sus discos rígidos 
como una serie de sectores sin referencia a pista alguna? Oscurecen el hecho 
de que los sectores están colocados en pistas concéntricas sobre la superficie 
del disco. En este caso puede usarse un truco en el CP/M. Puede ponerse el 
valor de los “sectores por pista” al número de sectores de 128 bytes que se 
encajan dentro de los sectores físicos del disco. Para realizar esto hay que 
dividir el tamaño del sector físico entre 128. Por ejemplo, un tamaño de 
sector físico de 512 bytes dará un resultado de cuatro sectores de 128 bytes 
por “pista”. Ahora podrá visualizarse el disco duro como si se tuvieran 
tantas “pistas” como sectores físicos. Utilizando este método se evita tener 
que realizar toda clase de operaciones aritméticas en los números de sector 
de CP/M; el número de “pista” que CP/M solicitará al BIOS para mover las 
cabezas de disco será el sector físico relativo. Una vez que el controlador ha 
leído este sector físico, puede mirarse el número de sector de 128 bytes, que 
será 0, 1, 2 6 3 (para un sector físico de 512 bytes) con el fin de seleccionar 
cuáles de los 128 bytes es necesario sacar o introducir en la memoria 
intermedia del disco. 

El desplazamiento de bloques, la máscara de bloque y la máscara de 
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extensión se calcularán como se ha indicado anteriormente. Hay que 
utilizar un tamaño de bloque de 4.096 bytes. Esto dará un valor de 5 para el 
desplazamiento, 31 para la máscara de bloque y, teniendo en cuenta que se 
tendrán más de 256 bloques para cada disco lógico, un valor de 1 para la 
máscara de extensión. 

El número máximo de bloque se calculará como se ha hecho anterior- 
mente. Hay que tener presente que o bien se trabaja con el número de 
sectores físicos (que serán mayores de 128 bytes) o con sectores de 128 
bytes cuando se calcula la capacidad de almacenamiento de cada disco 
lógico. 

El número de entradas del directorio (menos 1) óptimo es de 511 para 
discos lógicos de 1 megabyte y de 1.023 ó 2.047 para discos mayores. 
Recuérdese que con la versión 2 de CP/M no se puede tener un disco lógico 
mayor de 8 megabytes. 

Los bloques para el directorio se calculan también como se ha indicado 
para los discos. 

En general, el tamaño de la memoria intermedia del directorio (WADC) 
se pondrá a 0, ya que no hay necesidad de usar esta característica en 
sistemas de discos rígidos estancos. 

El número de pistas antes del directorio puede utilizarse para dividir 
el disco físico en discos lógicos más pequeños, como se muestra en la figu- 
ra 3-9. 

No existen reglas que indiquen que las pistas anteriores al directorio del 
disco lógico no puedan ser utilizadas para contener otros discos lógicos 
completos. Esto puede verse en la figura 3-9, CP/M se comporta como si 
cada disco lógico empezase en la pista O (y naturalmente es así), pero al 
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Figura 3-9. División de discos rígidos en discos lógicos. 
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Características físicas: Calcular: 

364 — Pistas/disco 

20 Sectores/pista A: 

512 Bytes/sector 48 Pistas asignadas al disco 
10.240 Bytes/pista x 10.240 Bytes/pista 

491.520 1. Bytes/disco 
a 2048 96 — Bytes/bloque 
Características lógicas elegidas: 240 382,5 Número de bloques 
se Tamaño 239 381 Número de bloque máximo 
Pistas de bloque 

Arca reservada 10 n/a 
Disco 48 2048 
Disco 153 4096 
Disco C: 153 4096 














Figura 3-10. Cálculo del número de bloque máximo para un disco rigido. 


aumentar el número de pistas antes de cada directorio, los discos lógicos 
pueden alternarse a través del espacio disponible en el disco fisico. 

La figura 3-10 muestra los cálculos relacionados con la primera fase de 
la construcción de los bloques de parámetros del disco para el disco rígido 
presentado en la figura 3-9. Las características materiales son las impuestas 
por el diseño del disco rigido. El programador no tendrá ningún control 
sobre ellas, pero podrá elegir, sin embargo, cuánto disco físico se asigna a 
cada disco lógico, el tamaño del bloque y el número de entradas del 
directorio. Como puede verse, el disco lógico A es mucho menor que los 
discos B y C y estos últimos son del mismo tamaño. El disco A será el disco 
de sistema desde el que se cargarán la mayoría de los programas, por lo que 
el tamaño menor de su directorio hará que el cargar los programas sea 
mucho más rápido. El tamaño del bloque para el disco A es también 
menor, con el fin de reducir la cantidad de espacio desperdiciado en bloques 
parcialmente ocupados. 

La figura 3-10 muestra también los cálculos relacionados con la 
búsqueda del número máximo de bloques. Nótese nuevamente que, una vez 
calculado el número total de bloques, es necesario redondear por defecto, 
en el caso de que algunos de los componentes sean fraccionarios, y restar 
luego 1 para obtener el número máximo (siendo 0 el primer bloque). 

La figura 3-11 muestra los valores prácticos que se situarán en los 
bloques de parámetros. Se supone que el controlador de disco es uno del 
tipo de los que visualizan el disco físico como una serie de sectores 
contiguos sin hacer referencia a las pistas; la electrónica interna y el 
“firmware” del controlador cuidan de estos detalles. Por esta razón, se dice 
que cada sector material es una “pista” en términos del CP/M. Cada 
“pista” tiene 512 bytes y, por tanto, puede almacenar cuatro sectores de 128 
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DPBA: DPBR) pPaC: 
. . 4 ¡Sectores de 128-bytes/pista 
4 s 5 ¿Desplazamiento de bloques 
15 a EN ¿Máscara de bloques 
1 1 1 ¿Máscara de extensión 
299 381 301 ¿Máxino de bloques £ 
255 1029 1023 ¿Número de entradas al directorio 
AX110000B 11111111B 111111118 ¿Mapa de bits de Los bloques usados 
1000000008 8; por el directorio 
o o ¿Número de bytes en La memoria intermedia de comprobación del directorio 
(10) (58) (211) ¿Pistas reales antes del directorio 
200 1160 4220 ¿UPistas" antes del directorio 





Figura 3-11. Tablas de parámetros de disco para un disco rígido. 


bytes. Como puede verse, este es el valor que se encuentra en el campo 
sectores/““pista”. 

Los valores de desplazamiento y enmascaramiento de bloque se obtie- 
nen de la tabla 3-1, utilizando el tamaño de bloque elegido previamente. 
Entonces, con el tamaño del bloque y el número máximo de bloques (véase 
figura 3-10), la máscara de extensión puede obtenerse de la tabla 3-2. En la 
figura 3-11 puede verse que los valores de la máscara de extensión de 1 
fueron obtenidos de la misma manera para los tres discos lógicos, aunque se 
han elegido dos tamaños distintos de bloque, y aunque el disco A tiene 
menos de 256 bloques y los discos B y C tienen más. 

El mapa de bits que muestra los bloques que se requieren para mantener 
el directorio de ficheros se calculan multiplicando el número de entradas al 
directorio por 32 y dividiendo el producto por el tamaño del bloque. El 
resultado es de 4 para el disco A y de 8 para los discos B y C. Como puede 
verse, el mapa de bits tiene fijado el número apropiado de bits. 

Comoquiera que la mayoría de los discos rígidos que existen hoy en día 
en el mercado no son transportables, la longitud de la memoria intermedia 
para control del directorio se pone a cero. 

El número de “pistas” antes del directorio requiere un toque de gracia 
final. Habiendo indicado ya al CP/M que cada “pista” tiene cuatro sectores, 
es preciso continuar de la misma forma y expresar el número de pistas 
reales antes del directorio en unidades de sectores físicos de 512 bytes. 

Como nota final, si se especifican estos bloques de parámetros para un 
controlador de disco que requiere que se comunique con él en términos de 
pistas físicas y sectores de 128 bytes, entonces el número de sectores por 
pista debe colocarse en 80 (veinte sectores de 512 bytes por pista física). Por 
tanto, habrá que cambiar el número de pistas antes del directorio expresan- 
do el número de pistas físicas (mostrado entre paréntesis en la figura 3-11). 


Adición de nueva información al bloque de parámetros 


Normalmente, debe asociarse alguna información adicional con todo 
disco lógico. Por ejemplo, en un sistema que tenga varios discos físicos, es 


a 
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preciso identificar dónde reside cada disco lógico.También puede desearse 
identificar cualquier otro parámetro físico como tipo de unidad de disco, 
números de puertos de entrada/salida y dirección de las subrutinas de 
control, 

Puede surgir la tentación de extender la cabecera de parámetros del 
disco al existir una entrada separada para cada disco lógico. Pero la 
cabecera de parámetros del disco es exactamente de 16 bytes de longitud; 
añadiendo más bytes se hace más dificil la aritmética necesaria a utilizar en 
el BIOS. El mejor lugar para colocar este tipo de información es prefijarlo 
en el principio de cada bloque de parámetros de disco. La etiqueta al 
principio del bloque debe dejarse en el mismo sitio para que el CP/M no se 
confunda. Unicamente un programa adicional especial escrito por el 
programador será lo suficientemente “astuto” como para mirar delante del 
bloque con el fin de encontrar esta información adicional. 





Organizaciones de ficheros 














El CP/M soporta dos tipos de ficheros secuenciales y de acceso directo o 
aleatorios. El CP/M visualiza ambos tipos como constituidos por una serie 
de registros de 128 bytes. Obsérvese que en términos del CP/M un registro 
es lo mismo que un sector de 128 bytes. Esta terminología a veces puede 
dificultar la comprensión. Puede ser una ayuda el pensar en los sectores de 
128 bytes como registros materiales. Los programas de aplicación manipu- 
lan registros lógicos que poseen poca o ninguna relación con estos registros 
físicos. Existe código en los programas de aplicación para manipular 
registros lógicos. 

El CP/M no impone restricciones a los contenidos de un fichero, En 
muchos casos, sin embargo, se utilizan ciertos convencionalismos cuando se 
almacenan datos de texto. Cada línea de texto se acaba con los caracteres 
ASCII CARRIAGE RETURN (retorno de carro) y LINE FEED (salto de línea. El 
último sector de un fichero de texto se llena con caracteres ASCII SUB, 1AH 
en hexadecimal. 





Bloques de control de fichero 


Con el fin de conseguir que CP/M trabaje sobre un fichero se necesita 
procurar una estructura en la cual tanto el programador como el BDOS 
puedan mantener detalles relevantes sobre el fichero, su nombre y tipo, etc. 
El bloque de control de fichero (FCB) es una derivación de la entrada del 
directorio de ficheros, como puede verse en la figura 3-12. Esta figura 
muestra tanto una serie de igualdades, que pueden utilizarse para acceder a 
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una entrada, como una serie de instrucciones DB (definición de byte) para 
presentar un ejemplo. 

La primera diferencia que puede apreciarse entre la entrada del directo- 
rio de ficheros y el FCB es que el primer byte sirve para un propósito 
diferente. En el FCB se utiliza para especificar en qué disco se encuentra el 
fichero. Recordemos que en el directorio este byte indica el número de 
usuario para una entrada determinada. Cuando se procesan prácticamente 
los ficheros, el número de usuario en curso se fija bien por el operador en 
una orden de consola o bien mediante una llamada a función del BDOS; 
esto predefine qué subconjunto de ficheros del directorio será procesado. 
Por consiguiente, el FCB no necesita mantener información del número de 
usuario. 

El número de disco está almacenado en el primer byte del FCB de forma 
rara. Un valor 0 indica al CP/M que tiene que buscar el fichero en el disco 
por defecto en curso. Este disco por defecto se selecciona bien por medio de 
una entrada desde la consola o bien haciendo una llamada específica al 
BDOS dentro de un programa. En general, el disco por defecto debe 
prefijarse en el disco que contiene el conjunto de programas con los que se 
esté trabajando, lo que evita mecanografiado innecesario en el teclado 
cuando se quiere cargar un programa. 

Un valor de disco distinto de O representa una letra del alfabeto, basado 
en un esquema de codificación sencillo de A=1, B=2, etc. 

Como puede verse en la figura 3-12, el nombre y tipo de fichero deben 











- FCBESDISK EU o ¿Unidad de disco (0 = por defecto, 1=4) 
- FOBESNAME EQU 4 ÍNombre de Fichero 
- FCBESTYP Eu ¿Tipo de fichero 
¿Sobrante de bits usados para tipo 

á FC Eu? ¿Bit 7. = 1 sólo Lectura 

FCBESSYS EQU 10 JBit 7 = 1 — modo sistema 
. FOBESCHANOE EQU 1L ¿Bit 7 =0= fichero escrito 
- FCBESEXTENT EQU 12 ¿Número de extensión 

313, 16 reservado para CP/M 

- FCBESRECUSED EQU 18 ¿Registros utilizados en esta extensión 
: FOBESABUSED EQU 16 ¿Bloques utilizados 
- FCBESSEOREC EQU 32 JRegistro secuencial para Lectura/escritura 
. FCBESRANREC O EQU 33 ¿Registro de acceso directo para Lectura/escritura 
s o Jayte de desbordamiento de registro secuencial 

: 
00 FcesDISKk: o ¡Búsqueda en unidad de disco por defecto 
AGADACADAEFCBINAMES “E ILENAME- ¿Nombre de fichero 
343950 FCBSTYP: <1vp- ¿Tipo de fichero 
90 FCBHEXTENTS o ¿Extensión 
0000 FCBARESVI 0,0 ¿Reservado para P/N 
00 FCBSRECUSED: o ¿Registros Utilizados en esta extensión 
9000000000F CBABUSED: 0,0,0,0,0,0,0,0 — ¿Bloques utilizados 
0000000000 9;0,0,0,0,0,0,0 
00 ECBSSEORECE o ¡Registro secuencial para Lectura/escrítura 
9000 FCBSRANRECS o JRegistro de acceso directo para Lectura/eserítura 
00 FCBSRANRECO: o ¿Byte de desbordamiento de registro secuencial 








Figura 3-12. Declaraciones de datos para el FCB. 
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ser prefijados en los valores requeridos y, para el proceso de ficheros 
secuenciales, el resto del FCB puede ponerse a cero. Hablando estrictamen- 
te, los últimos tres bytes del FCB (el número de registro de acceso aleatorio 
y el byte de desbordamiento de registro de acceso aleatorio) tampoco 
necesitan ser declarados si no se va a procesar nunca el fichero en acceso 
directo, 

Esto conduce a un punto conceptual sutil. Los ficheros de acceso directo 
lo son únicamente porque el programador los procesa de esta forma. Aun- 
que esto suena a perogrullada, significa que los ficheros de CP/M no son 
intrínsecamente ni de acceso aleatorio ni secuenciales. Lo que sean depende 
de la elección del programador al procesarlos en cada punto determinado. 
Por consiguiente, comoquiera que la forma en que se procesan será dife- 
rente, no existe ningún aditamento especial en el fichero que indique cómo 
ha de utilizarse. 


Ficheros secuenciales 


Un fichero secuencial comienza al principio y acaba al final. Puede verse 
como una sucesión de registros de 128 bytes. 

Para crear un fichero secuencial, hay que declarar un bloque de control 
de fichero con el nombre y tipo de fichero requeridos y solicitar al BDOS 
que lo cree. Entonces puede solicitarse al BDOS que escriba “registro” por 
“registro” (realmente sector de 128 bytes por sector de 128 bytes) en él. El 
BDOS se ocupará de abrir nuevas extensiones si es necesario. Cuando se 
han escrito todos los datos, hay que solicitar al BDOS que cierre el fichero. 

Para leer un fichero existente se necesitará también un FCB con el 
nombre y tipo de fichero requerido ya declarado. Entonces se requiere al 
BDOS para que abra el fichero para el procesamiento y una serie de 
peticiones de lectura secuencial, cada una de las cuales lleva al próximo 
registro hasta que o bien el programa detecta una condición de final de 
fichero (mediante el examen de los datos que se reciben del mismo) o bien 
el BDOS descubra que no existen más sectores que leer en él. No hay 
necesidad de cerrar un fichero del que se han estado leyendo datos —pero es 
preferible cerrarlo—. Esto no es necesario si se va a hacer funcionar el 
programa únicamente con el CP/M, pero sí es necesario si se desea trabajar 
con MP/M (la versión para múltiples usuarios del CP/M). 

¿Qué ocurre si se necesita añadir más información a un fichero existente? 
Una opción es crear un nuevo fichero, copiar el existente en el nuevo y 
empezar entonces a añadir datos al final del nuevo fichero. Afortunadamen- 
te, con CP/M esto no es necesario. En el FCB que se usa para leer un 
fichero, el nombre y tipo estaban especificados, pero puede especificarse 
también el número de extensión. Si se hace así, el BDOS procederá a abrir 
(si lo encuentra) el número de extensión que se le solicita. Si el BDOS abre 
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la extensión satisfactoriamente, todo lo que hace falta es comprobar si el 
número de registros utilizado en la extensión (contenido en el campo 
FCBSRECUSED) es menor de 128 (80H). Esto indica que la extensión no 
está llena. Tomando este número y colocándolo en el byte FCBSSEQREC 
(número de registro secuencial) del FCB, puede hacerse que CP/M salte 
hacia delante y empiece a escribir desde el final efectivo del fichero. 


Ficheros de acceso aleatorio (acceso directo) 


Los ficheros de acceso aleatorio utilizan una sencilla variación de la 
técnica que acabamos de describir. La principal diferencia es que el número 
de registro ha de ser prefijado en el FCB. El BDOS mantiene automática- 
mente la información de las extensiones de fichero durante las peticiones de 
lectura/escritura aleatoria. (Estas peticiones se explican más ampliamente 
en el capítulo 5.) 

Conceptualmente, los ficheros aleatorios necesitan un pequeño viraje del 
pensamiento. Después de crear un fichero en la forma descrita anteriormen- 
te, hay que prefijar el número de registro en el FCB antes de solicitar 
cualquier escritura. Esto es un valor de dos bytes denominado FCBSRAN- 
REC en la figura 3-12. Entonces, cuando se da la instrucción de escritura 
aleatoria al BDOS, éste mirará el número de registro, calcula en qué 
extensión debe existir el registro; si es necesario, crea la entrada de 
directorio para la extensión, y, finalmente, escribe los datos. Utilizando este 
esquema, se puede avanzar y retroceder rápidamente en el fichero colocan- 
do registros al azar en todo el espacio de fichero, con CP/M creando las 
entradas de directorio necesarias cada vez que se aventura en una parte del 
fichero que aún no ha sido escrita. 

La misma técnica se utiliza para leer un fichero de acceso directo. Se fija 
el número de registro en el FCB y entonces se realiza una llamada al BDOS 
para que abra la extensión correcta y lea los datos. El BDOS devolverá un 
error si no puede encontrar la extensión requerida o si este registro 
particular no existe. 

Para el irreflexivo existen problemas de espera. Antes de empezar a leer 
o escribir, es preciso abrir el fichero en la extensión 0, aun cuando esta 
extensión puede no contener ningún registro de datos. Para un nuevo 
fichero, esto puede hacerse con la petición de creación de fichero, y para uno 
existente con la petición normal de apertura de fichero. Si se crea un fichero 
esparcido, que presente huecos entre los datos, pueden surgir problemas al 
manipularlo. Ocurrirá que tiene varias extensiones, cada una de ellas 
parcialmente llenas, lo que engañará a algunos programas que normalmen- 
te procesan ficheros secuenciales, al no esperar ver una extensión parcial- 
mente llena, excepto al final de un fichero, y puede colocarse al final en un 
sitio equivocado. 
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El procesador 
de órdenes de consola 
(CCP) 





El procesador de órdenes de consola procesa las órdenes que se 
introducen desde la consola. Como se recordará de la breve introducción 
hecha en el capítulo 2, el CCP se carga en la memoria inmediatamente 
debajo del BDOS. En la práctica, muchos programas escriben deliberada- 
mente encima del CCP, a fin de usar la memoria que ocupa normalmente. 
Esto proporciona al programa una cantidad adicional de 800H bytes (2K 
bytes). 

Cuando uno de estos “programas transitorios” termina, cede el control 
al BIOS, que a su vez vuelve a cargar una nueva copia del CCP desde las 
pistas del sistema del disco a la memoria y entonces le transfiere el control 
Por consiguiente, el CCP tiene una existencia esporádica —una serie 
interminable de cargas en la memoria, aceptando una orden del programa- 
dor en la consola, escribiéndose sobre él el programa que se solicita sea 
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cargado y siendo llevado otra vez a la memoria cuando el programa 
termina. 

Este capitulo trata acerca de lo que el CCP realiza en estos breves 
períodos en que se encuentra en memoria. 





Funciones del CCP 











Expresado sencillamente, una vez que el CCP posee el control de la 
máquina, también lo posee el programador. El CCP anuncia su presencia 
mostrando un aviso de dos caracteres, una letra del alfabeto para indicar el 
disco en curso y un signo “mayor que”. En el ejemplo A>, la “A” significa 
que el disco en curso por defecto es A, y el “>”, que el mensaje ha sido 
producido por el CCP. 

Una vez visto el aviso, el CCP está preparado para que el programador 
introduzca una línea de órdenes. Una línea de órdenes consiste en dos 
partes principales: el nombre de la orden y, opcionalmente, algunos valores 
para la orden. Esta última parte se conoce con el nombre de parámetros de 
la orden o cola de la orden. 

La orden en sí misma puede ser una de estas dos cosas: bien un nombre 
de un fichero o bien el nombre de una de las órdenes incorporadas al CCP, 
de uso frecuente. 

Al introducir el nombre de una de las órdenes incorporadas al CCP, éste 
no necesita ir al disco para cargar el programa para ejecución. El código 
ejecutable está ya en el CCP. 

Si el nombre de la orden no corresponde a ninguna de las permanentes 
(éste posee una tabla con dichos nombres), el CCP elegirá la unidad de 
disco lógico adecuada para un fichero con este nombre y tipo “COM” 
(abreviatura de comando, orden). No se introduce COM cuando se está 
llamando a una orden —el CCP supone “COM” como tipo de fichero. 

Si el nombre del fichero COM no va precedido de una especificación de 
la unidad de disco lógico, el CCP buscará en la unidad de disco por defecto 
en curso. Si el nombre del fichero COM va precedido por el de una unidad 
lógica específica, el CCP solamente buscará el programa en esta unidad. Por 
ejemplo, la orden MYPROG provocará que el CCP busque un fichero 
denominado “MYPROG.COM” en la unidad de disco por defecto, mien- 
tras que C:MYPROG hará que el CCP busque únicamente en la unidad C. 

Si se introduce el nombre de una orden que no coincide ni con la tabla 
de órdenes incorporadas al CCP ni con el nombre de ningún fichero 
“COM” en el disco especificado, el CCP sacará el nombre de la orden 
seguido de un signo de interrogación, indicando así que no es capaz de 
encontrar el fichero. 





E O 
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Edición de líneas de órdenes del CCP 


El CCP utiliza una memoria intermedia de una linea para almacenar lo 
que se mecanografía hasta que se pulsa o bien CARRIAGE RETURN O LINE 
FEED. Si se comete un error o se cambia de opinión, se puede modificar una 
orden incompleta, volviendo hasta el punto de error. 

Se edita una línea de órdenes introduciendo caracteres de control desde 
la consola. Los caracteres de control se designan bien por la combinación 
de claves requeridas para generarlas desde el teclado o bien por su nombre 
oficial en el conjunto de caracteres ASCII. Por ejemplo, CONTROL-J se 
conoce también como CARRIAGE RETURN O CR. 

Cuando el CP/M ha de representar caracteres de control, lo convencio- 
nal es indicar el aspecto de “control” de un carácter con un signo “A”, Por 
ejemplo, CONTROL-A aparecerá como “*A”, CONTROL-Z como ““*%Z”, etc. 
Pero si se pulsa la tecla de control con la de cambio a “mayúsculas” y la 
“6”, se producirá un CONTROL-* o “44”. La representación de claves de 
control con este signo solamente es necesaria cuando se extraen estos 
caracteres para la consola o la impresora —interiormente, se mantienen en 
sus valores binarios adecuados. 


CONTROL-C: Arranque en caliente — Si se introduce un CONTROL-C como primer 
carácter de una línea de órdenes, el CCP iniciará una operación de 
arranque caliente. Esta operación reinicializa el CP/M completamente, 
incluido el sistema de disco. Se carga una copia nueva del CCP en la 
memoria y se relee el directorio de ficheros de la unidad de disco por defecto 
en curso, reconstruyéndose el mapa de bits de situación que contiene el 
BIOS (como se indicó en el capítulo 3). 

| La única ocasión en que se iniciará una operación de arranque caliente 

| es después de haber cambiado un disquete (o un disco, si se tienen discos 

duros transportable). Entonces el CP/M reinicializará el sistema de disco. 

Obsérvese que un CONTROL-C inicia un arranque caliente sólo si éste es 

el primer carácter de una línea de órdenes. Si se introduce en otra posición 

| cualquiera, el CCP únicamente lo mostrará en la pantalla como ““*C”. Si se 

han introducido ya algunos caracteres en una línea de órdenes, úsese 

| CONTROL-U O CONTROL-X para cancelar la línea, y entonces CONTROL-C 

para iniciar un arranque caliente. Se nota que se ha realizado un arranque 

caliente al existir una pausa apreciable después del CONTROL-C antes de que 

aparezca el próximo aviso. El sistema necesita un tiempo finito para releer 
el directorio de ficheros y reconstruir el mapa de bits de situación. 





CONTROL-E: Final de línea física La orden de CONTROL-E es una reliquia de los 
días del teletipo y los terminales que no realizan un retorno automático de 
carro y salto de linea cuando el cursor sale de la pantalla por la derecha. 
Cuando se mecanografía un CONTROL-E, el CP/M envía una orden de 
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CARRIAGE RETURN/LINE FEED a la consola, pero no comienza a ejecutar la 
línea de orden que se ha mecanografiado hasta el momento. El CONTROL-E 
es, efectivamente, un final de línea física y no lógica. 

Como puede verse, se necesitará usar esta orden sólo si el terminal 
escribe encima de la propia línea (si se trata de un mecanismo de copia) o si 
no retorna el cursor cuando va a la derecha del final de la línea. 


CONTROL-H: Retroceso CONTROL-H es el carácter ASCII de retroceso. Cuando se 


mecanografía, el CCP mueve el cursor hacia atrás “destructivamente”. 
Debe utilizarse para corregir errores mecanográficos que se descubren antes 
de introducir la línea de órdenes. El último carácter mecanografiado 
desaparecerá de la pantalla. El CCP realiza este trabajo enviando una 
secuencia de tres caracteres: retroceso, espacio, retroceso a la consola. 

El CCP ignora los intentos de retroceso sobre sus propios mensajes. 
También se ocupa del retroceso en el caso de los caracteres de control que 
ocupan dos posiciones de carácter en la línea. El CCP envía la de secuencia 
de caracteres retroceso, retroceso, espacio, espacio, retroceso, retroceso, 
borrando ambos caracteres. 


CONTROL-J: Salto de línea/CONTROL-M: Retorno de carro CONTROL.) es el 


carácter LINE FEED del ASCII, el CONTROL-M es el CARRIAGE RETURN, 
Ambos terminan la línea de orden. El CCP ejecutará entonces la orden. 


CONTROL-P: Eco de impresora La orden CONTROL-P se utiliza para conectar y 


desconectar un dispositivo denominado eco de impresora. Cuando está 
conectado, todos los caracteres enviados a la consola se envían también al 
mecanismo de listado del CP/M. Puede usarse este mando para obtener una 
copia en papel, por ejemplo de la información que normalmente va sólo a la 
consola. 

El CONTROL-P es un “conmutador”. La primera vez que se mecanografía 
CONTROL-P conecta el eco de impresora; la próxima vez que se escribe 
CONTROL-P, lo desconecta. Siempre que el CP/M realiza un arranque 
caliente, el eco de impresora queda desconectado. 

No existe un sistema fácil para saber si el eco de impresora está 
conectado o desconectado. Puede intentarse mecanografiar algunos CA- 
RRIAGE RETURNS, y ver si la impresora responde; si no lo hace, hay que 
mecanografiar CONTROL-P y volver a intentarlo. 

Uno de los defectos en la mayoría de las implementaciones del CP/M 
es que los controladores de la impresora (el software del BIOS que controla 
o “impulsa” la impresora) no se comportan de forma muy inteligente si la 
impresora está desconectada o no preparada cuando el programador o el 
programa le piden que imprima. Bajo estas circunstancias, el software 
esperará eternamente y el sistema quedará como muerto, Por consiguiente, 
cuando se cuelgue el sistema de esta forma al mecanografiar un CONTROL-P, 
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hay que controlar que la impresora está conectada y dispuesta. De otra 
forma, quizá haya que inicializar de nuevo todo el sistema. 


CONTROL-R: Repetir línea de órdenes La orden CONTROL-R hace que el CCP 
repita o vuelva a escribir la línea en curso. El CCP emite un carácter “A” 
un CARRIAGE RETURN/LINE FEED, y después todo el contenido de la 
memoria interna de línea de órdenes. Este dispositivo es muy útil si se está 
trabajando en un teletipo u otro terminal de copia dura y si se han usado 
caracteres RUB O DEL. Como estos caracteres no borran de forma destructi- 
va un carácter, se puede obtener una línea visualmente confusa del texto en 
el terminal. El carácter CONTROL-R proporciona una nueva copia de la línea 
sin ninguno de los caracteres borrados lógicamente. De esta forma se puede 
ver exactamente lo que está mecanografiado en la memoria interna de línea 
de órdenes. 

Véase lo que se trata acerca de los caracteres RUB y DEL como ejemplo 
de CONTROL-R. 


CONTROL-S: Detención de salida por pantalla La orden CONTROL-S es el ca- 
rácter XOFF del ASCII (llamado también DC3); XOFF es una abreviatura de 
“Transmit OfF”. Mecanografiando CONTROL-S se para temporalmente la 
salida a la consola. En una versión estándar del CP/M, el CCP reanudará 
la salida cuando entre algún carácter (incluido otro CONTROL-S) desde la 
consola. Por tanto, se puede usar CONTROL-S como un interruptor para 
conectar y desconectar la salida por la consola 

En algunas implementaciones del CP/M, el propio controlador de la 
consola (código de bajo nivel del BIOS que controla la consola) mantendrá 
un protocolo de comunicación con la consola; por tanto, el modo más 
adecuado para reanudar la salida por la consola después de una pausa 
debida a un CONTROLS es utilizar CONTROL-Q, el XON del ASCIT, o carácter 
de “transmisión”. La introducción de un CONTROL-Q en lugar de fiarse del 
hecho de que todos los caracteres pueden usarse para continuar la salida es 
una forma de evitar fracasos. 

Las órdenes CONTROL-S y CONTROL-Q son las más útiles cuando se 
tienen grandes cantidades de datos en la pantalla. A base de utilizar los 
controles S y Q, puede dejarse que los datos lleguen a la pantalla en 
pequeñas fracciones que pueden leerse fácilmente. 





CONTROL-U o CONTROL-X: Anulación de la línea de orden Las órdenes 
CONTROL-U y CONTROL-X realizan la misma función: Borran la linea de 
órdenes en curso parcialmente introducida, de forma que se pueden anular 
todos los errores y empezar otra vez. La orden CONTROL-U estaba destinada 
originalmente a terminales de copias duras. El CCP muestra un carácter 
“4”, después un CARRIAGE RETURN/LINE FEED y luego algunos espacios 
para dejar el cursor alineado y dispuesto para que se introduzca la próxima 
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línea de órdenes, y deja lo que se había introducido originalmente en la 
línea anterior de la pantalla. CONTROL-X es más propio para las pantallas; el 
CCP retrocede destructivamente al principio de la línea de órdenes, de 
forma que ésta pueda reintroducirse. 


RUB o DEL: Borrado del último carácter La función de borrado (teclas marca- 


das RUB, RUBOUT, DEL O DELETE) borran de forma no destructiva el último 
carácter mecanografiado. Es decir, borra el último carácter en la memoria 
de líneas de órdenes y lo repite en la consola. 

He aquí un ejemplo de una linea de órdenes con los últimos caracteres 
borrados utilizando la clave RUB: 


A>RUN PAYROLLLLORYAPSALES 


DELeted 


Como puede verse, la línea de órdenes se hace rápidamente ilegible. Si se 
pierde la idea de lo que son caracteres de datos y de lo que ha sido borrado, 
Puede usarse CONTROL-R para obtener una nueva copia de lo que está en la 
memoria de líneas de órdenes. 

El ejemplo anterior aparecerá entonces como sigue: 


ASRUN PAYROLLLLORYAPSALESH 
RUN SALES_ 


El carácter “4” se muestra por el CCP para indicar que la línea ha sido 
repetida. El “_” representa la posición del cursor, que está ahora dispuesto 
para continuar con la línea de órdenes. 





Ordenes incorporadas o permanentes 








Cuando se introduce una línea de órdenes y se pulsa CARRIAGE RETURN 
O LINE FEED, el CCP controlará si el nombre de la orden es uno del 
conjunto de las incorporadas. (Posee una pequeña tabla de nombres de él, 
con la cual se contrasta el nombre de la orden introducida.) Si el nombre de 
la orden introducida concuerda con uno de los incorporados, el CCP 
ejecuta la orden inmediatamente. 

Las próximas secciones describen las órdenes incorporadas disponibles; 
sin embargo, para obtener una información más amplia con ejemplos de las 
distintas formas de cada una de ellas, consúltese la Guía de Usuarios del 
CP/M Osborne, segunda edición, de Thom Hogan (Berkeley: Osborne/ 
McGraw-Hill, 1982). 
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X:—Cambio de la unidad de disco implícita La unidad implicita o “por de- 





fecto” es la normalmente activa que el CP/M utiliza para acceder a todos 
los ficheros, siempre que no se mencione una unidad específica. Si se desea 
cambiar la unidad por defecto, introdúzcase simplemente la letra de 
identificación de la nueva unidad que se tomará por defecto seguida de dos 
puntos. El CCP responde cambiando el nombre del disco que aparece en la 
línea de mensaje. 

En los discos rígidos esta simple operación puede necesitar uno o dos 
segundos para completarse, porque el BDOS, al ser requerido por el Ccp 
para que se introduzca en la unidad, debe leer el directorio del disco y 
reconstruir el vector de situación para él. Si se tiene un disquete o un disco 
transportable, cambiándolo y realizando un arranque en caliente se obtiene 
el mismo efecto que renovando la imagen que tiene CP/M de los bloques 
que se han usado y los que hay disponibles. En un disco rígido se tarda 
mucho más, porque, en general, los directorios son mucho mayores. 


DIR—Directorio de ficheros En su forma más sencilla, la orden DIR presen- 


ta una lista de los ficheros situados a modo de directorio con el número 
de usuario en curso (o de grupo de ficheros) y en la unidad por defecto en 
curso. Por tanto, cuando no se solicita ningún fichero después de la orden 
DIR, se supone un nombre de fichero **x.*”. Esto es un “comodin” total, 
por lo que aparecerán todos los ficheros que no se hayan puesto en modo 
sistema. Esta es la única orden permanente que actúa de forma que un 
nombre de fichero omitido se entiende como “todos los nombres de fichero 
y todos los tipos de fichero”. 

Se puede llamar al directorio de una unidad distinta especificando la 
unidad en la misma línea que la de la orden DIR. 

Se pueden calificar los ficheros que se desee llamar introduciendo un 
nombre de fichero o extensión único o ambiguo. Aparecerán en pantalla 
solamente aquellos ficheros que correspondan a la especificación dada y, 
aún así, sólo aquellos que no están puestos en modo sistema aparecerán en 
la pantalla. (El programa de utilidad estándar del CP/M STAT puede 
utilizarse para cambiar ficheros de modo SYS a modo DIR.) 

Otro efecto secundario de la orden DIR y de ficheros que están en modo 
SYS se ilustrará mejor con un ejemplo. Imagínese que la unidad lógica en 
curso B contiene dos ficheros, denominados SYSFILE (que está en modo 
SYS) y NONSYS (que no lo está). Obsérvese el siguiente diálogo de 
consola, en el cual las entradas que corresponden al operador están 
subrayadas: 


B>DIR<Cr> 

B: NONSYS no aparece el archivo SYS 
B>DIR JUNK<cr> 

NO FILE no existe el JUNK. 


B>DIR SYSFILE<Cr> 
»_ 





60  CP/M Manual para programadores 


¿Comprenden el problema? Si un fichero no está en el disco, el CCP hará 
aparecer NO FILE (o NOT FOUND en versiones anteriores del CP/M). Sin 
embargo, si el fichero existe, pero es un fichero en modo SYS, el CCP no lo 
presentará a causa de su situación; pero tampoco indicará NO FILE. En 
lugar de ello reinserta tranquilamente la indicación. Esto puede inducir a 
confusión si se está buscando un fichero en modo SYS. El único camino 
seguro que existe para saber si existe el fichero es utilizar STAT. 


ERA—Borrado de un fichero La orden ERA borra “lógicamente” ficheros del 


disco (lógicamente porque sólo es afectado el directorio, los bloques de 
datos no cambian). 

El borrado lógico cambia el primer byte de cada entrada al directorio 
que pertenezca al fichero por el valor OESH. Como puede recordarse de lo 
tratado sobre la entrada al directorio en el capítulo 3, este primer byte 
contiene usualmente el número de usuario. Si se pone en OESH. marca la 
entrada como si hubiera sido borrada. 

ERA realiza un repaso completo del directorio de ficheros para borrar 
lógicamente todas las extensiones del mismo. 

Al contrario de DIR, la orden ERA no supone “todos los ficheros, todos 
los tipos” si se omite el nombre de un fichero concreto. Si esto ocurriera 
sería demasiado fácil borrar todos los ficheros por accidente. Hay que 
introducir “x*.*” para borrar todos los ficheros y, aún así, hay que 
confirmar al CCP que realmente se desea borrarlos todos del disco. El 
diálogo práctico se presenta de la siguiente forma: 





Adera *<cr> 
ALL (Y/N)?y<cr> 
> 


Si se cambia de opinión en el último instante, puede pulsarse “n” y el 
CCP no borrará ningún fichero. % 

Un defecto del CCP es que la orden ERA sólo pide confirmación cuando 
se intenta borrar todos los ficheros utilizando un nombre tal como “x.x” o 
**.277”, Considérese el impacto de la orden siguiente: 


APERA 4.C79CN> 
o 


El CCP borra sin vacilar todos los ficheros que tienen un campo tipo de 
fichero que empiece por la letra “C” en el número de usuario en curso del 
disco A. 

Si se necesita usar un nombre de fichero ambiguo en una orden ERA, 
compruébese qué ficheros se borrarán utilizando antes una orden STAT, 
con el mismo nombre de fichero ambiguo exactamente, El STAT mostrará 
todos los ficheros que concuerden con el nombre ambiguo, incluso aquellos 
que están en modo SYS que no aparecerían tras una orden DIR, 
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Existen varios programas de utilidad en el mercado con nombres como 
UNERA o WHOOPS, que toman un nombre de fichero ambiguo y vuelven 
a crear los ficheros que hayan podido borrarse accidentalmente. En el 
capítulo 11 se trata acerca de una versión del UNERASE. 

Si se intenta borrar un fichero que no se encuentra en la unidad 
especifica, el CCP responderá con un mensaje de NO FILE. 


REN—Renombrar un fichero La orden REN da nuevo nombre a un fichero, 





cambiando su nombre, su tipo o ambos. Para cambiar de nombre se 
necesita introducir los dos nombres del fichero, el nuevo y el actual. 

Para recordar el formato correcto, piénsese en la frase nuevo=viejo 
(new=old). La sintaxis de la orden es: 


Aoren neufile.typ=oLdfile.typ<cr> 
Ao. 


Se puede usar la letra de la unidad de disco lógico para especificar en 
qué unidad existe el fichero. Si se especifica la unidad, sólo es necesario 
introducirla en uno de los nombres de fichero. Si se introduce la unidad en 
ambos nombres de fichero, deberá ser con la misma letra para ambos. 

A diferencia de las órdenes permanentes anteriores, REN no puede 
utilizarse con nombres de fichero ambiguos. Si se intenta, el CCP devuelve 
los nombres ambiguos con un signo de interrogación, como se indica en el 
diálogo siguiente: 


A>ren chap*.doc=chapter*.doc<cr> 
CHAP*.DOC=CHAPTER*.DOC? 
A> 


Si la orden REN no puede encontrar el fichero “viejo”, responderá NO 
FILE. Si el fichero nuevo existe ya, el mensaje que aparecerá es FILE 
EXISTS. Si se recibe un mensaje de FILE EXISTS y se quiere comprobar 
que el nuevo fichero existe realmente, recuérdese que es mejor usar una 
orden STAT que una DIR. El fichero existente puede haber sido declarado 
modo SYS y, por tanto, no aparecerá si se usa la orden DIR. 


TYPE-—Visualizar un fichero que contiene texto La orden TYPE copia el 


fichero especificado en la consola. No se pueden utilizar nombres de fichero 
ambiguos, y se necesitará pulsar CONTROLS si el fichero tiene más datos de 
los necesarios para llenar una pantalla. Con la orden TYPE, los datos del 
fichero pasarán rápidamente por la pantalla a menos que se pulse 
CONTROL-S para detener la salida. Es preciso tener cuidado, porque si se 
pulsa cualquier otro carácter, la orden TYPE abortará y devolverá el 
control al CCP. 

Una vez se ha comprobado lo que aparece en la pantalla, puede pulsarse 
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CONTROL-Q para reanudar la salida de datos a la consola. Con las 
implementaciones estándar del CP/M se descubrirá que cualquier carácter 
puede utilizarse para poner en marcha de nuevo la circulación de datos; sin 
embargo, el CONTROL<S (X-OFF) y CONTROL-Q (X-ON) constituyen el proto- 
colo estándar que ha de utilizarse. 

Si se necesita la salida de copias duras de los contenidos del fichero, 
deberá mecanografiarse una orden CONTROL-P antes de Pulsar el retorno de 
Carro (CARRIAGE RETURN) al final de la línea de orden TYPE. 

Como se habrá observado, la orden TYPE sólo debe utilizarse para 
salida de ficheros de texto ASCII. Si por cualquier razón se utiliza la orden 
TYPE con un fichero que contenga información binaria, aparecerán en la 
pantalla caracteres extraños. En este caso se puede programar el terminal 
en algún estado que sólo pueda corregirse desconectando el aparato y 
volviéndolo a conectar. Por consiguiente, la regla general es utilizar el 
mando TYPE sólo con ficheros de texto ASCII. 


SAVE—Guardar en el disco la imagen en memoria La orden SAVE es la 


más difícil de explicar de las del CCP. Es más útil para el programador que 
para un usuario final típico. El formato de esta orden es: 


A>SAVE n FILENAME.TYP<cr> 
AD, 


La orden SAVE crea un fichero de nombre y tipo especificados (o 
escribe sobre un fichero existente de este nombre y tipo), introduciendo en 
él el número n de páginas de memoria especificado. Una página en CP/M es 
de 256 (100H) bytes. La orden SAVE comienza a transcribir la memoria 
desde el lugar 100H, el principio del área de programa transitorio (TPA). 
Antes de usar esta orden se habrá cargado normalmente un programa en la 
TPA. La orden SAVE realiza exactamente lo que su nombre indica: salva 
una imagen del programa en un fichero en disco. 

Frecuentemente, cuando se usa la orden SAVE, el tipo de fichero será 
“COM”. Con el fichero guardado en esta forma, el CCP será capaz de 
cargar y ejecutar el fichero. 


USER—Cambio del número de usuario Como se ha mencionado anteriormen- 


te, el directorio de todo disco lógico consiste en varios directorios entrelaza- 
dos pero separados lógicamente por el número de usuario. Cuando se usa 
un número específico de usuario, los ficheros que fueron creados cuando se 
estaba en otro número de usuario no están lógicamente disponibles. 

La orden USER es una forma para desplazarse de un número de usuario 
a otro. El formato de la orden es: 


A>USER n<cr> 
o 
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donde n puede ser cualquier número entre 0 y 15. Cualquier otro número 
provocará que el CCP vuelva a repetir la entrada, seguida de un signo 
interrogativo. 

Pero una vez que se ha ido hacia atrás y hacia delante cambiando el 
número de usuario varias veces, es fácil equivocarse acerca del número de 
usuario en que se está. La orden STAT puede utilizarse para encontrar el 
número de usuario en curso. Si se está en un número de usuario que no 
tiene una copia del STAT disponible, todo lo que se puede hacer es utilizar 
la orden USER para situarse en otro número de usuario. No se puede saber 
el número de usuario en el que se estaba; únicamente se puede indicar al 
sistema el número de usuario al que se desea ir. 

En los sistemas BIOS, a medida que se verán más adelante, existe un 
medio para hacer aparecer el número actual de usuario cada vez que se lleva 
a cabo un arranque en caliente. Si se está construyendo un sistema en el 
cual se planifica utilizar las características del número de usuario CP/M, es 
preciso pensar seriamente en la presentación del número de usuario actual. 
Si se está en un número de usuario equivocado y se borran ficheros, pueden 
crearse serios problemas. 

Algunas implementaciones del CP/M han modificado el CCP de tal 
forma que el mensaje muestra el número actual de usuario, así como la 
unidad por defecto (semejante al mensaje utilizado en el MP/M). Sin 
embargo, el uso de un CCP no estándar no es una buena práctica. 
Generalmente, la definición a medida debe reservarse al BIOS. 





Carga de programas 








El área que se ha de considerar en primer lugar cuando se carga un 
programa es la de los 100H primeros bytes de memoria, llamados página 
base. Algunos campos —unidades de esta área de memoria— están fijados 
previamente a determinados valores antes de que el programa tome el 
control. 

Para ayudarnos en este asunto, imagínese un programa denominado 
COPYFILE que copie un fichero en otro. Este programa espera que se le 
especifiquen los nombres de la fuente y del fichero de destino en la línea de 
órdenes. Una orden típica sería: 


A>copyfile tofile.typ fromfile.typ display 


Obsérvese la palabra “display”. COPYFILE, si se especifica la opción 
“display”, sacará los contenidos del fichero fuente (“fromfile.typ”) a la 
consola mientras tiene lugar la transferencia. 

Al pulsar la tecla CARRIAGE RETURN al final de la línea de orden, el 





64  CP/M Manual para programadores 


CCP buscará la unidad por defecto en curso (“A” en el ejemplo) y cargará 
un fichero llamado COPYFILE.COM en la memoria, empezando en la 
posición 100H. El CCP transfiere entonces el control a la posición 100H 
—exactamente después de la página base— y comienza a ejecutarse el 
COPYFILE. 


Página base 


La página base generalmente comienza desde la posición 0000H de la 
memoria, pero si hay otras cosas en las direcciones de memoria bajas puede 
empezar en una dirección más alta. La figura 4-1 muestra el programa en 
lenguaje ensamblador que puede necesitarse para acceder a la página base. 
En este ejemplo se supone que la RAM empieza en la posición 0000H. 





0000 


0002 = 


0008 


0100 





Ran ou o ¡Comienzo de La RAM (y página base) 
¿Puede ser necesario cambiarla por 
7 algún otro valor (por ejemplo, 43004) 





, ORG Ran ¿Fijación del contador de posiciones a La base de La RAM 
MARMBOOT+ Ds 3 ¿Contiene un JNP a La entrada de arranque caliente 
3 en la tabla de vectores de salto del BIOS 
1 
BIOSPADE ou Rame2 ¿Página de vectores de salto del BIOS 
1OBYTE+ ps 1 te de redireccionamiento de entrada/salida 
CURUSER: ps 1 ¿Usuario en curso (bits 7-4) 
CURDISK EQU CURUSER ¿Disco Lógico por defecto (bits 3-0) 
, 
BDOSE+ ps a ¿Contiene un salto a La entrada del BDOS 
TOPRAM E0u BDOSE+2 ¿Comienzo de página de La RAM utilizable 
, 
oR6 RamescH ¿Salto de posiciones no utilizables 
Ds 16 ¿Bloque de control de fichero 41 





Nota: Si se utiliza este FCB aquí, puede 
7 escribirse encina del FCB2 que sígue. 


Fez ps 16 ¿Bloque de control de fichero 42 
¿Puede situarse en otra posición 
¿ antes de ser usado 











oro RAn+SoH ¡Salto de posiciones no utilizables 
COMTAILA ¿Inclusión de Los parámetros de orden 
COMTAILSCOUNT» DS 1 uenta del número de caracteres de La parte de parámetros 
La orden (no incluye CR) 
COMTAILECMARS: DS 127 cteres de La parte de parámetros 
¿ de una orden convertidos a mayúsculas y 
¿ sin tener en cuenta CR. 
, 
oro Ram+S0M ¿Redefinición del área de parámetros de órdenes 
, 
DMABUFFERE DS. 128 ¿Dirección DMA por defecto utilizada 
5 cono menoria=registro de 128-bytes 
, 
ORG RAMP100H ¿Salto de posiciones no utilizad 





TRA» ¡Éomienzo del área de programa transitorio 
5 en la que se cargan Los programas. 





Figura 4-1. 


Página base de declaraciones de datos. 
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Algunas versiones del CP/M, tales como el sistema primitivo Heathkit/ 
Zenith, tienen ROM desde la posición 0000H hasta la 42FFH. Digital 
Research, respondiendo a la presión del mercado, produjo una versión del 
CP/M que suponía que la RAM comenzaba en el lugar 4300H. Si se posee 
uno de estos sistemas, debe añadirse 4300H a todas las direcciones en los 
párrafos siguientes, excepto en lo que se refiere a las direcciones al principio 
de la memoria. Esto no será afectado por la presencia de la ROM en la 
memoria inferior. 

Los valores individuales utilizados en los campos de la página base se 
describen en las secciones siguientes. 


Arranque caliente El campo de tres bytes de arranque caliente contiene una 


instrucción para saltar a la parte superior de la RAM. Esta instrucción JMP' 
transfiere el control al BIOS y dispara una operación de arranque caliente. 
Como se ha indicado anteriormente, un arranque caliente provoca que el 
CP/M vuelva a cargar el CCP y reconstruya el vector de situación para el 
disco actual por defecto. Si se necesita ocasionar un arranque caliente desde 
un programa cualquiera en lenguaje ensamblador, se codifica 


me 0 ¡Arranque caliente 


BIOSPAGE El BIOS tiene varios puntos de entrada diferentes; sin embargo, todos 


IOBYTE 


ellos están ligados entre sí al principio del BIOS. Las primeras instrucciones 
del BIOS se parecen a las que siguen: 


JP ENTRY1 
JMP> ENTRYZ 
JMP- ENTRY ¿y siguientes 


Debido a la forma en que está montado el CP/M, la primera instrucción 
de salto comienza siempre en la frontera de una página. Recuérdese que una 
página equivale a 256 (100H) bytes de memoria, por lo que un límite de 
página es una dirección en la que los ocho bits menos significativos son 
cero. Por ejemplo, el vector de salto del BIOS (como se denomina al 
conjunto de JMP) puede empezar en una dirección tal como F200H o 
E600H. La dirección exacta está determinada por el tamaño del BIOS. 

Mirando el BIOSPAGE puede determinarse el byte de dirección de la 
instrucción de arranque caliente del JMP más significativo y la dirección de 
página del vector de salto del BIOS. 


El CP/M se basa en una filosofía de separar el mundo material del punto 
de vista lógico del mundo característico del CP/M. Esta filosofía se aplica 
también a los dispositivos orientados al procesamiento de caracteres que 
soporta CP/M. 

El IOBYTE consiste en cuatro campos de dos bits que pueden ser 
utilizados para asignar un dispositivo material a cada uno de los lógicos. Es 
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importante entender que el IOBYTE en sí mismo es únicamente una 
estructura de datos pasiva. Las asignaciones prácticas suceden sólo cuando 
el controlador del dispositivo físico examina el IOBYTE, interpretando su 
contenido y seleccionando el controlador correcto para la cooperación del 
BIOS. Estos controladores de dispositivos están en código de bajo nivel (es 
decir, ligado íntimamente al lenguaje de la máquina) en el BIOS, quien 
prácticamente contacta y controla el dispositivo físico. 
Los cuatro dispositivos lógicos que conoce el CP/M son: 


1. La consola. Es el mecanismo a través del cual se comunica con el 
CP/M. Normalmente es un terminal con una pantalla y un teclado. 
La consola es un dispositivo bidireccional. Puede utilizarse como 
fuente de información (entrada) y como destino al cual se puede 
enviar información (salida). 

En terminología del CP/M, la consola se conoce con el nombre 
simbólico de “CON:”. Obsérvese el “:” —éste diferencia el nombre 
del mecanismo del de un fichero en disco que podría llamarse 
“CON”, 


2. El mecanismo de listado. Normalmente es una impresora de algún 
tipo y se utiliza para hacer listados en papel. El CP/M ve a la 
impresora como un dispositivo de salida únicamente, lo que crea 
problemas en las impresoras que necesitan comunicar al CP/M que 
están ocupadas, pero este problema puede remediarse añadiendo 
instrucciones al controlador de la impresora. 

El nombre CP/M para este mecanismo lógico es de “LST:”. 


3. La lectora de cinta de papel. No es corriente encontrar una lectora de 
cinta de papel en uso hoy en día. Originalmente, el CP/M funcionaba 
con un sistema de desarrollo de microordenadores Intel, denominado 
MDS-800, y este sistema poseía una lectora de cinta de papel. Este 
mecanismo puede utilizarse sólo como fuente de información. 

El CP/M denomina a este mecanismo lógico “RDR:”. 


4. La perforadora de cinta de papel. Es también una reliquia de los 
primeros tiempos del CP/M y del MDS-800. En este caso, la 
perforada puede utilizarse sólo para salidas. 

El nombre del mecanismo lógico utilizado por el CP/M es 
“PUN:”. 


La distribución física de los campos del IOBYTE se muestra en la figu- 
ra 4-2. 

Cada campo de dos bits puede tomar uno de cuatro valores: 00, 01, 10 y 
11. El valor particular puede ser interpretado por el BIOS como especifica- 
ción de un dispositivo físico, según se indica en la tabla 4-1. 
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Número de bit [ 7 | 6 s[«[> 2 

















Dispositivo lógico Listado  Perforadora Lectora Consola 





Figura 4-2. Disposición del IOBYTE. 


A pesar de que la interpretación práctica del IOBYTE es llevada a cabo 
por el BIOS, el programa de utilidad STAT puede activar el IOBYTE 
utilizando los nombres de los dispositivos lógicos y físicos, y el PIP 
(programa de intercambio periférico) puede utilizarse para copiar datos de 
un dispositivo a otro. Además, se puede escribir un programa que cambie 
sencillamente el contenido del IOBYTE. Pero hay que tener cuidado, puesto 
que los cambios en el IOBYTE son efectivos inmediatamente. 

Los valores del IOBYTE tienen los significados siguientes: 


Consola (CON:) 


00 Controlador del teletipo (TTY:) 
Este controlador está pensado para conectarlo a un mecanismo de 
copia dura que se usa como consola principal. 


01 Controlador de CRT (CRT:) 
El controlador está pensado para ser conectado a un terminal 
CRT. 


10 Modo de proceso por lotes (Batch) 
Este es un caso especial. Se supone que los controladores adecua- 
dos serán llamados de forma que la entrada de la consola venga 
desde la lectora lógica (RDR:) y que la salida de la consola se 
envía al mecanismo de listado lógico (LST:). 





Tabla 4-1. Valores del IOBYTE. 





Dispositivo lógico 


Dispositivo físico 











[ 00 or 10 " 
Consola (CON:) TIY: CRT: BAT UCI. 
Lectora (RDR: TTY, PTR: URI UR2 
Perforadora (PUN:) TIY: PTP: UP! UP2 
Listado (LST:) TUY; CRT: LPT: ULE 
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11 


Consola definida para usuarios (UCI:) 

El significado depende de la implementación del BIOS individual. 
Si, por ejemplo, se tiene una pantalla gráfica de alta resolución, 
puede arreglarse para ello colocando el IOBYTE para dirigir la 
salida de la consola a él. Puede hacerse que la entrada de la 
consola entre desde alguna tableta gráfica, palanca de mando, u 
otro dispositivo. 


Lectora (RDR:) 


00 


01 


Controlador del teletipo (TTY:) 
Se refiere al dispositivo de lectura de cinta de papel que se 
encontraba frecuentemente en las consolas de teletipos. 


Lectora de cinta de papel (PTR:) 

Esto presupone algún tipo de dispositivo de entrada de gran 
velocidad conectado al sistema. Los sistemas modernos presentan 
raramente tal mecanismo, por lo que este montaje se utiliza a 
menudo para conectar la lectora lógica a la entrada de una línea 
de comunicación. 


Lectora definida por el usuario 41 (UR1:) 


Lectora definida por el usuario 42 (UR2:) 

Estos dos montajes pueden utilizarse para dirigir el controlador 
físico a algún otro dispositivo especializado. Estos valores están 
incluidos únicamente porque en caso contrario no habrian sido 
asignados. Se utilizan raramente. 


Perforadora (PUN:) 


00 


01 


1 


Controlador de teletipo (TTY:) 
Se refiere a la perforadora de cinta de papel que se encontraba a 
menudo en las consolas de los teletipos. 


Perforadora de cinta de papel (PTP:) 

Esto presupone que existe algún tipo de perforadora de cinta de 
papel de alta velocidad conectada al sistema. De nuevo, es un caso 
raro, de forma que este mensaje se usa a menudo para conectar la 
perforadora lógica a la salida de una línea de comunicación. 


Perforadora definida por el usuario 41 (UP1:) 


Perforadora definida por el usuario 42 (UP2:) 
Estos dos montajes corresponden a dos lectoras definidas por el 
usuario, pero prácticamente no se usan nunca. 
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Listado (LST:) 


00 Controlador del teletipo (TTY:) 
La salida se imprimirá en un teletipo. 


01 Controlador del CRT (CRT:) 
La salida se dirigirá a la pantalla en un terminal CRT. 


10 Controlador de impresora de líneas (LPT:) 
La salida irá a un mecanismo de impresión de alta velocidad. 
Aunque el nombre de impresora de líneas implica un tipo específi- 
co de hardware, puede ser cualquier tipo de impresora. 


11 Dispositivo de listado definido por el usuario (UL1:) 
Cualquiera que escriba, el BIOS puede preparar que este montaje 
cause una salida del dispositivo lógico de listado que vaya a un 
dispositivo distinto de la impresora principal. 


Repetimos: El IOBYTE no se usa prácticamente por el cuerpo principal 
del CP/M. Es únicamente una estructura de datos pasivos que pueden ser 
manipulados por STAT. Si el IOBYTE posee algún efecto, depende 
totalmente de la implementación del BIOS particular. 


CURUSER El campo CURUSER son los cuatro bits más significativos de su byte. 


Contiene los números de usuario seleccionado, establecidos por la orden 
CCP USER, a partir de una llamada especifica al BDOS, o por un 
programa que sitúa esta parte en el valor deseado. Esta última forma de 
cambiar los números de usuario puede causar problemas de compatibilidad 
con versiones futuras del CP/M, de forma que debe utilizarse sólo en 
condiciones controladas. 


CURDISK El campo CURDISK son los cuatro bits menos significativos del byte 


BDOSE 


que se comparte con el CURUSER. Contiene el valor 0 si el disco en curso 
es A:, | si es B:, etc. 

El campo CURDISK puede fijarse desde el CCP, por una petición al 
BDOS, o por un programa que altere este campo. Las objeciones hechas al 
CURUSER respecto a las compatibilidades son también válidas aquí. 


Este campo de tres bytes contiene una instrucción para saltar al punto 
de entrada del BDOS. Cuando se desea que el BDOS haga algo, se puede 
transferir la petición al BDOS colocando los valores adecuados en los 
registros y haciendo una llamada (CALL) a esta instrucción JMP. Utilizan- 
do un CALL, la dirección de retorno será situada en la pila. El JMP 
siguiente al BDOS no producirá información adicional alguna en la pila, 
que opera sobre una base “último en entrar, primero en salir”, de esta 
forma, cuando el sistema vuelve del BDOS, volverá directamente al 
programa. 
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TOPRAM Puesto que el BDOS, al igual que el BIOS, empieza en una frontera de 


página, el byte más significativo de la dirección de la entrada del BDOS 
indica en qué página empieza el BDOS. Hay que restar 1 del valor del 
TOPRAM para obtener el mayor número de página que se puede usar en 
un programa. Obsérvese que cuando se utiliza esta técnica, se supone que se 
escribirá completamente encima del CCP hasta que se llegue en la memoria 
justo bajo el BDOS. 


FCB1 y FCB2 Cuando conviene, el CCP toma los dos primeros parámetros que 


aparecen como parámetros de una orden (véase la próxima sección), intenta 
analizarlos como si fueran nombres de fichero y coloca los resultados en el 
FCBI y el FCB2. Los resultados, en este contexto, significan que la letra del 
disco lógico se ha convertido en su representación en el FCB y el nombre y 
tipo de fichero, convertidos a mayúsculas, están situados en el FCB en los 
bytes correctos. Además, cualquier uso de ““x'” en el nombre de fichero se 
expande a uno o más signos de interrogación. Por ejemplo, un nombre de 
fichero de “abcx.*” se convertirá en un nombre de “ABC2222” y tipo de 

Obsérvese que el FCB2 empieza sólo 16 bytes por encima del FCBI, 
aunque un FCB normal tiene por lo menos una longitud de 33 bytes (36 
bytes si se desea utilizar acceso aleatorio). En muchos casos, los programas 
necesitan sólo un único nombre de fichero. Por consiguiente, puede 
procederse a utilizar el FCB1 inmediatamente, sin tener en cuenta que se 
escribirá encima del FCB2. 

En el caso del ejemplo del programa COPYFILE en las páginas 
anteriores, se requieren los nombres de dos ficheros. Antes de que el FCBI 
pueda utilizarse, los 16 bytes del FCB2 deben trasladarse al esquema de 
FCB que se declara en el cuerpo del propio COPYFILE. 


COMITAIL Los parámetros de orden o cola de la orden son cualquier cosa de la 


línea de orden distinta del nombre de dicha orden. Por ejemplo, la línea de 
orden COPYFILE se muestra a continuación: 


A>copyfile tofile.type fromfile.typ display 


El CCP toma los parámetros de la orden (convertidos a mayúsculas) y los 
almacena en el área COMTAIL. 


COMTAIL$COUNT Es un cálculo binario en un único byte del número de caracteres 


de los parámetros de orden. El cálculo no incluye el CARRIAGE RETURN ni 
un espacio entre el nombre de la orden y los parámetros. Por ejemplo, si se 
introduce la línea de orden 

ADPRINT ABC*.x* 


el COMTAILSCOUNT será seis, que es el número de caracteres de la 
cadena “ABC+.«*”. 
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COMTAILSCHARS Son los caracteres reales de los parámetros de orden. Este 


campo no está inicializado a blancos, de forma que es preciso utilizar el 
COMTAILSCOUNT para detectar el final. 


DMASBUFFER En la figura 4-1, el DMASBUFFER está en la misma área de 


TPA 


memoria que COMTAIL. Este es un truco para ahorrar espacio, que 
funciona debido a que la mayoria de los programas procesan el contenido 
de la parte de parámetros antes de realizar cualquier entrada o salida en el 
disco. 

El DMAS$BUFFER es una memoria intermedia de un sector (luego tiene 
una longitud de 128 bytes). El uso de las siglas DMA (acceso directo a 
memoria) se refiere al MDS-800 de Intel. Este sistema posee hardware que 
puede trasladar datos a y desde disquetes yendo directamente a la memoria, 
obviando completamente a la CPU. El término se emplea todavía aunque se 
tenga una computadora que no utilice el DMA para la entrada/salida de sus 
discos. Puede sustituirse la idea de “la dirección a y de la cual los datos son 
leidos/escritos”” en lugar del concepto de DMA. 

Se puede solicitar al CP/M que utilice una dirección DMA distinta a la 
DMAS$BUFFER, pero siempre que el CCP esté en control, la dirección de 
DMA se volverá a colocar aqui. 


Esta es el área de programa transitoria en la cual el CCP carga 
programas. El TPA se extiende hasta la base del BDOS. 

El TPA es también la dirección de comienzo de la imagen de memoria 
que se guarda en el disco, siempre que se use la orden CCP SAVE. 


Descarga de memoria de la página base 


Lo que sigue son salidas de impresora que muestran los contenidos de la 
página base (los primeros 100H bytes de memoria) como los ve el programa 
COPYFILE. 

Un ejemplo de los primeros 16 bytes de memoria es el siguiente: 


0000: C3 03 F2 95 00 C3 00 C2 FF FS FS FF FS F2 FF FO 


L Datos arbitrarios a la izquierda 


del sistema de arranque 


Punto de entrada del JMP al BDOS 
(Nótese que en 0C200H está la primera página del BDOS) 


Disco por defecto en curso (0=A, 1=B) 
Usuario en curso (Usuario=0) 
Montajes del IOBYTE 


JMP WARMBOOT 
(Obsérvese que el vector de salto del BIOS está en 0F200H) 
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La línea de orden, como se recordará, era 
A>copyfile tofile.typ fromfile.typ display 
Las áreas FCB1 y FCB2 serán determinadas por el CCP como sigue: 


Disco lógico Disco lógico 


0050: 00 54 4F 46 
ENE ES 
0080: 49 4C 45 20 20 54 59 50 00 00 00 0000 46 52 4 
OS A a e IERTO 
00701 4D 46 49 4C 45 54 59 50 00 00 00 00 d0 F2 34 Fa 
MERA 


Como los discos lógicos no se especifican en los nombres de fichero de la 
línea de orden, el CCP ha situado el código del disco tanto en el FCBI1 
como en el FCB2 a 00H, con el significado “utilícese el disco por defecto”. 
El nombre y tipo de fichero se han convertido en mayúsculas, separados e 
introducidos en el FCB en los sitios destinados a este fin. 

La parte de parámetros de orden completa se ha almacenado en 
COMTAIL como sigue: 


3l en decimal 


Residuo 


0080: 1F 54 4F 46 49 4C 45 2E 54 59 50 20 46 52 4F 40 
AA A A ACA 
0090: 46 49 AC 45 2E 54 59 50 20 44 49 53 50 40 A1 59 
EME TNA AN 
ODAD: 00 43 32 43 de 20 20 20 20 42 4F 4D 00 00 00 08: 
ORO K O al 
0080: 98 9C 00 00 00 00 00 00 00 00 06 00 da Go ho do 


v0co: Es Es Es Es Es Es Es Es Es Es Es Es Es Es Es Es 
vono: Es Es Es Es Es Es Es Es Es Es Es Es Es Es Es Es 


o0EO: ES Es Es Es Es Es Es Es Es Es Es Es Es Es Es Es 





OoFO: Es Es Es Es Es Es Es Es Es Es Es Es Es Es Es Es 


0100: 61 Fo 


Comienzo del programa 


Como puede verse, la longitud de la parte parámetros es de 01FH (31 
decimal). Esto va seguido inmediatamente por los propios caracteres 
parámetros-de-orden. Obsérvese que la parte de parámetros finaliza en el 
lugar 9FH. El resto de los datos que pueden verse son residuos de algunas 
operaciones anteriores realizadas por el CCP en el directorio. El nombre de 
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fichero CRCK.COM puede verse en una entrada al directorio, seguido de 
algunos OESH, que son espacios del directorio no utilizados. 

Finalmente, en el lugar 0100H están los dos primeros bytes del 
programa. 


Procesamiento de la parte de parámetros de orden (o cola de la orden) 


Uno de los primeros problemas con los que hay que enfrentarse si se 
escribe un programa que pueda aceptar parámetros desde la parte de 
parámetros de una orden es procesarla, aislando cada uno de los paráme- 
tros. Debería utilizarse una subrutina estándar para este fin. Esta subruti- 
na divide la línea de órdenes en parámetros individuales y devuelve un 
cálculo del número de parámetros, así como un apuntador a una tabla de 
direcciones. Cada dirección de esta tabla apunta por turno a una cadena 
terminada por un byte nulo. Cada parámetro se sitúa en una cadena 
distinta. 

La figura 4-3 contiene el listado de esta subrutina, CTP (procesador de 
parámetros de orden). 






















900 ORO 100 
O100 Cpas01 — START: CALL cre Bnco de pruebas para el CIP 
0103 00 


nop 
5 Resto del programa 


Esta subrutina fracciona La parte de paránetros de una orden, 
situando cada uno de ellos en un área separada. 
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e Ligar sat SrSgtr unas direcciones de parónetros 

0104 0000 O 

' 

$e nisroiriacióa: 

Po copas bas pra 

O A Er 

1 llseotdyte de cada Barbastro es 0 y se utiliza 

Pi ta ess Lacoes: 





Figura 4-3. Procesador de cola de órdenes (CTP). 
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o10c 
OLLA 
0128 


0136 
0139 
0138 
o13E 
oL3F 
0140 
0141 
0142 


0145 


0146 
0147 
0148 


0149 
0144 
0148 
014 
014F 


0150 
0151 
0152 
0153 
0156 
0158 
0158 


o15c 
0150 
O1SE 
o15F 
0160 

0163 
0164 
0163 
0166 
0167 
0168 

0168 
0160 
0170 


0173 


0174 
0178 
0178 
0179 


0174 
0170 
0170 


0180 
0182 


o18s 


ODO1O1O101PL+ DB 
OOOIO1O1O1P2+ DB 
COCIO1O101P3: DB 
CrPr 
210401 Le 
DE00 mur 
3A8000 LDA 
87 RA 
ce RZ 
ES Pus 
47 moy 
218100 pi0s4 
CTPSNEXTP: 
ES xTHL 
se moy 
23 10% 
Se moy 
7A moy 
Ba ORA 
CA8001 N7 
23 10 
ES xr 
CTPeSKIPB: 
7E mov 
23 1NX 
os DCR 
FAz7ao1 . 
FEZo Cer 
CASO01 yl 
ES TNR 
CTPNEXTC: 
12 STAX 
13 INX 
14 LDAX 
97, ORA 
CA7AO1 Y 
AF XñA 
12 STAX 
TE mov 
23 1Nx 
os DCR 
FA7301 1] 
FEZO cer 
CA4SO1 wa 
E3sco1 e 
1 
CTPXa 
AF xRA 
, 
Crrcx 
El PoR 
210401 br 
27 RA 
54 Rer 
CIPSPTLXS 
2602 mr 
EB xcHo 
C37401 e 
CIPSTRPX: 
3€01 mur 
c37401 e 
1 
END 








¡Parámetro 1 y terminal 
¿Parámetro 2 y terminal 
¿Parámetro 3 y terminal 
cadenas-parónetro 





¿Punto de entrada principal <<e<< 
H.PTABLE ¿ML => tabla de direcciones 
co ¿Activación de La cuenta de parámetros 
CÓMTAILACOUNT * ¿Cuenta de caracteres 





A ¿Comprobación de existencia de parámetros 
¡Salida (retorno de parámetros ya activados) 

. ¡Guardar en cabecera de pila para uso posterior 

BA ¿8 = cuenta de caracteres COMTAIL 

MI COMTAIL+1 ¿HL -> caracteres en la parte de paránetros de orden. 


¿Bucle parámetro siguiente 
¿HL —> tabla de direcciones 
¿Cabecera de pila = apuntador COMTAIL 
.” ¿Obtención del byte LS de dirección de parámetro 
¿Actualización del apuntador de direcciones 
.n ¿Obtención del byte MS de dirección de paránetros 
¿DE -> cadena-paránetro (o es 0) 
D ¿Obtención de una copia del byte MS de dirección 
combinación de Los bytes MS y LS 
1PSTMPX ¿Denasiados parámetros-sal ida 
¿Actualización del apuntador a La dirección siguiente 
¿HL —> COMTAIL 
¿Cabecera de pila--actualización de apuntador de dirección 








7 En este punto se tiene 
¿ ML -> byte siguiente en La parte de parámetros de orden 
¿ DE -> primer byte de La siguiente cadena paránetro 











Am ¡Obtención el byte de parámetro siguiente 
M ¿Actualización el apuntador a La parte de parámetros de orden 
B ¿Comprobación de existencia de nuevos caracteres 
Crex No, salida 
=> ¿Comprobación existencia de blancos 
CTPSSKIPb ¿Si, saltar blancos 
c ¿Incrementación de La cuenta de paránetros 
D ¿Almacenamiento en cadena-parámetro 
D ¿Actual ¡zación de apuntador a cadenas-parámetro 
D ¿Comprobación existencia byte siguiente 
A ¿Comprobación de si es un terminal 
CrPSPTLX ¿Salida por parámetro denasiado Largo 
A ¿Añadir byte DO al final del parámetro 
D ¿Almacenamiento en cadena-parámetro 
A ¿Obtención de nuevo carácter de La parte de parámetros 
A ¿Actualización de apuntador a zona de paránetros 
a ¿Comprobación existencia de caracteres 
Crex ¿No, salida 
ze ¿Comprobación de parámetro terminal 
CTPNEXTP ¿SÍ, Ár a parámetro siguiente 
CTPSNEXTC ¿No, almacenamiento en cadena-paránetro 
¿Salida normal 
A Á= 0 y activación de marca-2 
¿Código de salida común 
$" Pop de La pila 
H.PTABLE ¿Retorno del apuntador a la tabla de dirección de parámetro 
A ¿Asegurar La activación de La marca 2 en La forma adecuada 
¿Salida por parámetro denasiado Largo 
A,CTPSPTL ¿Activación del código de error 
DE -> parámetro erróneo 
erecx ¿Salida común 
¿Salida por exceso de parámetros 
A¿CIPSTHP. ¿Activación del código de error 
Crecx ¿salida común 
START 





Figura 4-3, 


(Continuación.) 
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Memoria disponible 


Muchos programas necesitan utilizar toda la memoria disponible, y se 
precisa muy pronto en el programa fijar el apuntador de pila al extremo 
final de la RAM disponible. Como se ha indicado anteriormente, puede 
escribirse sobre el CCP, puesto que será recargado en el próximo arranque 
caliente. 

La figura 4-4 muestra el código utilizado para fijar el apuntador de pila. 
Este programa determina la cantidad de memoria del TPA y fija el 
apuntador de pila en la parte superior de la RAM disponible. 


Comunicación con el BIOS 


Si se está escribiendo un programa de utilidad para su interacción con 
un BIOS adaptado, habrá ocasiones en que se necesite hacer una llamada 
directa al BIOS. Sin embargo, si el programa termina funcionando en su 
sistema operativo MP/M de Digital Research, se tendrán serios problemas 
si se intenta llamar directamente al BIOS. Entre otras cosas, se producirá 
una caída del sistema operativo. 

Si se necesita realizar una llamada de este estilo y se es consciente de los 
peligros de utilizar llamadas directas al BIOS, la figura 4-5 muestra una 
forma de hacerlo. 

Recuérdese que las primeras instrucciones del BIOS son el vector de 
saltos —una secuencia de instrucciones de JMP, una tras otra—. Antes de 
que se pueda hacer una llamada directa, es preciso saber el desplazamiento 
relativo a la página de la instrucción JMP particular a la que se desea ir. El 
vector de saltos del BIOS comienza siempre en una frontera de página, por 
lo que todo lo que se necesita es el byte menos significativo de su dirección. 


Regreso al CP/M 


Una vez ha corrido el programa, es preciso devolver el control otra vez 
al CP/M. Si el programa no ha escrito encima del CCP y ha dejado el 
apuntador de pila como estaba cuando se introdujo el programa, puede 
volverse directamente al CCP utilizando una instrucción RET. 

La figura 4-6 muestra cómo un programa normal realizará todo esto si 
se usa una pila local, particular. La pila del CCP es demasiado pequeña; 
tiene sitio únicamente para 24 valores de 16 bits. 





0007 = TOPRAM EQU 7 ¿Ayte más significativo del punto de entrada 
; al 8D0s 

0000 340700 LOA TOPRAM ¿Obtención del byte MS del punto de entrada al BDOS 

0003 3D, DORA FRetrasar una página 

0004 2EFF MUI L,OFFH ¿Fjar el byte LS de La dirección final 

10008 67 HOY MA DAL INEA 

0007 F9 sem ¿Fijar el apuntador de pila a partir de HL 





Figura 4-4, Puesta del apuntador de pila a la cabeza de la RAM disponible. 
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Urilicese esta técnica sólo en programas de utilidad CP/M. 
Los programas MP/M no Lo permiten. 









9009 = CONIN EQU 09H ¿Obtención de un carácter de entrada de La consola 
¿Está en La cuarta posición del vector de saltos 

0002 = BIOSPADE EQU 2 ¿Dirección de página del BIOS 

, 

1 En este punto se realiza La Llamada directa a CONIN 

; CALL». 

, 
0000 209 MY! L.CONIN ¿Obtención del byte LS del punto de entrada CONIN 
10002 CDoS00. CALL BIOS — ¿Ira la subrutina de entrada al BIOS 


resto del programa... 





ñ 
Bros: 





9005 3A0200 LDA — BIOSPAGE ¡Obtención de La página de vectores de salto del BIOS 
0008 67 MOV MA IL => punto de entrada 
(Se fija el byte LS antes de LLegar aquí) 
0009 ES Pon "amp" al BIOS 
¿La dirección de retorno ya está 
5 en La pila 





Figura 4-5, Realización de una llamada directa al BIOS. 


La ventaja de volver directamente al CCP es la velocidad. Esto es cierto 
especialmente en un sistema de disco rígido, donde el tiempo que se necesita 
para realizar un arranque es bastante apreciable. 

Si el programa ha escrito sobre el CCP, no se tiene otra opción que 
transferir el control al lugar 0000H y dejar que se realice un arranque 
caliente. Para ello, todo lo que se necesita es ejecutar 


EXIT: JMP O ¡Arranque caliente 


(Como indicación, si se está comprobando un programa y de repente se 
sale de nuevo al CP/M, lo probable es que inadvertidamente se haya 
enviado a la posición 0000H y se ha ejecutado un arranque caliente.) 





1 Nota: Este ejemplo supone que no 
, se ha reescrito Sobre el CUP 
, 
0100 ORG 100H ¿Comienzo en La TPA 
START: 
0100 210000 Lxr mo ¿Almacenamiento del apuntador de pila del Ccp 
0103 39 DAD sh 5 sumándolo a O en ML 
0104 220F01 SHLD CCPESTACK 


0107 314101 EXI SP,LOCALESTACK 
El cuerpo principal del prograna está aquí 


+.» cuando se está preparado para volver 
al CCP... 


OLOA 2A0FO1 LMD CCPSSTACK ¿Obtención del apuntador de pila del CCP. 
010D F9 sem ¿Restauración del SP. 
OLOE C9 REr ¿Retorno al CCP 
010 CCPISTACKS pS 2 ¡Area de almacenaje del SP del CCP 
om Ds 48 ¿pila local 
LOCALESTACK: 
0141 END START 











ura 4-6. Regreso al CCP al final del programa. 


Lo que hace el BDOS 
Llamadas a función del BDOS 
Nomenclatura 


Realización de una petición de función 
al BDOS 








El sistema operativo 
básico de disco 








El sistema operativo básico de disco es el corazón real del CP/M. 
Contrariamente al procesador de órdenes de consola, ha de estar en 
memoria todo el tiempo. Procura todos los servicios de entrada/salida a los 

| programas del CP/M, incluido el CCP. 

Como regla general, a menos que se esté escribiendo un programa de 
utilidad dependiente del sistema, debería usarse el BDOS para todas las 
entradas/salidas del programa. Si se salta al BDOS, probablemente se 
crearán problemas para el futuro. 








Lo que hace el BDOS 








El BDOS realiza todas las entradas/salidas del sistema. Estos servicios 
pueden agruparse en dos tipos de funciones: 


7 
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Entrada/salida simple byte a byte 
Es el envio y la recepción de datos entre la computadora y sus 
dispositivos lógicos —la consola, la “lectora” y la “perforadora” (o 
sus sustitutos), y la impresora. 


Entrada/salida de ficheros de disco 
Cubre tareas tales como la creación de nuevos ficheros, borrado de 
viejos, apertura de ficheros existentes y lectura y escritura de 
“registros” de 128 bytes de longitud en y desde estos ficheros. 


El resto de este capítulo explica cada una de las funciones del BDOS, 
muestra cómo realizar cada petición al sistema operativo y proporciona 
información adicional para cada función. También se encuentran todos 
estos datos en el manual de Digital Research Guía de interfases CP/M 2, 
para descripciones estándar de estas funciones. 





Llamadas a función del BDOS 








Las llamadas a función del BDOS se describen en el orden de los 
números de código de la función. La figura 5-1 resume estas llamadas. 


Nomenclatura 


En la práctica, cuando se escriben programas que realizan llamadas al 
BDOS, es preciso incluir una serie de equivalencias para los números de 
código de la función del BDOS. En los siguientes ejemplos se hace 
referencia a estos valores, la forma en que se muestran en la figura 5-2 es tal 
como aparecen en los programas. 

Los nombres de función utilizados para definir las equivalencias en la 
figura 5-2 son más cortos que los de la figura 5-1, con el fin de conseguir un 
equilibrio entre los nombres de función abreviados que se utilizan en la 
documentación de Digital Research y la necesidad de descripciones de 
funciones más claras. 


Realización de una petición de función al BDOS 


Todas las peticiones del BDOS se hacen enviando una instrucción CALL 
a la posición 0005H. También puede requerirse una función transfiriendo el 
control a la posición 0005H con la dirección de retorno en la pila. 

Para decir al BDOS lo que se necesita que haga, hay que preparar los 
registros internos de la CPU para que contengan la información requerida 
antes de que se ejecute la instrucción CALL. 





Código 
de la función 





Figura 5-1. 
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Descripción 


Entrada/salida simple byte a byte 


Puesta a cero del BDOS y del sistema global 
Lectura de un byte desde el teclado de la consola 

Escritura de un byte en la pantalla de la consola 

Lectura de un byte desde el dispositivo lógico de lectura 

Escritura de un byte por el dispositivo de perforación 

Escritura de un byte por el dispositivo lógico de impresión 
Entrada/salida directa de la consola (no edición del estilo CCP) 
Lectura del contenido del IOBYTE 

Fijación de un nuevo valor del IOBYTE 

Envio a la consola de una cadena terminada por $ 

Lectura de una cadena desde la consola en la memoria intermedia 
Test de si una tecla de la consola espera para ser leída 

Retorno del número de versión del CP/M 


Entrada/salida de ficheros de disco 


Puesta a cero del sistema de disco 

Selección del controlador del disco lógico especificado 

Apertura de un fichero específico para lectura/escritura 

Cierre de un fichero específico después de lectura/escritura 

Búsqueda del directorio de ficheros para la primera coincidencia con el 
nombre de fichero 

Búsqueda del directorio de ficheros para la siguiente coincidencia con el 
nombre de fichero 

Borrado de fichero 

Lectura del próximo registro secuencialmente 

Escritura del próximo registro secuencialmente 

Creación de un nuevo fichero con el nombre especificado 

Cambio de nombre de un fichero 

Indicación de los discos lógicos activos 

Retorno del número de unidad de disco por defecto 

Fijación de la dirección de DMA (dirección de lectura/escritura) 

Retorno de la dirección de un vector de situación 

Fijar la unidad de disco lógico especificada al modo de sólo lectura 

Indicación de los discos en curso que están en modo de sólo lectura 

Fijar un fichero específico en modo sistema o de sólo lectura 

Retorno de la dirección del bloque de parámetros del disco (DPR) 

Fijación/obtención del número de usuario en curso 

Lectura de un registro aleatoriamente 

Escritura de un registro aleatoriamente 

Retorno del tamaño de fichero lógico (incluso para ficheros de acceso 
aleatorio) 

Fijación del número de registro para la próxima lectura/escritura aleatoria 

Puesta a cero de la unidad especificada 

Escritura de un registro aleatorio lleno con ceros 


* Estos no trabajan con el MP/M. 


Llamadas a función del BDOS, 
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0000 
0001 
0002 
0003 
0004 
0005 
0008 
0007 
0008 
0009 
0004 
10008 


0010 
0011 

0012 
0013 
0014 
0015 
0016 
0017 
0018 
0019 
C01A 
0018 
001c 
0010 
001E 


























































Emu o ¿Puesta a cero del sistena 
EU :ctura de un byte de La consola 
BSCONOUT. Em 2 :erátura de un byte en La consola 
BSREADIN Eu 3 ¿Lectura de byte de Lectora 
BSPUNOUT. Eo ¿Escritura de byte por perforadora 
Emos ¿Escritura de byte de impresor. 
TS ¿Entrada/salida directa por consola 
EU 7 ¿Obtención del 1OB1TE 
Emu 8 Jación del 1OBtTE 
EU > impresión de una cadena por consola 
Emu 10 jLectura de una cadena por consola 
EU 1d ¿Lectura del estado de La consola 
EU 12 ¿Obtención del número de versión del CP/M 
EU 13 jesta a cero del sistema de discos 
EU da ¿Selección de disco 
EQU 1 ir fichero 
EQU 16 rrar fichero 
EQU 17 'squeda de coincidencia con primer nombre 
Eo 18 ¿Búsqueda de coincidencia con nombre siguiente 
EU 19 ¿Borrado de fichero 
E0U 20 :ctura secuencial 
BRMRITESEO Em :eritura secuencial 
BSCREATE EU 22 eación de fichero 
Eu 23 mbio de nombre de fichero 
E ¿Obtención de Los discos activos 
Eu 25 ¿Obtención del disco por defecto en curso 
Eu 26 ción de La dirección DMA (Lectura/escritura) 
Eu 27 ¿Obtención de La dirección del vector de situación 
E e ¿Puesta del disco en estado de sólo Lectura 
BSOETRODSES EY 29 tención de Los discos de sólo Lectura 
BSSETFAT EQU 30 lación de atributos de fichero 
BSCETDeS EU tención de La dirección del bloque de paránetros 
BSSETOETUN E 32 ¿Activación/obtención del número de usuarto 
BSREADRAN EQU 33 a A 
¿Lectura de acceso directo (aleatoria) 
e E SEscritura aleatoria 
EQU 3S S dl 
E tención de tamaño de ficheros 
¿Fijación del número de registro de acceso directo (aleatorio) 
E A ¿Puesta a cero de La unidad 
BSURITERANZ EQU 40 


¿Escritura aleatoria con rellenado-por-ceros 








Figura 5-2. Equivalencias para números de código de funciones del BDOS. 


En la llamada a una función específica, el número de código de la 
función que se requiere debe estar en el registro C. 

Si se necesita llevar un valor de un solo byte al BDOS, tal como un 
carácter que se ha de enviar a la consola, entonces debe hacerse que este 
valor se encuentre en el registro E. Si el valor que se desea pasar al BDOS es 
un valor de 16 bits, tal como una dirección de memoria intermedia o del 
bloque de control de fichero (FCB), este valor deberá estar en el par de 
registros DE. 

Cuando el BDOS devuelve un valor de un solo byte, tal como un 
carácter del teclado o un código de retorno que indique el éxito o fracaso de 
la función requerida, éste será enviado al registro A. Cuando el BDOS 
devuelve un valor de 16 bits, éste estará en el par de registros HL. 

A la salida del BDOS, los registros A y L contendrán el mismo valor, 
igual que los registros B y H. Este convencionalismo extraño viene de los 
origenes del CP/M en el PL/M (lenguaje programación/microprocesador), 
un lenguaje utilizado por Intel en sus sistemas MDS. Entonces el PL/M 
asentaba los fundamentos de lo que se conoce como convenios de llamada a 
registros. 
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El BDOS no da ninguna garantía acerca de los contenidos de los otros 
registros. Si se necesita preservar un valor que está en un registro, o bien se 
almacena dicho valor en la memoria o se introduce en la pila. El BDOS 
utiliza su propio espacio de pila, de forma que no hay necesidad de 
preocuparse por si agota nuestra pila. 

Resumiendo, cuando se realiza una petición de función al BDOS se 
requiere un valor de un byte, el código y los parámetros de entrada y salida 
requeridos en la forma siguiente: 


mur C, FUNCTIONSCODE 
mur E, SINOLESBYTE 
CALL BDOS 


ódigo de función 
/alor_de un solo byte 
ión 5 

¿A = retorno de código o valor 
50 ML = retorno de valor 





Para aquellas peticiones de funciones que necesitan pasar una dirección 
al BDOS, la secuencia de llamada es: 





mv C, FUNCTIONSCODE ¿€ = código de función 
1x1 D, ADDRESS ¿DE = dirección 
CALL BDOS ¿Posición 5 


¿A = retorno de código o valor 
5o HL = retorno de valor 


Si una petición de función incluye ficheros en disco, hay que indicar al 
BDOS la dirección del FCB que se ha creado para el fichero. (Véase 
capítulo 3 para descripciones del FCB.) 

Muchas funciones de proceso de ficheros devuelven un valor al regis- 
tro A que puede ser bien OFFH, indicando que el fichero nombrado en el 
FCB no ha podido encontrarse, o el valor 0, 1, 2 ó 3. En el último caso, el 
BDOS está devolviendo lo que se llama un “código de directorio”. El 
número es el de entrada del directorio que el BDOS contrastó con el 
nombre de fichero del FCB. En un momento dado, el BDOS tiene un sector 
de 128 bytes del directorio en la memoria. Cada entrada del directorio de 
ficheros es de 32 bytes, así que 4 de ellos (numerados 0, 1, 2 y 3) pueden ser 
procesados al mismo tiempo. El código de directorio indica cuál de ellos se 
ha emparejado con el del FCB. 

Las referencias a los registros del CP/M en las descripciones siguientes 
aluden a sectores de 128 bytes. Es preciso no confundirlos con los registros 
lógicos utilizados en programas de aplicación. Los registros del CP/M han 
de considerarse siempre como sectores de 128 bytes. 


Función 0: Puesta a O del sistema 





Código de la función: C=00H 
Parámetros de entrada: Ninguno 
Parámetros de salida: No devuelve 
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Ejemplo 


9000 = BOSYSRESET EQU o ¡Puesta a cero 

0005 = BDOS EQU 5 ¿Punto de entrada al BDOS 

0000 0E00 MUI C,BSSYSRESET ¡Fijación del código de función 
0002 C30500 MP BDOS ¿Nota: Puede utilizarse un JMP ya que 


¿ no se devolverá el control a este punto 


Propósito La función de puesta a cero del sistema hace que el CP/M realice una 


Notas 


Función 1: 


Ejemplo 


puesta a cero completa, exactamente lo mismo que la función de arranque 
invocada cuando se transfiere el control al punto de WARMBOOT (véase 
figura 4-1). 

Además de la puesta a cero del BDOS, esta función recarga el CCP, 
reconstruye los vectores de situación para los discos en curso, fija la 
dirección de DMA (utilizada por el CP/M para direccionar la memoria 
interna de lectura/escritura del disco) a 80H, marca todos los discos como si 
se encontraran en modo de lectura/escritura y transfiere el control al CCP. 
Este transfiere entonces su mensaje a la consola. 


Esta función es de la máxima utilidad cuando se trabaja en un lenguaje 
de alto nivel que no permite una instrucción de salto a una dirección 
absoluta de la memoria. Deberá utilizarse cuando el programa ha termina- 
do y se necesita devolver el control al CP/M. 


Lectura de un byte de la consola 


Código de función: C=01H 
Parámetros de entrada: Ninguno 
Parámetros de salida: A=Byte de datos de la consola 





0001 = BSCONIN EQU 1 ¡Entrada de consola 
0003 = BDOS Eu 5 ¿Entrada al BDOS 

0000 0E01 mv C, BSCONIN ¿Obtención código de función 
0002 CDOSO0 CALL BDOS 


Propósito Esta función lee el próximo byte de datos del teclado de la consola y lo 


coloca en el registro A. Si el carácter de entrada es un carácter gráfico, será 
repetido en la consola. Los únicos caracteres de control que son repetidos 
son CARRIAGE RETURN, LINE FEED, BACKSPACE y TAB. En el caso de un 
carácter TAB, el BDOS envía tantos espacios como los que se necesitan para 
trasladar el cursor al próximo múltiplo de ocho columnas. Todos los 
caracteres de control restantes, incluido el CONTROL-C, entran pero no son 
repetidos. 








Notas 


Función 2: 


Ejemplo 
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Esta función comprueba también el CONTROL-S (XOFF) por si la salida 
de la consola ha de ser suspendida y el CONTROL-P (conmutador de 
impresión) por si la salida de la consola ha de ser enviada también al 
dispositivo de impresión. Si se encuentra el CONTROLS, la salida a partir de 
este momento ha de ser suspendida hasta que se mecanografíe otro carácter. 
El CONTROL-P hará posible la repetición sobre impresora de la salida de la 
consola la primera vez que se pulsa y la hace imposible la segunda vez. 

Si no existe ningún carácter de datos de entrada, esta función esperará 
hasta que haya una. 


Esta función a menudo más que ayudar incordia, porque repite la 
entrada. Cuando se necesite entrada por consola a nivel de byte a byte, 
normalmente se desea suprimir esta repetición a la consola. Por ejemplo, es 
preciso saber que la “consola” es actualmente una linea de comunicaciones 
tal como un “modem” (?). Puede estarse intentando aceptar una palabra de 
paso que no debe ser repetida en la consola. O bien puede necesitarse leer 
un carácter de control del cursor que provoque un efecto lateral indeseable 
en el terminal si se repite allí. 

Además, si se necesita más de un solo carácter de la consola, el 
programa será más fácil de utilizar si la persona que está en la consola 
puede beneficiarse totalmente de las ventajas de la edición de líneas estilo- 
CCP. Esto se puede hacer mejor utilizando la función de lectura de cadenas 
de la consola (código 10, OAH). 

La lectura de cadenas de caracteres de la consola es también muy útil 
para la entrada de caracteres únicos, especialmente cuando se está esperan- 
do una respuesta “Y” o “N” (sí o no). Si se usa la función de lectura de byte 
de la consola, el operador tendrá solamente una oportunidad para introdu- 
cir los datos. Cuando se usa la lectura de cadenas, los usuarios tienen la 
posibilidad de mecanografiar un carácter, cambiar de opinión, retroceder 
un espacio y mecanografiar otro carácter. 


Escritura de un byte en la consola 
Código de la función: C=02H 


Parámetros de entrada: Byte de datos a lanzar a salida 
Parámetros de salida: Ninguno 








0002 = ¡Escritura de byte en consola 
0005 = ¿Entrada al BDOS 

0000 0E02 my ;Código de función 

0002 1E24 mv ¿E = byte de datos para salida 





0004 CDOS00 CALL 
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Propósito Esta función saca el byte de datos del registro E a la consola. Igual que 
en la función 1, si el byte de datos es un carácter TAB, será expandido por el 
BDOS a la próxima columna que sea un múltiplo de ocho. El BDOS 
controla también la existencia de un carácter de entrada, y si es así, controla 
si es un CONTROL-S (caso en el cual la salida de la consola se suspende) o 
CONTROL-P (caso en el cual la repetición de la salida de la consola a la 
impresora se conecta o se desconecta). 


Notas Pueden surgir problemas en el uso de esta función para enviar a la 
consola secuencias de control de dirección de cursor. Si se intenta sacar una 
dirección binaria real del cursor a la posición 9, el BDOS lo interpretará 
como un carácter TAB (ASCII código 9) y lo colocará debidamente con cero 
a ocho espacios. Si se necesita sacar valores binarios, se deberá fijar a uno el 
bit más significativo del carácter (úsese, por ejemplo, un ORI 80H) de 
forma que no sea tomado como el TAB ASCII. 

Aquí hay dos subrutinas de propósito general, que pueden necesitarse 
para sacar mensajes. La primera, mostrada en la figura 5-3, saca desde una 
dirección especificada un mensaje terminado por un byte cero. El segundo, 
en la figura 5-4, realiza esencialmente lo mismo, excepto que la cadena del 
mensaje sigue inmediatamente después de la llamada a la subrutina. 


Función 3: Lectura de byte de lectora 


Código de función: — C=03H 
Parámetros de entrada: Ninguno 
Parámetros de salida: A=Entrada de carácter 





AMSGOUT (salida de mensaje) 
1Salida de un mensaje terminado por un byte nulo. 


ISecuencia de Llamadas 
, MENSAJES Da "Mensaje" ,0 
1 a A 
1 A 

, CALL MSO0UT 


¡Parámetros de salida 
» HL => byte nulo. Terminal 













0002 = BSCONOUT Eu 2 ¿Escritura de un byte por consola 
0005 = BDOS EU ¿Punto de entrada al 8005 
MSO0UT+ 
0000 7E moya ¡Obtención del byte siguiente para salida 
0001 87 RA A, 
0002 C8 AZ ¿Retorno cuando se da el by! 
9003 23 mo ¿Actualización del apuntador- 
0004 ES PU ¿Almacenamiento del apuntador. 
0005 SF MOV EVA ¿Preparado para BD0S 
0008 0802 MVT C:BSCONOUT 
10008 CDOS00 CALL BDOS 
0008 El Por ¿Recuperación del apuntador-a-nensaje 
000c 30000 ame msGOUT ¿Vuelta atrás para carácter siguiente 





Figura 5-3. Ejemplo de escritura de byte en la consola, salida de un mensaje terminado en byte 
cero de una dirección especificada. 
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AMSGOUTI (salida de mensaje en Línea) 
+SaLida del mensaje terminado por un byte nulo que sigue 
va La Llamada a MSGOUTI.. 
rSecuencia de Llanadas 
; CALL MSG0UTI 
, DB 'mensaje!,0 
; === Instrucción siguiente 
1 Parámetros de salida 
; HL => mensaje que sigue a La instrucción 
0002 = BSCONOUT Eu 2 ¿Escritura de un byte en consola 
0005 = BDOS EU 5 ¿Punto de entrada al 8005 
MSGOUTI: 
9000 El Por ¿HL -> mensaje 
0001 7E mV A ¿Obtención byte de datos siguiente 
0002 23 Nx ¿Actualización apuntador a mensaje 
0003 B7 RA A mprobación de byte nulo 
0004 C20800 YNZ MSGOUTIC , continúe 
0007 ES Pomo ¿retorno a La instrucción siguiente 
7 después del mensaje en-Linea 
NSGOUTIC+ 
0008 ES E] ¿Almacenamiento del apuntador-a-mensaje 
0009 SF MOV ESA ¿Preparado para BDOS 
0004 0E02 Myl C;BSCONOUT ¿código de función 
000c CDOS00 CALL BDOS 
000F c30000 ÁMP MSGOUTI ¿Vuelta atrás para carácter siguiente 











Figura 5-4. Ejemplo de escritura de byte en la consola, salida de un mensaje terminado por un byte 
cero siguiendo la llamada a la subrutina. 


Ejemplo 
0003 = BSREADIN EU 3 ¿Byte Lector de La Lectora 
0003 = BDOS EQU 5 ¿Entrada al BDOS 
0000 0E03 VI C,BSREADIN ¡Código de función 
0002 CDOS00 CALL BDOS ¿A = byte Lector 


Propósito Esta función lee el próximo carácter del dispositivo “lector” lógico y lo 
sitúa en el registro A. En la práctica, el dispositivo fisico al que se accede 
depende completamente de la configuración del BIOS. En algunos sistemas, 
no existe lectora: esta función devolverá un valor arbitrario, tal como JAH 
(el carácter ASCII CONTROL-Z, utilizado por el CP/M para representar 
“Final de fichero”). 

El control no vuelve al programa de llamada hasta que el carácter ha 
sido leído. 


Notas Como el dispositivo físico (si existe) utilizado cuando se envía esta 
petición depende totalmente de cada BIOS particular, no existe una 
posibilidad estándar por defecto para todas las implementaciones del 
CP/M. Esta es una de las partes más débiles del BDOS. 

Habría que “conectar” el dispositivo de lectura por medio del software 
del BIOS a un puerto serie que puede ser utilizado para comunicación con 
| otro sistema. Esto es únicamente una solución parcial al problema, porque 
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esta llamada a función no devuelve el control al programa hasta que se ha 
recibido un carácter de entrada. Existe un camino indirecto con el que se 
puede “escrutar” el dispositivo lector para ver si se ha recibido un carácter 
de entrada. Una vez realizada esta llamada a función, se pierde el control 
hasta que se ha recibido el próximo carácter; no hay ninguna función que 
corresponda a la lectura del estado de la consola (código de función 11, 
0BH) que simplemente lea el estado y vuelva al programa. 

Una posible solución es construir un temporizador en el controlador de 
lectura del BIOS que devuelva el control al programa con un valor 
imaginario en A si transcurre un período especifico de tiempo sin ningún 
carácter de entrada. Pero esto lleva el problema de la elección del valor 
imaginario que se ha de utilizar. Si se considera enviar y recibir siempre 
ficheros que contengan pura información binaria, en ASCII no existe 
ningún carácter que no se pueda encontrar en un contexto legítimo. Por 
consiguiente, cualquier carácter imaginario que se pueda elegir podría ser 
también un dato real. 

La solución más astuta es preparar un montaje del IOBYTE (que 
controle un mapa de dispositivo lógico a dispositivo fisico) para conectar la 
consola a la línea de comunicación serie. Hecho esto, se puede hacer uso de 
la función lectura del estado de la consola, que no devolverá el estado de la 
consola fisica, sino el estado de la linea serie. El programa podrá entonces 
actuar adecuadamente si no se recibe ningún carácter en un periodo de 
tiempo establecido. La figura 5-11 muestra una subrutina que utiliza esta 
técnica en la función que fija el IOBYTE (código 8, 08H). 

La figura 5-5 muestra un ejemplo de subrutina para leer líneas de datos 
desde el dispositivo lector. Lee caracteres desde la lectora, acumulándolos 
en la memoria hasta que se recibe o bien un LINE FEED o un número 
especifico de caracteres. Obsérvese que el CARRIAGE RETURN se ignora, y 
que la línea de entrada está terminada por un byte 00H. El acuerdo de 
terminar las cadenas con bytes 0OH y no con CARRIAGE RETURN se utiliza 
porque hace mucho más fácil la lógica del programa. Se adapta también a 
los convenios en lenguaje C. 


Función 4: Escritura de byte por perforadora 


Ejemplo 


Código de función: C=04H 
Parámetros de entrada: E=Byte para salida 
Parámetros de salida: Ninguno 


0004 = BSPUNOUT EQu 4 ¡Escritura de byte por perforadora 
0003 = BDOS EQU s 

0000 0E04 mv C+ BSPUNOUT ¡Código de función 

0002 1E2A . 


MUI Ets ¿Byte de datos para salida 
0004 CDOS00. CALL BDOS 


Capítulo 5: El sistema operativo básico de disco 





87 





0003 
0005. 


0000 
0004 


0000. 
0001 
10002 
0003 
0006 
0007 


0008 
000R 
0000, 
000€ 
0010 
0013 
0014 
9013 
0017 
001A 
0018 
0010 
001D 


v0z0 
0022 





79 
Bo 
Ed 
cazooo 
es 
Es 


EOS 
00500 
se 
FE0D 
CAO800 
El 

cl 
FEOA 
cA2000 
77 

23 

ob 
caoco0 


3600 
ES 


¿RLSROR 

¡Lectura de Línea del dispositivo de Lectura. 

:Se ignoran Los retornos de carro y la Lectura cuando 
ise ha Leido un núnero determinado de caracteres 

30 bien cuando entra un salto de Línea (LINE FEED). 


¡Nota: Una posible desventaja de esta subrutina es La no 
vexistencia de Límite de tiempo. Esperará infinitamente 
+si no Llegan más caracteres al dispositivo Lector. 


'Secuencia de Llamadas 


; ex 
: xr 
; CALL 





¡Parámetros de salida 

, HL -> cadena terminada en 004 

: 8C = cuenta atrás (0 si se ha Leido el núnero máxino de caracteres) 
, E = último carácter Leído 

















BSREADIN Emu 3 ¡Entrada de Lectora 
al EU 5 ¿Punto de entrada al 8005 
Cr EQU ODM ¿Retorno de carro 
LE EQU 0AH ¿Salto de Línea Cterminal) 
RLRDR: 
mov AC ¿Comprobación de cuenta a 0 
oRa—— E í cuenta = 0 simular Último 
moy EVA carácter Leido 00H 
ye RLSRDAX ¿Si, salida 
PusH Bb 5Alnacenar cuenta número máximo de cat 
Pu 5Alnacenar apuntador a memoria internedía 
RLRORI: lucle para ignorar 
VI C/BSREADIN 
CALL BDOS ¿A = carácter de entrada 
moy EsA ¿Preservar una copía de Los caracteres 
cer CR ¿Comprobación de Sí es un retorno de carro 
m3 RLSRORI 351, ignorarse 
A] ¿Recuperación del apuntador a La menoría intermedia 
Pop B ¿Recuperación de cuenta de náximo 
cer LE ¿Comprobación por si es un salto de Linea 
y RLARDRX 551, salida 
moy MA ¿Nos almacenar carácter en la menoria intermedia 
Nx ¿Actualización del apuntador a La memoria intermedia 
xo B ¿Decrementación de contador 
JUE RLSROR ¿Vuelta atrás para carácter siguiente 
RLSRDAX: 
miooo ¡Memoria intermedia terminada por un byte nulo 
RET 








Figura 5-5. Lectura de línea desde el dispositivo de lectura. 


Propósito Esta función es un duplicado del byte “lector” de la lectora descrito 
anteriormente. Saca el carácter específico del registro E hasta el dispositivo 
lógico de perforación. De nuevo, el mecanismo físico utilizado, si existe, 
está determinado por el BIOS. No existe ningún conjunto estándar para 
este dispositivo; en algunos sistemas el dispositivo de perforación es un 
“cubo de bits”, llamado así porque absorbe todos los datos que se le 
envían. 


Notas 


Los problemas y posibles soluciones tratados para la llamada de la 


función del byte “lector” de la lectora pueden también aplicarse aquí. Una 





88  CP/M Manual para programadores 


diferencia, desde luego, es que esta función saca datos, por lo que el 
problema de un bucle indefinido esperando el próximo carácter es menos 
probable que ocurra. Sin embargo, si el dispositivo de perforación está 
conectado a una línea de comunicaciones, y si el hardware de salida no está 
preparado, el controlador de línea del BIOS esperará eternamente. Por 
desgracia, no existe ningún camino legítimo para luchar con este problema, 
ya que el BDOS no tiene ninguna llamada a función que controle si un 
mecanismo lógico está dispuesto para salida. 

La figura 5-6 muestra una subrutina útil que saca una cadena terminada 
por el byte 00H a la perforadora. Cuando encuentra un LINE FEED, inserta 
un CARRIAGE RETURN en los datos de salida. 


Función 5: Escritura de byte por dispositivo de listado 


0004 
0005 


0000 
0008 


0001 
0002 
0003 
0008 
0008 
0008 
000 


0011 
0012 
0013 





001 


0020 
0021 


Figura 5-6. 


Es 
7E 

87 
CAz000 
FE0A 
Ec1600 
Ed 
OE04, 
CDOS00. 
Es 

23 
Ca0000 


cs 


E 


co 


Código de función: C=05H 
Parámetros de entrada: E=Bytes para salir 
Parámetros de salida: Ninguno 























AMLSPUN 
¡Escritura de una Línea en el dispositivo de perforación 
sLa salida termina cuando se encuentra un byte 00H. 

¿Se Lanza un retorno de carro cuando se encuentra 

tun salto de Línea. 


:Secuencia de Llamadas 
; Lx1 MS BUFFER 
1 CALL MLSPUN 





ránetros de salida 





, ML => byte terminal 004 
BSFUNOUT EU 
Boos EQU 5 
cr EQU 004 ¿Retorno de carro 
LE EQU 0AM ¿Salto de Línea 
HLSPUN: 
Pu ¿Almacenamiento del apuntador a memoria internedía 
mo AM btención del carácter siguiente 
RA A ¿Comprobación de si 00H 
yz HLFUN ¿SÍ, salida 
NS ¿Comprobación de salto de Línea (00H) 
ca HLSPUNLE %, O/P retorno de carro 
moy Carácter a enviar a la salida 
ódigo de función 
Calo dos ¿Salida de carácter 
¿Recuperación del apuntador a memoria intermedia 
mo ¿Incrementar para carácter siguiente 
Se LSPUN ¿Salida carácter siguiente 
HLSPUNLES JaLto de Linea encontrado 







ódigo de función 
¿Lanzar un retorno de carro 









¿Creación de un salto de Línea 
Rer ;Envio de LINE FEED 
HLPUNA: ¿Salida 


A] ¿Pop de la pi 
had ¿Pop de La pila 








Escritura de línea por el dispositivo de perforación. 


Ejemplo 
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0005 = BSLSTOUT EQU s ¡Escritura de byte por dispositivo de 
0003 = BDOS EQU s ¿Listado 

0000 0E05 mur C, BSLSTOUT ¡Código de función 

0002 1E2A mv Esas ¿Byte de datos para salida 

0004 CDOS00 CALL BDOS 


Propósito Esta función saca el byte especificado en el registro E por dispositivo 


Notas 


lógico de listado. Como con la lectora y la perforadora, el dispositivo físico 
utilizado depende totalmente del BIOS. 


Uno de los mayores problemas asociados con esta función es que no se 
enfrenta con las condiciones de error de forma muy inteligente. No se puede 
estar seguro de qué mecanismo fisico será utilizado como dispositivo de 
listado lógico, y la mayoría de las implementaciones estándar del BIOS 
causarán que el programa espere eternamente si la impresora no está 
dispuesta o se ha salido fuera del papel. El BDOS no está preparado para 
devolver algún tipo de estado de error para indicar que existe un problema 
con el mecanismo de listado. Por consiguiente, el BIOS tendrá que 
adaptarse para dominar esta situación. 

La figura 5-7 es una subrutina que envía datos al mecanismo de listado. 











Como puede verse, es esencialmente una repetición de la figura 5-6, que 
configura la misma función para el dispositivo lógico de perforación. 
Función 6: Entrada/salida directa de la consola 
Código de función: C=06H 
Parámetros de entrada: E=0FFH para entrada 
E=0tros que no sean OFFH para salida 
Parámetros de salida: A=Byte de entrada o estado 
Ejemplo 
0006 = BSDIRCONIO Eu 6 ;Entrada/salida directa de La consola 
9005 = BDOS EQU 5 ¿Punto de entrada al BDOS 
enplo de entrada por consola 
0000 0E06 mr ¿Código de función 
0002 1EFF mI ¿OFFH significa entrada 
9004 CDOSO0 CALL ¿A = 00 si no existe carácter a la 
Jespera 
¿A = NZ si existe 
¿Ejemplo de salida por consola 
0007 0E0S mur ¿Código de función 
0009 1E2A mur istinto de OFFH significa salida de 





000B CDO300 CALL 
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ILSLST 
¡Escritura de una Línea en el dispositivo de Listado. La salida 











torno de carro 
Lto de Linea 





¿Alnacenamiento del apuntador a memoria intermedia 
¿Obtención del carácter siguiente 










O/P retorno de carro 
icter a enviar a la salida 
¿código de función 
¿Salida de carácter 
¿Recuperación del apuntador a menoria intermedia 
¿Actualización para carácter siguiente 

Lida de carácter siguiente 





¿Salto de Linea encontrado 
¡go de función 
jar un retorno de carro a salida 





¡Creación de un salto de Línea 
¿Envio de LINE FEED 


¿Salida 
¿Pop de la pila 








)termina cuando se detecta un byte O0H. 
1Se envía un retorno de carro cuando se detecta un 
tsalto de Linea. 
iSecuencia de Llamadas 
; EXI M.BUEFER 
, CALL WLsLST 
'Parámetros de salida 
, HL => byte terminal 004 
0005 = BeLSTOUT Eu 
0005 BDOS EU S 
0000 = CR EQU 00M 
0004 = LE EQU OH 
MLeLST+ 
9000 ES Puso 
0001 7E mV AM 
0002 87 RA A ¿Comproba 
9003 CA2000 y HLeLSTx 7 salida 
0006 FEOA NS 
9008 CC1600 cz MLSLSTLF 
9008 SF MOV EJ 
900C 0E05 mr ESLSTOUT 
Ó00€ CDOS00 CALL BDOS 
0011 EL Por 
0012 23 1Nx 
0013 C30000 JP MLS 5 
HLELSTLES 
0018 0805 MVI O C,BsLSTOUT ; 
0018 1€0D MI ENCR Ja 
001A CDOS00 CALL BDOS 
O01D 3EOA MI ALE 
o001F C9 Rer 
HLOLSTX: 
0020 El A) 
0021 CS Rer 
Figura 5-7. Escritura de línea en el dispositivo de listado. 








introduce y saca caracteres de 


la consola. Sin embargo, no toma en consideración los caracteres de control 
normales ni las características particulares de la edición de lineas (tales 
como CONTROL-P y CONTROL-S) asociados normalmente con la entrada/sali- 
da de la consola, de aquí el nombre de “directo” (o “sin adornar” que 
describe Digital Research). Si el valor en el registro E no es OFFH, entonces 
E contiene un carácter ASCII válido que sale a la consola. La lógica usada 
se entiende más fácilmente cuando se escribe en pseudocódigo: 


si se trata de una petición de entrada (E = OFFH) 
ES 


sí el estado de la consola indica que existe un carácter esperando 


( 


Leer el carácter de La consola y retorno 
a la rutina de Llamada con el carácter en A 


E 


sino (no hay ningún carácter esperando) vuelta 
a la rutina de Llamada con A = 00 


> 
sino (petición de salida) 


enviar a La consola el carácter en E y volver 


a la rutina de Llamada 
> 
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Notas Esta función trabaja bien mientras que no haya que enviar nunca un 
valor OFFH o se espere recibir un valor 00H. Si se necesita enviar o recibir 
datos puramente binarios, no se puede utilizar esta función, ya que estos 
valores pueden igualmente formar parte del flujo de datos. 

Para entender por qué puede desearse enviar y recibir datos binarios, 
recuérdese que el “lector” lógico no tiene ningún método para que el 
operador compruebe su estado para ver si ha llegado un carácter de 
entrada. Todo lo que puede hacerse es intentar leer un carácter (byte lector 
de la lectora, código de función 3). Sin embargo, el BDOS no devolverá el 
control al operador hasta que llegue un carácter (lo que puede resultar muy 
largo). Una posibilidad es asignar lógicamente la consola a una línea de 
comunicación mediante el uso del IOBYTE (o cualquier otro medio 
similar) y entonces utilizar esta llamada de entrada/salida directa para 
enviar y recibir datos a y de la línea. Entonces se puede “registrar” la línea 
de comunicaciones y evitar el tener el programa esperando indefinidamente 
la llegada de un carácter de entrada. Un ejemplo de subrutina que utiliza 
esta técnica se muestra en la figura 5-11 sobre la fijación del IOBYTE 
(código de función 8). 

La figura 5-8 muestra una subrutina que utiliza la entrada y la salida 
directas de la consola. Como este ejemplo es más complejo que cualquier 
otro de los mostrados hasta ahora, el programa utilizado para controlar la 
subrutina se ha incluido también. 

PROGRAMA DE PRUEBA 

) debido a La complejidad de esta subrutina, el verdadero 
7 programa base-de-comprobación se ha omitido en este ejemplo. 
3 Se Supone que DDT o 2S1D se Utilizan Para 

control de salida. 

Je 1 ¡Cambiar a 1F O para desactivar el programa 
o1co ORO 1004 
D100 C31101 SP START ¿Variables de paso activadas por DOT 
0103 90 OPTIONS: Da o ¿Indicadores de opción 
0104 41454900 TERMS: DE A0/TE% "10.0 ¿Terminales 
0108 05 BUFFER >. 5 ¡Número náxino de caracteres en nenoria intermedia 
0109 00 ».o 0 ¿Contador 
OIOA $363636363 DB 99,99,99.99,9% ¿Bytes de datos 
D1OF 6363 De 99,9% 

STARTS 

or 210501 EXE HLBUEFER ¿obtención de La dirección de La menoría intermedia 
0114 110401 ÍXE O DoTERHS ¿Dirección de La tabla de terminales 
0117 3A0301 LDA OPTIONS ¿Obtención de opciones activadas por DDT 
OLA 47 MOV BA ¿Puesta en el registro correcto 
o118 co2b01 CALL RES ¿Entrada de subrutina 
O11E CD3800 CALL 36m Forzar punto de ruptura de DDT 
or21 C31101 JM START Nueva comprobación 

ENDrE ¿Final del programa de prueba 


¿RCS: Lectura de cadena de caracteres de La consola (utilizando entrada directa) 
¿Lee sobre una memoria intermedia una cadena de caracteres 
5 Utilizando La entrada directa. 








Figura 5-8. Lectura/escritura de cadenas de/a la consola utilizando entrada/salida directa, 
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y Opciones de soporte: 
O Repetición (eco) de caracteres o no (sí se repiten 
debe enviarse un retorno de carro seguido de 
un salto de Línea) 


o Terminación de entrada por: 








O Núnero máximo de caracteres de entrada 


1 
, 
+ O Arranque caliente cuando entra control=C o no 
, 
: 


0.0 por derección de un carácter terminal 





3 Secuencia de Llamada 
1 A Buren 

: La memoria internedía tiene La estructura: 

; Mem. intermedia: DB 10 Tamaño máximo 

; DE o Lectura real 

h ES 10+1 — Area de memoria intermedia 
: MUI B,OPTIONS Opciones requeridas 

; (ver equivalencias) 

: LX D,TERMS Apuntador al byte de final 

; de caracteres (004), 

+ cada uno de Los cuales 

; es un terminal 

; CALL Res 

3 Parámetros de salida 

, Menoria intermedia: Actualizada con bytes de datos 

, y con el contador de caracteres de entrada. 

, (No se incluye el terminal.) 

; A = Código de terminación 

, o Número máximo de caracteres de entrad 


Figura 5-8. (Continuación.) 





Terminal detectado. 




















0001 = ROSSECHO. Eu o000s0001B ¡Caracteres de entrada a repetir 
0002 = ROSSABORT EQU 0000800108 ¿Abortar sí se da control-C 
0004 = ROSSFOLD: EQU 0000s0100B ¿Cambio de minúsculas a mayúsculas 
0008 = ROSATERM EU 0000810008 ¿DE => fijación de carácter terminal 
0008 = BSDIRCONIO. Eu ¿1/0 directa por consola 
9003 = nos OS ¿Punto de entrada al BD05 
9003 = Crec EQU om ¿Control-c 
0000 = CR EQU QM ¿Retorno de carro 
0004 = E EQU OAM ¿Salto de Línea 
0008 = BS EQU 08H ¿Retroceso 
RESSST: ¿Tabla de terminales estándar 
0124 0D Do 00H ¿Retorno de carro 
0125 04 DB o] ¿Final de Linea 
0126 00 De o ¿Fin de tabla 
ROSHESS: ¡Secuencia de retrocesos destructiva 
0127 08200800 De BS,* -,BS,0 
ROS: <<e<< Entrada principal 
0128 23 moon IL -> contador real 
O12C 3600 mI omo jesta al estado inicial 
012€ 28 Dom ¿ML => máx. contador. 
ROS8L: 
o12F ES Pus A ¿Almacenamiento del apuntador a memoria intermedia 
0130 C09201 CALL Ressoc tención de carácter y ejecución de Las opciones 
CHO, ABORT y FOLD. 
¿€ = carácter de entrada 
o133 Er Por ¿Recuperación del apuntador a memoria intermedia 
0134 3808 MVT ALRESSTERN ¿Comprobación de terminal especificado-por=el=usuario 
0136 AD ANA E ¿8 = opciones 
0137 C23001 ÚNZ O ROSSUST ¿Terminales especificados=por-el-usuario 
DI3A 112401 EXI D,ROSeST ¿Terminales estándar 
ROSSUST: 
0130 COD4O1 CALL ROSSCT ¡Comprobación existencia de terminal 
0140 CASCOL ye ROSSNOrT ¿No terminal 
0143 47 MOV BLA ¿Conservación de Los caracteres terminales 
ROSeMCI: ¿(Monero máxino de caracteres de entrada comparte este progana) 
0144 0E00 mI co ¿Finalización de memoria intermedia 
0146 CD7FO1 CALL RisesC ¿Almacenamiento de carácter 





0149 
Ol4n 
oLaB 


orac 
O14E 
O14F 
0152 
0155 
0158 
0158 
0150 


0160 
otel 
0162 
0163 
0166 
0167 
0168 
OLÉ 
OLE 


0170 
017 
0172 
0175 
0176 
0177 


0178 


0178 
017c 


0177 
o1so 
0161 
0182 
0183 
0184 
0186 
0187 
0188 
0189 


0184 


o188 
otec 
volen 
o18E 
o18F 
0190 
019 


0192 
0193 
0194 








Figura 


78 
87 
c9 


2508 
> 
casoo1 
co7FO1 
cosmos 
E2arO1 
0600 
c349o1 


ES 
2 

35 
FAzAO1 
212701 
3E01 
ao 
cA7oor 
23 


cs 
DS 
CoFSO1 
DI 
a] 
37801 


34 


El 
Csaror 


ES 
23 


10 
1800 
19 
n 
El 
DI 


co 


ES 
TE 
23 


El 
09 


5-8. 


mov 
'ORA 
RT 


ROSINOTT+ 
mur 
cm 
m7 
CALL 
cau 
UNZ 
mr 
e 


ROSeBS: 
PusH 
10% 
DcR 
0] 
dx1 
mur 
ANA 
uz 
Tx 


ROSSESNE: 


ROSHNES: 


ROSHBS: 
Por 
a 


Rosescr 


235338 


ñ 


ROSsuc: 


ROSe0Cr 


(Continuación.) 


ABS 
e 
ROSseS 
Resssc 
RESSUC 
RESSL 
B/0 
RESsMCI 


231 


RESSNES 
H,RCSSESS 
AL ROSSECHO 


E 
ROSSBSNE 
$" 


E 
D 
Hes 
D 


B 
ROSSBSX 


z321>1 


uo 
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¡Recuperación de carácter terminal 
FActivación de indicadores 


¿No terminal 
¿Comprobación de retroceso 


¿Retroceso entrado 
“Almacenamiento de carácter en menoría intermedia 
JActual ¡zación de contador 

lo máximo, obtención de otro carácter 
'SimuLación de carácter terminal 
¿A =D por entrada del no máximo de caracteres 





¿Retroceso entrado a 
¿Almacenamiento del apuntador a menoria internedía 
¿HL => cuenta real 

¿Disminuir una unidad 

¿Comprobación cuenta negativa 

¿HL => secuencia de retrocesos 

'No, comprobación de repetición 

:85 ha sido repetida 

No, La entrada BS no repetida 

¿saltarse el retroceso inicial 





¡Almacenar opciones y carácter 
¿Almacenar apuntador a tabla de terminales 
¿Escrítura de cadena por consola 

Snecuperación del apuntador a tabla de terminales 
¿hecuperación de opciones y carácter 

¿salida desde retroceso Lógico 


¡Puesta a O del contador 


¡Recuperación del apuntador a memoria intermedia 
¿obtención del carácter siguiente 


¡Guardar en La memoria intermedia el carácter en € 

¿HL -> apuntador a memoria intermedia 

¿Almacenar apuntador a tabla de terminales 

¿Almacenar apuntador a memoria intermedia 

ZAL => cuenta de un carácter en menoria intermedia 
tención de La cuenta real 

¿Cuenta de puntos O hasta el primer byte de datos 
'ransterir el valor de contador a palabra 

¿HL > siguiente byte de datos Libre 

¿Almacenamiento de byte de datos 

¿Recuperación del apuntador de memoria intermedia 

¿Recuperación del apuntador a 

5 la tabla de terminales 








¡Actualización del contador de menoría y comprobación de máx. 
¿Retorno 2 activo sí = máx., NZ 

3 si no HL -> menoria intermedia en entrada 

¿Almacenar apuntador a memoria internedia 

¿obtención máximo de cuenta 

¿ML -> cuenta real 

¿Incremento cuenta real 

¿Comparación máxina con real 

¿Recuperación apuntador menoria intermedía 

ÍMarca 2 activada 





¡Obtención de carácter y ejecución de Las opciones 
2 ECHO, ABORT y FOLD 
¿Almacénar apuntador a tabla terminales 
Imacenar apuntador a menoria intermedia 
Imacenar indicadores de opción 
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0104 


0105 
0108 
0107 





360% 
AD 
CAESO1 
3501 
Ao 
CADIO1 
cs 
57 
EOS 
cDO500 
cr 
3E0D 
ES 
c20101 
eS 
0Egs 
SA 
cD0S00. 
cr 


El 
AN 
09 


JA 
87 
CAEZz01 


OIDA 89 


0108 
10€ 
DD 


012 


o1ES 
os 


CAEZO1 
13 
caosor 


»7 


rn 
co 


ROSeWTE 
mur 
mI 
CALL 
RA 
3 
Pop 
mov 
mur 
ANA 
yz 
mr 
cue 
3 


ROSAS 
mr 
ANA 
CNZ 
mur 
ANA. 


ROSANES 


Rosecr 


ROSSCTL: 
DAX 
GRA, 


Ed 
3 
Tux 


ROSSCTx 


ORA 


Por 
Rer 


C+BSDIRCONIO 
ELOREN, 

BDoS 

A 


RosewT 
E 

CA 

A: ROSSABORT 
E 


RCSSNA 
A/CTLIC 
e 


o 


prosa 

: 

Fourren 

Pico 

: 

Fco 

: 

le 

Esrorrcoo 

sos 

h 

hon 

e 

fc 

y 
porra 

E 


100 





$. 
D 


D 
A 
ROSeCTx 
E 
Resscrx 
D 


Rosscri 





¿Código de función 
¿Especificar entrada 


¿Comprobación de datos esperando 
ás y espera 

tecuperación de indicadores de opción 

¿Almacenamiento de byte de datos 

¿Comprobación de opción abortar activada 








lo aborto 
¿Comprobación de control-C 


¿Arranque caliente 


¿Comprobación de actuación sustitución de caracteres (FOLD) 


¿Convertir a mayúsculas 
¿Comprobación petición de repetición 


¿No se requiere repetición 
¿Almacenamiento de opciones y carácter 
iransterencia carácter para salida 

código de función 

jepetición de carácter 
¿Recuperación de opciones y carácter 
¿Comprobación de retorno de carro 









inacenar opciones y carácter 
código de función 
¿Enviar a salida salto de Línea 





¿Recuperar opciones y carácter 


¿Recuperar apuntador a memoria intermedia 
¿Recuperar tabla de terminales 
¿Carácter en € 





¿Comprobación de terminal 
(€ = carácter entrado 

DE -> cadena de caracteres 
terminales (byte 00H. 

¿Devuelve estado 2 si no 

¿ encuentra coincidencia, NZ sí la 
7 encuentra (con A = C = Último 

5 carácter) 

¿Almacenar apuntador de tabla 








Obtención del siguiente carácter terminal 
Comprobación final de tabla 

No coincidencia con ningún terminal 
¿Comparación con carácter de entrada 
¿Coincidencia con terminal 

¿Movimiento hacia el terminal siguiente 
¿Bucle para probar el siguiente 

7 carácter de La tabla 











¿Comprobación de salida por terminal 
¿En este punto A será O si se 

; ha alcanzado el final 

5 de la tabla, O NZ si se ha 

5 encontrado úna coincidencia. 

5 El indicador 2 será 

5 activado 

¿Recuperación del apuntador de tabla 





* TOUPPER - Canbio de minúsculas por mayúsculas 
€ = Carácter de entrada y salida 





Figura 5-8. 


(Continuación.) 
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DIES 3E60 MUI Atar ¿Comprobación de necesidad del cambio 

0157 89 eme. ¿Comprobación con el carácter de entrada 

DIES D2FSO1 ÍNC O TOUPK No, carácter es < 41 

OLEB 3E7A MUI Ar tzs ¿Puede ser, carácter => "a' 

OLED 89. AS 

OIEE DAFSOL Je TouPx ¿No, carácter > "2" 

OLF1 3EDF MUI ALODFN ¿Cambio de carácter 

OLFS AL ANA C 

OLEA AF MY C.A ¡Devolución del carácter cambiado 
TOUPXe 

or 9 mer 


¡Cs - Escritura de cadena en consola (utilizando E/S directa) 
¡La salida termina cuando se encuentra un byte 00M. 

7Se envía a La salida un retorno de carro cuando se detecta 
sun salto de Línea. 


¡secuencia de Llamada 








1 EXT, BUFFER 
+ CALL MES 
iParámetros de salida 
+ ML => byte terminal 004 
mes: 
DIES ES Pu ¡Almacenamiento del apuntador a memoria intermedia 
O1E7 7E moy Am ¿obtención carácter siguiente 
OLF8 87 RA A ¿Comprobación de 00H 
DIES CAL02 wa hosx Si, salida 
OIFC FEOA cer LE ¿Comprobación de salto de Linea 
DIFE CCOCOZ cz wOSLF ¿Si, salida de un retorno de carro 
0201 SF moy EVA ¿Carácter para enviar a salida 
0202 0E0S MVT CiBSDIRCONIO — ¿Código de función 
0204 CDOS00 CALL BDOS ¿Salida de carácter 
0207 El A] ¿Recuperación de apuntador de memoria intermedia 
0208 23 muxo ¿Actualización para carácter siguiente 
0209 C3Fe01 ame eS ¡salida del carácter siguiente 
HosLEr ¡Detectado un salto de Línea 
020c 0E0S mur IDIRCONIO — ¿Código de función 
020€ 1E0D mur ¿Salida de un retorno de carro 
0210 CDOS00 CALL 
0213 3E0A mur ¿creación de salto de Línea 
0215 C9 RET ¿Salida de un LF 
Hess ¡Salida 
0216 El NL] ¿Reajuste de La pila 
0217 C9 RET 





Figura 5-8. (Continuación.) 


Función 7: Obtención del montaje IOBYTE 


Código de función: C=07H 
Parámetros de entrada: Ninguno 
Parámetros de salida: A=Valor del IOBYTE 





Ejemplo 
9007 = Eu 7 ¿Obtención del 1OBYTE 
0005 = EQU 5 ¿Punto de entrada al BD0S 
9000 0E07 HVI Cc, BSOETIO ¿Código de función 


0002 CDO300 CALL BDOS ¿A = 1OBYTE 
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Propósito Esta función coloca el valor en curso del IOBYTE en el registro A. 


Notas Como vimos en el capítulo 4, el IOBYTE es un medio de asociar los 
dispositivos lógicos del CP/M (consola, lectora, perforadora y listado) con 
los dispositivos fisicos soportados por un BIOS particular. El uso del 
IOBYTE es completamente opcional. El CP/M, según dice textualmente la 
Guía de modificaciones de CP/M 2.0, “tolera la existencia el IOBYTE en la 
posición 0003H”. 

En la práctica, la utilidad STAT que proporciona Digital Research posee 
algunos mecanismos que sitúan diferentes valores en el IOBYTE desde la 
consola del sistema. 

La figura 5-9 resume la estructura del IOBYTE. Una descripción más 
detallada se dio en el capítulo 4. 

Cada campo de dos bits puede tomar uno de cuatro valores: 00, 01, 10 y 
11. El valor puede ser interpretado por el BIOS como un dispositivo fisico 
específico, según se muestra en la tabla 4-1. 

La figura 5-10 muestra las equivalencias que se utilizan con referencia al 
IOBYTE. Como puede verse, los valores que se muestran se han declarado 
utilizando el operador SHL (desplazamiento a la izquierda) del ensambla- 
dor de Digital Research. Esto no es más que un recordatorio de que los 
valores están estructurados de esta forma en el propio IOBYTE. 


Función 8: Fijación del IOBYTE 


Código de función: C=08H 


Parámetros de entrada: 





=Valor nuevo del IOBYTE 


Parámetros de salida: Ninguno 


Ejemplo El listado siguiente muestra cómo asignar el dispositivo lógico de lectura 
al controlador de consola del BIOS. Este utiliza algunas equivalencias de la 


figura 5-10. 


Es 338 


BSOETIO. EQU 7 ¡Obtención del 1OBYTE 

BSSETIO Eu 8 ¿Fijación del 1OBYTE 

BDOS EQU 5 ¿Punto de entrada del BDOS 

1OSRDAM EQU O00081100B ¿Máscara de bits de la Lectora 
TOSRURI EQU 2SH 2 Lección de usuario de Lectora 





¡Este ejemplo muestra cómo asignar la lectora Lógica 
za La Lectora definida por el usuario 41 (UR1:) 


ORG 100H 

mvI C, BSOETIO ¿Primero, obtención IOBYTE en curso 

CALL BDOS 

ANI ANOT IOBRDRM) AND OFFM ¿Conservación de todos Los bits 
5 excepto Los de Lectora 

ORI 1OSRURI ¿0R, en se fijan de nuevo 

moy EA ¿Preparando para fijar 1OBYTE 

mv C,BASETIO ¿Fijar muevo valor 

CALL BDOS 
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Número de bit Si4i3r2i1101 


Dispositivo lógico Listado Perforadora Lectora Consola 





Figura 5-9. Estructura del IOBYTE. 


Propósito Esta función sitúa en el IOBYTE un nuevo valor que está dado en el 
registro E. A causa del campo de bits individual del IOBYTE, normalmente 
se utilizará la función de obtención del IOBYTE, se cambiarán algunos bits 
del valor en curso, y entonces se llamará la función de fijación del IOBYTE. 


Notas Se pueden utilizar las funciones de fijación del IOBYTE, de obtención 
IOBYTE y de entrada/salida directa de consola juntas para crear un 
pequeño programa que transforme el sistema de cálculo en un terminal 
inteligente. Todos los datos que se mecanografien en el teclado pueden 
enviarse a una línea de comunicación serie de otro ordenador, y todos los 
datos recibidos en la línea pueden ser enviados a la pantalla. 























¿Equivalencias 1OBYTE 
¿Sirven para acceso al 1O8YTE 
Ímáscara para aislar dispositivos específicos. 
SInversamente puede utilizarse para proteger todos los dispositivos 
7 excepto uno específico 
0003 = IOSCONM EQU 0000800118 ¡Máscara de consola 
000c IOSRDRM EQU de Lectora 
0030 = IOSPUNH EQU de perforadora 
90co = 1OSLSTH EQU ¿Máscara de impresora 
¿Valores de 
9000 = 1OSCTIY E0U O e 
0001 = 1OSCCRT EQU 1 > 
0002 = IOSCBAT EQU 2 (entrada) <- ROR: 
(salida) > LS 
0003 = 1OSCUCI EQU 3 > UCt: (consola de usuario 1) 
de Lectora 
9000 = 1OBRTTY EQU 0 SM 2 <- Tm 
0004 = IOSRRDR EQU 1 SM 2 <- RO 
0008 = 1OSRURI EQU 2 SH 2 <- URT: (lectora usuario 1) 
000c = 1OSRURZ EQU 3 SH 2 ¿Lectora <- URZ: (Lectora usuario 2) 
¿Valores de perforadora 
9000 = 1OSPTTY EQU O SHA ¿Perforadora > TIY: 
0010 = IOSPPUN EQU 1 SHA ¿Perforadora -> PUN: 
0020 = 1OSPUPL EQU 25H A ¿Perforadora -> UP? 
0030 = 1OSPUP2 EQU 3 SHA ¿Perforadora -> UP2: (perforadora usuario 2) 
¿Valores de Listado 
9000 = 1OSLTTY EQU O SH 6 ¿Listado B 
0040 = IOSLORT EQU 1 SH 6 ¿Listado 
0080 = 1OBLLPT EQU 25H 6 ¿Listado Cimpresora de Líneas físicas) 
O0cO = TOSLULA EQU 3 SH S ¿Listado -> ULT: (impresora usuario 1) 








Figura 5-10, Equivalencias IOBYTE. 
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La figura 5-11 muestra este programa e ilustra el uso de todas estas 


funciones. 


Para que este programa funcione correctamente, el BIOS deberá 
controlar el IOBYTE y detectar si la consola lógica está conectada a la 
consola física (con el IOBYTE situado en TTY:) o al lado de entrada de la 
línea de comunicaciones serie (con el IOBYTE puesto en RDR;). 

La figura 5-11 muestra cómo utilizar las funciones de obtención y 
fijación del IOBYTE para realizar un simple emulador de terminal, Para 
que este ejemplo funcione, el BIOS deberá detectar el valor de la consola 
como 3 (IOSCUCI) y conectar las funciones de estado de la consola y 





entrada y salida de la misma a la línea de comunicaciones. 











9006 = Eu e 

9007 EQU 7 

0008 Eu 8 

0008 EQU a 

9005 Eu 5 

0003 = 1OSCONM EQU 0000800118 

0001 == 1OSCCRT EQU 1 

0003 = 1OSCUCI EQU 3 
TERM: 

0000 CD2A00 CALL SETCRT 
TERMSCKS: 

9003 CDS200 CALL CONST 

0006 CAZ400 m7] TERMSNOKT 

0009 CALL CONIN 

o00c chacoo CALL SETCOMN 

OGOF Chasoo CALL CONOUT 
TERMECOS: 

0012 cosz00 CALL CONST 

0015 CA0000. Ni TERM 

0018 CDaBOo CALL CONIN 

0018 COZAGO CALL SETCRT 

O01E C04s0o CALL CONOUT 

0021 C30300 SNE TERMACKS 
TERMANOKI: 

0024 cDa000 CALL SETCOMM 

0027 C31200 ÍMP TERMACOS: 
SETCAT: 

0024 FS Push PSA 

0028 0601 MUI B,1OSCCRT 

0020 033300 UMP O SETCON 
SErcOmA: 

030 FS Ps 

0031 0603 B, TOSCUCt 
SETCON: 

0033 CS puse 

0034 0807 MVT C/BSOETIO 

0036 ChOS00 CALL BDOS 

0039 ESFC ANI 

0038 CL Por 

003c BO OR e 

0030 SE moy EA 

003€ 0E08: MI C;BSSETIO 

0040 CDOS00 CALL BDOS 

0083 FL Por PSA 


Figura 5-11. 








Emulador de terminal sencillo. 


Entrada/salida directa de consola 
“obtención del 1OBYTE 

¿Fijación del 1OBYTE 

¿obtención del estado de La consola 
¿Punto de entrada al BD0S 





¿Máscara de consola para 1OBYTE 
¡Consola => CRT: 
¡Consola => consola de usuario M1 








¿Conexión consola => CRT: 


¡Obtención estado CRT 
¿No consola de entrada 

¿obtención de carácter por teclado 
¿Conexión consola => Línea com. 
¿Salida a La Linea de com. 


¿Comprobación estado com. 
¿Obtención del estado de La "consola" 
Ningún carácter de entrada 

tención de carácter de entrada por com. 
¿Conexión consola => CRT: 
¿Salida a CRT 
¿Bucle atrás para comprobar estado del teclado 





¿Conexión consola -> Línea com. 
¿Bucle atrás para comprobar estado com. 


¿Conexión consola => CRT: 
¿Almacenar posible carácter dato 
¿Conexión consola => CRT: 

código común 





mexión consola => Linea com. 
macenar posible carácter dato 
¿Conexión consola -> Línea com. 
¿Salto a SETCON 





tivación dispositivo de consola 
jevo código en B (en Los bits 1,0) 
¿Alnacenar código 

¿obtención TOBYTE en curso 


(NOT 1OSCONM) AND OFFH ¿Conservar todo menos La consola 


¡Recuperar el código requerido 
¿OR de los nuevos bits 
¿Preparado para fijación de valor 
¿código de función 





¡Recuperar posible carácter dato 





0045 SF 


0046 0E06. 
0048 C30500 


0048 0E06 
0040 1EFF 
004F C30500 


0052 0808 
0054 C0OS00 
0087 27 
0058 Cc 
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EA ¿Obtener byte de datos para salida 
C/BSDIRCONIO — ¿Código de función 
dos ¿8D0S devuelve control a La rutina que ha Llamado a CONOUT 
CONIN: 


¿Código de función 
¿Indicar entrada de consola 
¿8DOS devuelve control a La rutina que ha Llanado a CONIN 


€. BSCONST ¡código de función 
Dos 
A ¿Activación del indicador 2 para terminar 





Figura 5-11. (Continuación.) 


Función 9: Visualización de cadena terminada en 


Ejemplo 





Código de función: C=09H 
Parámetros de entrada: DE=Dirección del primer byte de la cadena 








Parámetros de salida: Ninguno 
0009 = BSPRINTS EU 9 ¿Inoresjón de cadena terminada por $ 
0005 = Eos Eu 5 ipunto de entrada al 5008 

000 = ca E0u om Retorno de carro 

S00A he e nal de Lines 

E 27 a abs horizontal 

0000 ODOAOISAGEMESSADE: DO CRILF,TAB, "This is a message"¿CR,LF, OS 
0017 0E09 MUI C.BSPRINTS ¡código de función 

0019 110000 ÉXITO DIMESSADE or y seras 

001 coos0o CALL BDOS 


Propósito Esta función envía una cadena de caracteres al dispositivo de consola. 


Notas 


La dirección de esta cadena está en los registros DE. Hay que asegurarse de 
que el último carácter de la cadena es “$”; el BDOS utiliza este carácter 
como una indicación de final de cadena. El “$” no se envía a la consola. 

Mientras el BDOS envía la cadena, expande tabuladores como se ha 
descrito previamente, controla si hay algún carácter de entrada y controla el 
CONTROL-S (XOFF, que detiene la salida hasta que ha entrado otro carácter) 
O CONTROL-P (que conecta o desconecta la repetición de los caracteres de la 
consola a la impresora). 

Uno de los mayores inconvenientes de esta función es el uso de “$” 
como un carácter de terminación. Como resultado de ello, no se puede 
enviar una cadena que contenga un “$”. Para ser verdaderamente de 
propósito general, sería mejor utilizar una subrutina que usara el carácter 
ASCII NUL (00H) como terminal y que simplemente hiciera llamadas 
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repetitivas a la función CONOUT del BDOS (código 2). La figura 5-3 es un 





ejemplo de dicha subrutina. 


La figura 5-12 muestra un ejemplo de una subrutina que envía uno de 
:cciona el mensaje basado en un código de mensaje que 
se le da como parámetro. Por consiguiente, es útil para tratar mensajes de 
¡mada puede pasarlo a un código de error de 8 bits. Será 
¡r esta subrutina que trata mensajes acabados en bytes 


varios mensajes. Sele 


error; el código de lla: 
más flexible converti 


00H utilizando las técnicas que se muestran en la figura 5-3. 


y al contenido del 


* antes de mandar 





10M (Salida de mensaje) 
'Esta subrutina selecciona un mensaje entre varios en base 


registro A cono entrada. Entonces permite 


y visualizar el mensaje en la consola. 
¡Cada mensaje se compone con un "S" como Último carácter. 

3 Si el registro A contiene un valor mayor que el núnero de 

3 mensajes declarados, OM enviará a La salida "Mensaje desconocido". 


*Como opción, OM puede enviar un retorno de carro / salto de Línea 


a La salida el texto del mensaje. 


'Paránetros de entrada 











, ML => tabla de mensajes 
: tiene La forma : 
; De ES ¿Número de mensajes en La tabla 
, De mMs0o — ¿Dirección del texto (A = 0) 
; Du .S0l A = 
+ Du m502 “(A = 2) 
1 msG0s 08 "Texto de Los mensajes" 
, Lotto. 
; ódigo del mensaje (de D en adelante) 
, B = Salida CR/LF si es distinto de cero 
' Secuencia de Llamada 
, LXI OH MSOSTABLE 
, LDA — MSOCODE 
; MVT BO ¿Supresión CR/LF 
; CALL om 
BSPRINTS EU 9 ¿Impresión cadena-terminada-por=S 
BDOS EU S ¿Punto de entrada al 8005 
CR EQU ODM ¿Retorno de carro 
Le EQU OA ¿Salto de Línea 
0000 ODOAZ4 — OMBCRLF: DE CR,LE, 0. 
0003 SSSESBSESFOMBUM: Da “Unknown Messages” 
om: 
0013 FS Pus Ps ¿Almacenamiento del código de mensaje 
0014 ES Pus JAlnacenamiento apuntador a tabla mensajes 
0018 78 MOV AB ¿Comprobación necesidad de CR/LF 
0016 87 RA A 
0017 CA2200 Je OMSNOCR ¿No 
001A 110000 EXI D,OMSCRUE, ¿Salida de CR/LF 
0010 0809 MYI C;BSPRINTS 
01F CDOS00. CALL BDOS 
OMBNOCR: 
0022 El Poe ¡Recuperación apuntador tabla de mensajes 
0023 F1 POr PSA ¿Recuperación código del mensaje 
0024 BE eo” ¿Comparación con valor máximo 
0025 D23700 ÚNC OMSERR: ¿código de error, no <= máx. 
0028 23 Nx ¿Ignorar valor máx, en tabla 
0029 87 ADO A ¿código mensaje + 2 
0024 SF moy EVA ¿Composición del valor (código « 2) 
0028 1600 mI DO 
002D 19 DAD D ¿HL -> Dirección texto mensaje 


Figura 5-12. Visualización en la consola de mensajes acabados en $. 
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¿Obtención byte LS 
FML -> byte MS 
¿Obtención byte MS 

¿DE => texto del mensaje 


¿Inoresión punto de entrada de La cadena 


0509 
cuoso0 


C-BSPRINTS 
EDOS. 


¿código de función 


4 ¿Retorno al peticionario 


¿Error 
110300 
33100 


Figura 5-12. (Continuación.) 


Función 10: Lectura de cadena de la consola 


Código de la función: C=0AH 


¿Apuntar a 
¿Impresión de cadena 





Mensaje desconocido" 





Parámetros de entrada: DE=Dirección de la memoria intermedia de cadenas 


Parámetros de salida: 





Memoria intermedia de cadena con los bytes de consola 








incorporados 
Ejemplo 

0004 = BSREADCONS E0U 10 ¿Lectura de cadena de consola 
0005 = BDOS EQU 5 'unto de entrada al 8DOS 
0050 = BUFLEN EQU 80 ¿Longitud de La memoria intermedia 

BUFFER: ¿Mem. int. de entrada de la consola 
9000 30 BUFMAXCH: Da BUFLEN ¿Núnero máximo de caracteres en la 

5, memoria intermedia 

0001 00 BUFACTCH: Da o ¿Núnero de caracteres de entrada 
0002 BUFCH: DS BUFLEN ¿Caracteres en memoria interna 
0052 DE0A MVI C,BSREADCONS — ¡Código de función 
0054 110000 LXI O DBUFFER ¿Apuntador a memoria intermedia 
0057 CDOS00 CALL BDOS 


Propósito Esta función lee una cadena de caracteres del dispositivo de consola y los 


almacena en una memoria intermedia (dirección en DE) que se ha definido 
previamente. Se pueden editar líneas completas: el operador puede retroce- 
der, borrar la linea y volver a empezar, así como utilizar todas las funciones 
de control normales. Lo último que se ve en la memoria intermedia es la 
versión final de la cadena de caracteres que se ha introducido, sin ninguno 
de los errores o caracteres de control utilizados para realizar la edición de la 
línea. 

La memoria intermedia que define el programador tiene un formato 
especial. El primer byte dice al BDOS el número máximo de caracteres que 
puede aceptar. El segundo byte está reservado por el BDOS para indicar al 
operador cuántos caracteres están situados actualmente en la memoria. Los 
siguientes bytes contienen los caracteres de la cadena. 

La entrada de caracteres cesará bien cuando se introduce un CARRIAGE 
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Notas 


RETURN o cuando se ha recibido el número máximo de caracteres especifi- 
cado en la memoria. El CARRIAGE RETURN no se almacena en la memoria 
como un carácter —sirve únicamente como terminal. 

Si el primer carácter introducido es un CARRIAGE RETURN, entonces el 
BDOS sitúa el byte de “caracteres entradas” a 0. Si se intenta introducir 
más del número máximo de caracteres, la cuenta de “caracteres entradas” 
será la misma que el máximo valor permitido. 


Esta función es útil para aceptar la entrada de consola, especialmente 
por la posibilidad de editar líneas. Puede utilizarse también para respuestas 
de un solo carácter, tales como “Y/N” (sí o no), porque el operador puede 
mecanografiar “Y”, retroceder y escribir encima “N”. Esto le hace 
adecuado para programas “indulgentes”, tolerantes con los seres humanos 
que cambian de opinión. 

La figura 5-13 muestra un ejemplo de subrutina que utiliza esta función. 
Acepta la entrada de consola, compara la entrada con una tabla y 
transfiere el control a la subrutina adecuada. Muchos programas interacti- 
vos necesitan hacer esto; aceptan una orden del operador y transfieren 
entonces el control al procesador de órdenes apropiado para que se ocupe 
de ella. 

Este ejemplo incluye también otras dos subrutinas que son útiles en su 
propio campo. Una compara las cadenas terminadas por bytes nulos 
(FSCMP), y la otra convierte las letras minúsculas en mayúsculas (FOLD). 


FRSA 
* Retorno dirección subprocesador. 

' Esta rutina devuelve una o varias direcciones seleccionadas a partir 
* de una tabla por comparación entre cadenas especificadas en ella 

3 y La entrada por teclado. Se utiliza normalmente para dar el control 
3 a un subprocesador particular de acuerdo con La especificación 

3 dada por operador desde el teclado. 





; 
3 Las comparaciones entre cadenas de caracteres se realizan 
3 convirtiendo Las minúsculas en mayúsculas. 





i La entrada dada por el operador no coincide con ninguna 
de Las cadenas especificadas, el indicador de acarreo 
7 se pone a uno, en caso contrario se pone a cero. 





+ Parámetros de entrada 
; HL -> tabla de selección de subprocesador 

, Tiene La forna siguiente: 

; Du TEXTO, SUBPROCO 

+ De TEXT1, SUBPROC 

+ De o ¿Terminal 

: TEXTO: DB “add” ,O ¿terminado por byte 00H 

, TEXTIS DB “subtract”,0 

: SUBPROCO: 

: Programa para procesar La función ADD. 

+ SUBPROCA 

+ Programa para procesar La función SUBSTRACT. 
+ Parámetros de salida 

; DE => cadena de entrada del operador (terminada 

; por 00%). 


Figura 5-13. Lectura de cadenas de consola para opciones de teclado. 
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A 
: Acarreo a cero, ML => subprocesador, 
; Acarreo a uno, HL -> 0000. 
Secuencia de Llanada 
Lar e SuorracrAs — ¿Tabla de subprocesadores 
CALL RSA 
Sc Enron ¿Indicador a uno sólo sí error 
Lar DinerURN mutación de instrucción CALL 
H PusaD puesta en La pila de la dirección de retorno 
: Pon ¿Llamada (CALL) al. subprocesador 
; RETURN: 
0008 = BSREADCONS EQU 10 sLecturaeen la memoria intermedia de La cadena de consola 
0005 = 200s ES ¿Punto de entrada al 8005 
0080 = RsAsaL, É0u 50 ¿Longitud de La memoria intermedia 
2000 50 ASAS DB RSASIL ¿Número máximo de caracteres 
0001 00 RSASACTE Deo 0 ¿Número real de caracteres 
0002 RSASBUEC DS RSASEL ¿Caracteres en La memoria intermedia 
D0s2 00 o erminal de seguridad 
on: 
0053 28 Doo juste del apuntador a subpracesador por 
0054 28 Do parte del programa que sigue 
0055 ES Pu abecera de pita (TOS) -> tabla subprocesador-2 
0058 0E0n FUI. C,BsREACONS — ¿Código de función 
0058 110000 LX DoRSASDUE ¿DE > memoria intermedia 
0058 Co0500 CALL BDOS ¿Lectura de la cadena entrada por el operador y 
7 conversión para que termine en 00H 
008€ 210100 EXI MIRSASACTO ¿AL > número de caracteres de entrada reales 
0081 Se mo EM ¿obtención del núnero real de caracteres de entrada 
0062 1600 Mor DO ¿composición de este valor en una palabra 
0064 23 muxoo ¿MLS primer carácter de datos 
008s 1 DADO ZML > Primer carácter NO USADO en La memoria internedia 
0086 3600 mI mo ¿Composición de La men. int. de entrada terminada en 00H 
RSAsmi ¿Comparación de La entrada con Los valores especificados 
¿Bucle principal 
0068 El A] yn del apuntador a tabla subprocesador 
0069 23 A lento a La cabecera de La entrada siguiente 
006A 23 A] A => dirección del texto 
008e Se md E Jobtención de La dirección del texto 
0080 23 E 
0060 56 MOV Dan DE > texto 
7a mov AD ¡Comprobación de Llegada a final de tabla subprocesador 
ES ora E 
Chesoo SE RsARNEND ¿No coincidencia 
23 A] LL -> dirección subprocesador 
e Pus JAlnacenamiento de apuntador a tabla subprocesador 
210200 ÉXITO Mi RSASBUEC ¿NL > caracteres de entrada 
¿neaoo CALL FScmP ¿comparación de cadenas convertidas a mayúscula: 
c26900 ÍNZ ASAS io cofncidencia, despl 
Porn coincidencia, recuperación apuntador Subprocesador. 
moY En Jobtención dirección verdadera Subprocesador 
Te 
moY ¿DE > código subprocesador 
cmo HL -> cógigo subprocesador 
mA ZAcarreo a cero Ccotcidencia) 
Rer 
RSAasnenD: 
0085 210000 Lo ¿Indicación de no coincidencia 
0088 37 ste ÍAcarreo a uno 
0089 cs Rer 
+ EScHR 
¡Comparación de cadenas convertidas (minúsculas a mayúsculas) 
JEsta subrutina compara dos cadenas terminadas por un byte 00! 
3y vuelve con los indicadores de condición puestos a uno 
Ipara indicar coieidenes 
; Parámetros de entrada, 
; DE -> cadena 1 
; ML > cadena 2 








Figura 5-13... (Continuación.) 
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1Paránetros de salida 


; Puesta a uno de Los indicadores de condición (se basa en una 
: comparación carácter por carácter de cadena-1 y cadena=2) 
Fsca 





1A Loa ¡Obtención de carácter de cadena=1 
CO9E0o CALL FOLD ¿Conversión a mayúscula 

FS PUSH Ps ¿Almacenamiento del carácter de cadena=1 
TE moy A ¿Obtención de carácter cadena-2 

CosE00 CALL FÓLO ¿Conversión a mayúscula 

47 OY BA ¿Almacenamiento de carácter de cadena-2 
Fr PoR PS ¡Recuperación carácter cadena=1 

Es cue a Comparación 1-2 
A 
D 





co ENZ ¿Si no son iguales, retorno 
87 ORA ¿Iguales, comprobación final de cadena 
ce Rz ¿Ss 

13 1 ¿No, actualización apuntador a cadena-1 
23 mA 5 y apuntador a cadena-2 

C3eaoo me FSCMP ¿Comprobación de caracteres siguientes 


¿FOLO, 
¿Convierte una Letra minúscula (a-2) en mayúscula (A-2) 
¿El carácter a convertir está en A a la entrada y a La salida. 








FOLD: 
a moy c, ¿Conservación carácter de entrada 
3E60 MIO Arras ¿Comprobación necesidad de conversión 
E eme ¿Comparación con carácter de entrada 
D2AFOO ÚNC O FOLDX No, carácter <= "a" 
3E7A MIC az ¿Comprobación carácter < "2" 
ES AS 
DAAFOO ye FOLOX ¿No, carácter > 2% 
3EDF FI ALODFM ¿Conversión de carácter 
ar ANA 
c9 Rer 

FOLO! 





79 moy ac ¡Recuperación carácter de entrada original 
cs Rer 








Figura 5-13. (Continuación.) 


Función 11: Lectura de estado de la consola 


Código de función: C=0BH 

Parámetros de entrada: Ninguno 

Parámetros de salida: A=00H si no hay ningún byte de datos de entrada 
A=00FFH si hay byte de datos de entrada 


Ejemplo 
0008 = BSCONST EQU 11 ¿Obtención estado consola 
9003 = BDOS EQU 5 ¿Punto de entrada al BDOS 
9000 VEOB MUI C/BSCONST ¿Código de función 
0002 CDOS00 CALL BDOS ¿A = 00 si no hay carácter a la espera 





GA = DFFH sí hay carácter a la espera 


Propósito Esta función indica si un carácter de entrada de la consola está 
esperando para ser procesado. A diferencia de las funciones de entrada de 
consola, que esperan hasta que haya entrada, esta función controla 
simplemente y vuelve inmediatamente. 


Notas 
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Utilícese esta función siempre que se desee interrumpir un programa en 
ejecución si un carácter del teclado de la consola ha entrado. Solamente es 
preciso poner una llamada al estado de la consola en el bucle principal del 
programa. Entonces, si el programa detecta qué datos del teclado están 
esperando, puede llevar a cabo las acciones necesarias. Normalmente éstas 
consistirán en saltar al lugar 0000H, abortando el programa en curso e 
iniciando un arranque caliente. 

La figura 5-11 es un ejemplo de subrutina que muestra cómo utilizar 
esta función. 


Función 12: Obtención del número de versión del CP/M 


Ejemplo 


Código de función: C=0CH 
Parámetros de entrada: Ninguno 
Parámetros de salida: HL=Número de versión 


000c = BSOETVER EQU 12 ¿Obtención número de versión CP/M 
0005 = BDOS EQU 5 ¿Punto de entrada al BD0S 

0000 OE0C mv C/ESOETVER .código de función 

0002 CDO300 CALL BDOS = 00 para CP/M 





¿L = versión (por ejemplo, 22H para 2.2) 


Propósito Esta función indica qué versión del CP/M está funcionando en ese 


Notas 


momento. Devuelve un valor de dos bytes: 


H= 00H para CP/M, H=01H para MP/M. 
L= 00H para todas las versiones anteriores al CP/M 2.0. 


L= 20H para CP/M 2.0, 21H para 2.1, 22H para 2.2, y así sucesivamen- 
te para las versiones siguientes. 


Esta información es de interés únicamente si el programa utiliza en su 
interior alguna lógica dependiente de la versión específica. Por ejemplo, la 
versión 1.4 del CP/M no soporta las mismas operaciones de entrada/salida 
de ficheros aleatorios que el CP/M 2.2. Por consiguiente, si el programa usa 
entrada/salida aleatoria, hay que situar este control al principio para 
asegurar que está funcionando con la versión adecuada del CP/M. 





La figura 5-14 es una subrutina que controla el número de versión de 
CP/M en curso y, si no es el CP/M 2.2, compone un mensaje aclaratorio en 
la consola y produce un arranque caliente saltando a la posición 0000H. 
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3 ccOm 
y Comprobación de sí CP/M 

¡Esta subrutina determina el núnero de La versión del 
'sistena operativo y, si no se trata de La versión 2 de CP/M, 
3 Lanza un mensaje de error y ejecuta un arranque caliente. 


¡Parámetros de entrada y salida 
, Ninguno 


1Secuencia de Llamada 























; CALL CCPM ¡Arranque caliente sí no se trata de CP/M 2 
0007 = BSPRINTS Eu > ssualiza una cadena terminada en $ 
0000 BROETVER E0u 12 ¿Obtención del numero de versión 
0s0s = BDoS GS ¿Punto de entrada aL 8005 
9000 = er Eo 00M torno de carro 
S00A = le EQU 0AM ¿salto de Linea 
9000 0DOA CCPM DB RL 
0002 3as9s97320 DB “This program can only run under CP/M version 2.” 
0031 0D0AZa, AS 
Coon: 
0034 o£0c MUI CLBAGETVER ¿Obtención del número de versión 
9036 Cbos00 CALL mos 
0039 70 Po AA ¿H debe ser O para CP/M 
0034 87 ES 
0038 C24700 nz Coen ¿Debe ser me/N 
003€ 70 Poy A ¿12 número de versión 
003 ESFO ANI OFOM ¿Número de versión en el cuarteto NS 
0081 FEZO Cer 20 ¿Comprobación de versión 2 
0043 C24700 mz ile ¿Debe ser una versión primitiva 
004% c9 Rer GS, CRM versión 2 
ces Error 
0047 009 MI CLBRPRINTS ¿Lanza mensaje de error 
0049 110000 LXI Dicc 
004c cDos0o CALL bos 
004F E30000 eo Arranque caliente 
A 
Figura 5-14, Determinación del número de versión del CP/M. 
Función 13: Puesta a cero del sistema de disco 
Código de funci C=0DH 
Parámetros de entrada: Ninguno 
Parámetros de salida: Ninguno 
Ejemplo 
0000 = BODSKRESET E0U 13 ¿Puesta a cero del sístena de disco 
0005 = BDoS EQU os ¿Punto de entrada al 8005 
9000 0E0D MVI Ci BSDSKRESET — ¿Código de función 
0002 CDOS00 CALL BDOS 


Propósito Esta función requiere al CP/M para que ponga a cero completamente el 
sistema de ficheros en disco. El CP/M pone a cero entonces sus tablas 
internas, selecciona el disco lógico A como disco por defecto, pone a cero la 
dirección DMA en el 0080H (la dirección de la memoria intermedia 
utilizada por el BDOS para leer y escribir en el disco) y pone todos los 





discos lógicos en modo de lectura/escritura. 
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El BDOS tendrá entonces que entrar en todos y cada uno de los discos 
lógicos. Esto supone leer el directorio de ficheros completo para el disco y 
reconstruir los vectores de situación (que mantienen la información de qué 
bloques están libres y cuáles se han utilizado para almacenar ficheros). 


Notas Esta función permite cambiar los disquetes bajo control del programa. 
Si el operador desea simplemente cambiar disquetes, sin que el CP/M se 
aperciba de ello, el próximo acceso al (ahora diferente) disquete forzará al 
CP/M a declarar el disco de sólo lectura, impidiendo cualquier otro intento 
de escribir en él. Si se necesita poner a cero uno o dos discos, mejor que 
todo el sistema de discos, consúltese la función de puesta a cero del disco 
(código 37) descrita al final de este capítulo. 

La figura 5-15 muestra una subrutina simple que envía un mensaje a la 
consola, solicitando el cambio de disquete de una unidad específica. Realiza 
entonces una llamada a la función de puesta a cero del disco, para 
asegurarse de que CP/M entrará en el disquete en el próximo acceso a la 
unidad. 





¿CDISk 
¡Cambio de disco 

;Esta subrutina Lanza un mensaje pidiendo al usuario el cambio 

¡del disco Lógico que especifica, espera a que éste pulse 

Fun retorno de carro y efectúa entonces una puesta a cero del disco 
'y devuelve control a La rutina que efectuó La Llamada. 


'Parámetros de entrada 
: A“= Disco Lógico a cambiar (A =0, B= 1) 


>aránetros de salida 




















Ninguno 
'Secuencia de Llamada d 
, mI AO ¿Cambio unidad A: 
; CALL CbIsk 
00D == DSKRESET E0u 13 ¿Código de función de puesta a cero del disco 
0009 = BSPRINTS EQU 9 Impresión de cadena terminada por $ 
0001» BSCONIN EQU ¿Obtención de entrada por consola 
0005. DOS EU s ¿Punto de entrada al BD0S 
00D = CR EQU 00H 
000A = LE EQU Om 
0000 ODOAI36861CDISKM: De CR,LF, “Change logical disk 
0016 00. CDISKD: DE E 
0017 JAZOS16E64 De 1 and press Carriage Return to continues” 
EDISk: 
003F c640. ADI inversión a Letra 
321600 STA imacenamíento en mensaje 
DE09. mur sualización de mensaje 
110000 pes] 
cDos00 CALL 
COISKHs 
004c 0E01 MYI C/BSCONIN ¿Obtención carácter del teclado 
004E CDOS00. CALL BDOS 
0031 FEOD. cer CR 
0053 C24C00 ÚNZ CDISKA 
0056 0E0D. FUI ESBeDSKRESET ¡Puesta a cero del sistema de disco 
0058 CDOS00 CALL BbOS 
0058 C9 RET 








Figura 5-15. Puesta a cero de la unidad de disco solicitada. 
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Función 14: Selección del disco lógico 


Ejemplo 


Código de función: C=0EH 

Parámetros de entrada: E=Código del disco lógico 
00H=Unidad A 
01H=Unidad B, etc. 

Parámetros de salida: Ninguno 





000€ = BSSELDSK EQU 14 ¡Selección del disco Lógico 
0005 = BDOS EQU 5 ¿Punto de entrada al BDOS 
0000 OEOE mv Cy BASELDSK ¡Código de función 

0002 1E00 mv E,0 ¿E = O para Az, 1 para B:, etc. 
0004 CDOS00 CALL BDOS 


Propósito Esta función hace tomar como disco lógico por defecto al nombrado en 


Notas 


el registro E. Todas las referencias siguientes a los ficheros de disco que no 
especifiquen el disco utilizarán éste. 

Cuando se haga referencia a un fichero de disco que tenga un disco 
lógico explícito en su nombre, no es necesario utilizar de nuevo la función 
de selección de disco; el BDOS cuidará de ello. 


Obsérvese el modo en que el disco está especificado en el regis- 
tro E. No es el mismo que la especificación de la unidad de disco en el 
primer byte del bloque de control de fichero. En el FCB, un valor 00H se 
utiliza para indicar “úsese el disco en curso como disco por defecto” (como 
se ha especificado en la última llamada de selección de disco o por el 
operador de la consola). Con esta función, un valor 00H en el registro A 
significa que A es la unidad seleccionada, un valor 01H significa unidad B, 
etcétera, hasta OFH para la unidad P, permitiendo 16 unidades en el 
sistema. 

Si selecciona un disco lógico que no existe en la computadora, el BDOS 
compondrá el siguiente mensaje: 


BDOS Err on J: Select 


Si se mecanografía un CARRIAGE RETURN con el fin de que proceda el 
programa, el BDOS producirá un arranque caliente y devolverá el control al 
CCP. Para evitarlo, deberá confiarse en que el operador de la computadora 
no especifique discos no existentes o construya el programa de tal manera 
que conozca cuantas unidades de discos lógicas hay en el sistema. 

Otro problema relacionado con esta función es que no se puede 
distinguir un disco lógico para el cual se han construido en el BIOS las 
tablas adecuadas, pero para el cual no existe ninguna unidad fisica. El 
BDOS no comprueba si la unidad está fisicamente presente cuando se hace 
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la llamada de selección de disco. Simplemente coloca algunos valores 
internos de forma que estén dispuestos para acceder al disco lógico. Si se 
intenta entonces acceder a una unidad no existente, el BIOS detectará el 
error. Lo que ocurra a continuación está totalmente fuera del control del 
BIOS. Los BIOS estándar devolverán el control al BDOS, indicando una 
condición de error y el BDOS enviará el mensaje 


BDOS Err on C: Bad Sector 


Entonces existe una alternativa. Se puede pulsar CARRIAGE RETURN, caso 
en el cual el BDOS ignorará el error e intentará continuar con lo que 
parezca que ha sido leído, o bien se puede introducir un CONTROL-C, 
ocasionando el aborto del programa y obligando al CP/M a realizar un 
arranque caliente. 

Obsérvese que la función de selección de disco no devuelve ningún valor. 
Si el programa obtiene de nuevo el control, puede suponerse que el disco 
lógico que se pidió tiene al menos tablas declaradas para ello. 


Función 15: Apertura de fichero 


Ejemplo 





Código de función: 
Parámetros de entrada: DE=Dirección del bloque de control de fichero 
Parámetros de salida: A=Código de directorio 









o00F = BSOPEN EQU 15 ¿Abrir fichero 
0005 = DOS EQU 5 ¿Punto de entrada al BDOS 

FcBs ¿Bloque de control de fichero 
0000 00 FCBSDISK: Da o ¿núsqueda en unidad de disco por defecto 
0001 46494CASAEFCBINAME: DB “FILENAME * ¿Nombre de fichero 
0009 545950  FCBSTYP: Da -TWP= ¡Tipo de fichero 
000c 00 FCBSEXTENT: DB o ¿Extensión 
1900D 0000 FCBSRESV: DB 0,0 ¿Reservado para CP/M 
000F 00 FCBSRECUSED: DB o JRegistros Utilizados en esta extensión 
0010 O000000000FCBSABUSED: DB o, ¿Bloques utilizados 
0018 0000000000 DB o, $ 
0020 00 FCBASEQREC: DB o ¡Reg. de Lectura/escritura secuencial 
0021 0000 FCBSRANRECI DM o ¿Reg. de Lectura/escritura aleatoria 
0023 00 FCBSRANRECO: DB o ¿Byte de desbordamiento de registro 

7 aleatorio (MS) 

0024 0E0F MUI C,BSOPEN ¡Código de función 
0026 110000 LXI O D,FCB ¿DE -> bloque de control de fichero 
0029 CDOS00 CALL BDOS ZA = OFFH si no se encuentra el fichero 


Propósito Esta función abre un fichero específico para lectura o escritura. El FCB, 


cuya dirección deberá estar en el registro DE, indica al CP/M el número de 
usuario, el disco lógico y el nombre y tipo de fichero. Todos los bytes 
restantes del FCB se pondrán normalmente a 0. 





110 CP/M Manual para programadores 


Notas 


El código devuelto por el BDOS al registro A indica si el fichero ha sido 
abierto satisfactoriamente. Si A contiene OFFH, entonces el BDOS habrá 
sido incapaz de encontrar la entrada del directorio correcta. Si A=0, 1,20 
3, entonces el fichero habrá sido abierto. 


La función de apertura de fichero busca el directorio de ficheros 
completo en el disco lógico especificado, buscando el nombre, tipo y 
extensión del especificado en el FCB; es decir, busca una comparación 
exacta para los bytes 1 a 14 inclusive del FCB. El nombre y tipo de fichero 
pueden ser ambiguos; es decir, pueden contener caracteres “?”, En este caso, 
el BDOS abrirá el primer fichero del directorio, que comparará con el 
nombre ambiguo en el FCB. Si el nombre o tipo de fichero es más corto de 
ocho o tres caracteres respectivamente, entonces los restantes caracteres 
deberán rellenarse con espacios. 

Cuando el BDOS busca el directorio de ficheros, espera encontrar una 
correspondencia exacta con cada carácter del nombre y tipo de fichero, 
incluidas las letras minúsculas o los caracteres no gráficos. Sin embargo, el 
BDOS usa sólo los siete bits menos significativos de cada carácter —el bit 
más significativo se utiliza para indicar características de estado especial, o 
atributos del fichero. 

Comparando la extensión del fichero, así como su nombre y tipo, se 
puede, si se desea, abrirlo en algún punto distinto al de su comienzo. Para el 
acceso secuencial normal no se deseará esto normalmente, pero si el 
programa puede predecir la extensión del fichero que se requiere, este es el 
método de desplazarse directamente a él. 

También es posible abrir el mismo fichero más de una vez. Cada caso 
requiere un FCB aparte. El BDOS no está enterado de lo que está 
ocurriendo. Realmente sólo puede hacerse cuando se lee el fichero. Cada 
FCB puede utilizarse para leer el fichero independientemente. 

Una vez se ha encontrado el fichero en el directorio, el número de 
registros y los bloques utilizados se copian de la entrada del directorio en el 
FCB (bytes 16 al 31 inclusive). Si el fichero ha de ser accesible secuencial- 
mente desde el principio, el registro adecuado (byte 32) deberá ser puesto a 
cero por el programa. 

El valor devuelto al registro A es el número de entrada relativa al 
directorio de la entrada que compara el FCB. Como se ha explicado 
previamente, la memoria intermedia que usa el CP/M mantiene una 
información de 128 bytes del directorio con cuatro entradas del directorio 
numeradas 0, 1, 2 y 3. Este código de directorio es devuelto por casi todas las 
funciones del BDOS relacionadas con el fichero, pero en circunstancias 
normales esto interesará únicamente para saber si el valor devuelto a A es 
OFFH o no. 

La figura 5-16 muestra una subrutina que toma una cadena de 
caracteres terminada por un byte 00H, crea un FCB válido y abre entonces 
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el fichero especificado. Se muestra, como parte de este ejemplo, la subrutina 
BF (construcción FCB). Lleva a cabo el trabajo de mayor dificultad de 
conversión de una cadena de caracteres ASCII en nombre de fichero y tipo 


al estilo del FCB. 





y OPENF 
>Abrir fichero 


¿Dado un apuntador a un nombre de fichero terminado 
en un byte OO y un área que puede ser usada para el bloque 
:de control de fichero, esta subrutina construye un bloque 
Fde control válido e intenta abrir el fichero. 





¿Sí el fichero ha sido abierto, devuelve el control con el indicador 
ide acarreo a cero. Si no Lo há conseguido, devuelve 
Fel control con La marca a uno. 


Parámetros de entrada 
DE => area de 36 bytes para bloque de control de fíchero 
HL => nombre de fichero terminado por byte 00H de La 
forma (disco: Nombre C.tip). 
(disco y tipo son opcionales) 


Parámetros de salida 
Indicador de acarreo a cero 
Indicador de acarreo a uno 


Fichero abierto correctamente 
Fichero no abierto 





Secuencia de Llamada 




















, 

, uN 

: ru 

, CALL 

; Je 

donde 

FFCB DS 36 ¿Lugar para bloque de control 

FFNAMES DB. “Ar TESTFILE.DAT",0 
000 = BSOPEN 01 ¡código de función de apertura de fichero 
0005 = Boo EU Ss ¿Punto de entrada al BDOS 

PENES 
0000 05, pusH 0 ¿Conservación de apuntador aL FCB 
0001 CDOCOO CALL BF ¿Construcción del bloque de control 
0004 DEOF MUI C/BSOPEN 
0006 DI Por 0 ¿Recuperación apuntador al FCB 
9007 Cos00 CALL BROS 
0004 17 Rar ¿SÍ A = OFFH indicador de acarreo a 1 

Jen caso contrario indicador de acarreo a 

0009 c9 Rer 

per 

y Construcción bloque de control de fichero 

T Esta subrutina compone en el FCB una cadena terminada 

+ por un byte DON (presumiblemente un nombre de fichero), 

fijando el disco, nombre y tipo de fichero y poniendo 2 cero 

el resto del FC8 

¡Parámetros de entrada 

, DE => bloque de control de fichero (36 bytes) 

; HL => cadena nombre de fichero (terminada por byte 00H) 

1Parámetros de salida 

, El bloque de control de fichero construido 

+Secuencia de Llamada 

; OT 

; EXI MIFILENAME 

; CALL BE 

pe ñ 
9000 23 mo. ¿Comprobación de si segundo carácter es *: 
0000 7E mo A tención de carácter de nombre de fiche 
900€ 28 Dex mM > vuelta atrás a priner carácter 
000F FESA AS 4 00, disco especificado 
0011 C21C00 ÍNZ BRAND ¿pisco ño especificado 


| 





to 





Figura 5-16. Petición de apertura de fichero. 
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am ¿Obtención Letra de disco 
0001811118 ¿A (AMO > 1, B (42 > 2. 
$4 ¿Ignorar Letra del disco 

0 ¿Se salta " 

Preso ¿Almacenar disco en FC8 


¿Disco no presente 
¿Indicar disco por defecto 


¿Almacenar disco en FCB 
E -> primer carácter del nombre en el FCO 
¿Longitud del nombre 
¿Obtención de "token" 
¿Nota =- en este punto, BFSGT 
¿habrá adelantado el apuntador 
La cadena hasta encontrar 
1". o un byte 00H 
omprobación de carácter terminal 
¡po de fichero no especificado 
¿Se trata "." en nombre de fichero 


¿Longitud del tipo de fichero 
Obtención de "token": 
ÍNota — si el tipo de fichero 
¿no está presente, BFSGT 
¿llenará con espacios el FC8 
mr Lenado con ceros del resto del FCB 
MUI 536-12 (disco, nombre, tipo = 12 cal 
CALL ¿Reutilización "token" S/R 
Rer 


¡BrsGr 
»Construcción del FCB -- obtención del "token" 


+Esta subrutina examina una cadena nombre-de-fichero, 
+poniendo sus caracteres en un bloque de control de fichero. 
*Rellena con espacios el resto del "token" después de haber 
tencontrado un carácter terminal ("." o 00H). 

1SÍ se encuentra un "e", rellena el resto 

¡del "token" con "? 


1 Parámetros de entrada 
, DE -> en el bloque de control de fichero 

, ML => en la cadena nombre-de-fichero 

+ € = núnero máximo de caracteres en el "token" 


iParámetros de salida 
, El bloque de control de fichero contiene el token siguiente 
, A = Carácter de finalización 


PoY AM ¡Obtención de La cadena de caracteres siguientes 
A 


ORA ¿Comprobación de final de cadena 
y preser ¿Si, cadena Llenada de espacios 
Cer er ¿comprobación de necesidad de LLenar con "?" 
Je ¿Si, rellenar con ? 
cer á ¿se supone que el "token" en curso es el 
¿nombre de fichero 
¿Comprobación de si el tipo de fichero Le sigue 
¿(Si el token en curso es el tipo 
le fichero, esta comprobación 
¿es redundante) 
4, rellenar token con espacios 
¡ihguna de Las anteriores, almacenar 
1 el FO 
¡ctualización del apuntador a FCB 
5Actualización del apuntador a cadena 
¿Decrenentar Longitud de token 
¿Existen todavía caracteres 





¿Pasar por alto Los caracteres hasta "." o 00H 
¿obtención cadena de caracteres siguiente 
¿Comprobación de 004 





Figura 5-16. (Continuación.) 















004F 
10050 
0052 
0053 
0054 


0057 
0059 


00sc 
005€ 
0061 


0064 
9085. 


0066 
0067 





0069 
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cs Az SS] 
FE2E er.” ¿Comprobación de 
ce Rz ¿si 
2 INx ¿Actualización del apuntador a cadena (Unicamente) 
Cano. JP BFSSKIP ¿Probar carácter siguiente 
BrSSFT: ¿Rellenar token con espacios 
0620 mr Br 
36400 ame RESET ¡Código común de relleno de token 
FBFSFT deyuelve control a La rutina de Llamada 
BFSOFT ¿Rellenar token con signo de interrogación 
osar Mur 0 
CD8A00 CALL BFSFT ¡código común de relleno de token 
E3aDOo. SMA BFSSKIP ¿Pasar por alto "*" múltiples, etc. 
BFSFT ¿Relleno de token 
FS PusH PS ¿Almacenamiento carácter de finalización 
7e MOV AB ¿Obtención de carácter de relleno 
BFSFTL: Bucle interno 
12 srax  D Unacenar en FC8 
13 Nx ¿Actualización de apuntador al FCB 
0D, DR C ¿Descontar cuenta residual 
C26600 UNZ BESFTL ¿Seguir 


¿Recuperar carácter de terminación 


Figura 5-16. (Continuación.) 


Función 16: Cerrado de fichero 





Código de función: C=10H 
Parámetros de entrada: DE=Dirección del bloque de control de fichero 
Parámetros de salida: A=Código de directorio 





Ejemplo 
0010 = BSCLOSE Eu 16 ¿cerrar fichero 
9005 = BDOS Equ 5 ¿Punto de entrada al BD0S 
0000 FCB: ps 36 ¡Bloque de control de fichero 
0024 0ELO MUI C.BSCLOSE ¡Código de función 
0026 110000 LX D/FCB ¿DE -> bloque de control de fichero 
0029 CDOS00 CALL BDOS ¿A =0,1,2,3 si tiene éxito 





JEFA Si el nombre del fichero 
no está en el directorio 


Propósito Esta función termina el proceso de un fichero en el que se ha escrito 


información. Con el CP/M no es necesario cerrar un fichero que se haya 
estado leyendo. Sin embargo, si se quiere que el programa funcione 
correctamente con el MP/M (la versión para múltiples usuarios del CP/M), 
deberán cerrarse todos los ficheros sin tener en cuenta su uso. 

La función de cierre de fichero, igual que la de apertura, devuelve el 
código de directorio al registro A. El registro A contendrá OFFH si el BDOS 
no puede cerrar el fichero satisfactoriamente. Si A es 0, 1, 2 Ó 3, entonces 
éste ha sido cerrado. 
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Notas Cuando el BDOS cierra un fichero en el que se han escrito datos, escribe 
los contenidos del FCB en el directorio del disco, actualizando una entrada 
de directorio ya existente mediante la comparación de disco, nombre, tipo y 
número de extensión, de la misma forma que lo hace la función de apertura 
de ficheros. 

Obsérvese que el BDOS no transfiere el último registro del fichero al 
disco durante la operación de cerrado. Unicamente actualiza el directorio. 
Es preciso que se haga llegar explicitamente al disco cualquier grabación 
parcial. Si el fichero que se ha creado es de texto ASCII estándar de CP/M, 
es preciso ocuparse de rellenar la porción no utilizada del registro con los 
caracteres de final de fichero estándar 1AH, como lo espera el CP/M y 
según se explicará en la sección dedicada a la función de escritura secuencial 
(código 21). 


Función 17: Búsqueda del primer nombre que corresponda 
Código de función: C=11H 


Parámetros de entrada: DE=Dirección del bloque de control de fichero 
Parámetros de salida: Código de directorio 


















Ejemplo 
0011 = BISEARCHF EQU 17 ¿Búsqueda del primero 
0005 = BDOS EQU 5 ¿Punto de entrada al BDOS 
FCBs ¿Bloque de control de fichero 
0000 00 FCBSDISK: Ds o ¿Búsqueda en la unidad de disco por defecto 
0001 46494C453FFCBSNAME : DB *FILE???? ¿Nombre de fichero ambiguo 
0009 543F50 FCBSTYP: DB *T?P" ¿Tipo de fichero ambiguo 
000c 00 FCBSEXTENT: DB o ¿Extensión 
900D 0000 FCBSRESV: De 0,0 ¿Reservado para CP/M 
000F 00 FCBSRECUSED: DB O. ¿Registros usados en esta extensión 
0010 O000000000FCESABUSED: DB 0,0,0,0,0,0,0,0 ¿Bloques usados 
0018 0000000000 DB 0,0,0,0,0,0,0,0 
9020 00 FCBASEQREC; DB O. * "¡Registro de Lectura/escritura secuencial 
0021 0000 FCBSRANREO: DM o ¿Registro de lectura/escritura aleatoria 
0023 00 FCBSRANRECO: DB O ¿Byte de desbordamiento de registro 
5 aleatorio (MS) 
0024 0E11 MVI O CI BSSEARCHF — ¿Código de función 
0026 110000 LXI D/FCB => bloque de control de fichero 
0029 CDOSOO CALL BDOS 0,1,2,3. 


ca + 32Í 4 DMA => entrada al 
irectorio 
= OFFH si no está el nombre 
; del fichero 





Propósito Esta función examina el directorio hasta la primera entrada, que se 
corresponde con el nombre, tipo y extensión contenidos en el FCB 
direccionado por DE. El nombre, tipo y extensión del fichero pueden 
contener un *?” (ASCII 3FH) en una o más posiciones de carácter. Cuando 
se presenta un “?”, el BDOS lo comparará con cualquier carácter del 
directorio en la posición correspondiente. Esto se conoce como compara- 
ción de nombre de fichero ambiguo. 


Notas 
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El primer byte de un FCB contiene normalmente el número de código 
del disco lógico. Un valor O indica el disco por defecto, mientras que 1 
significa disco A, 2 es B, etc., hasta llegar a un posible máximo de 16 para el 
disco P. Sin embargo, si este byte contiene un *?”, el BDOS buscará el disco 
lógico por defecto y comparará el nombre y tipo de fichero sin tener en 
cuenta el número de usuario. Esta función se utiliza normalmente en 
conjunción con la función de búsqueda del siguiente (que se describe 
inmediatamente después de esta función). La primera búsqueda, en el 
proceso de comparación, deja ciertas variables fijas en el BDOS para la 
utilización de la función de búsqueda del siguiente. 

Ambas funciones, búsqueda del primer caso y del siguiente, devuelven 
un código de directorio en el registro A. En la búsqueda del primer caso, 
A=0FFH si ningún fichero corresponde al FCB, en caso contrario A=0, 1, 
263. 





Para localizar la entrada particular del directorio que empareje con la 
función de búsqueda del primero o con la búsqueda del próximo, se 
multiplica el código de directorio devuelto en A por la longitud de la 
entrada del directorio (32 bytes). Esto se hace fácilmente añadiendo el 
registro A a sí mismo cinco veces (véase el programa en la figura 5-17 junto 
a la etiqueta GNFC). Entonces se añade la dirección de DMA para obtener 
la dirección práctica en la que se encuentra almacenada la entrada del 
directorio que se ha comparado. 

Existen muchas ocasiones en las que puede necesitarse escribir un 
programa que acepte un nombre de fichero ambiguo y opere con todos los 
nombres de fichero que se correspondan. (Las órdenes DIR y ERA 
construidas en el CCP son ejemplos de uso de nombres de fichero 
ambiguos.) Para hacer esto, se deben usar varias funciones BDOS: la 
función de puesta de dirección del DMA (código 26, descrita más adelante 
en este capítulo), esta función (búsqueda del primer caso), y búsqueda del 
siguiente (código 18). Todo esto aparece en la subrutina que se presenta en 
la figura 5-17. 





1SNF 
tEsta subrutina devuelve un FCB activado con el prinero de Los ficheros 
*cuyo nombre coincide con el ambiguo, o (si se especifica 


Icono parámetro de entrada) el nombre del fichero siguiente. 


Nota : Esta subrutina es sensible al contexto. 
1 No debe tenerse en proceso más de un nombre 
, de fichero ambiguo. 


'a subrutina cambia La dirección DMA 
tro del 8D0S 


192) — Atención < 
Pp» 








Figura 5-17, Llamadas de búsqueda primera/próxima para nombres de fichero ambiguos. 
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Parámetros de entrada 
DE 


= N2 





¡Parámetros de salida 
tAcarrero a uno 3 A 

; Ano = 
FAcarreo a cero 




















Figura 5-17. (Continuación.) 





1 
; Nombre de fichero posiblemente ambiguo 
, (terminado en un byte 00) 
1 (sólo necesario para petición FIRST) 
; HL -> Bloque de control de fichero 
1 A =0 1 Devuelve el primer nombre de fichero que coincide 

' Devuelve el nombre de fichero siguiente que coincide 


EF, no existe nombre de fichero coincidente 
FF, error en el nombre de fichero de entrada 
FCB activado con el nombre siguiente 
































, HL => Entrada al directorio devuelta por 
; búsqueda del prinero/siguiente. 
¡Secuencia de Llamadas 
1 EXI D,FILENAME 
1 Dr FCB 
1 MVT AO ¡O MULA, 1 para NEXT 
, She 
0011 = EU 17 queda del primer nombre de fichero 
0012 = Eu 18 jeda del Siguiente nombre de fichero 
O01A = BSSETOMA EU 26 ijación de La dirección DMA 
0005 = Boos Equ 5 Punto de entrada al BDOS 
0080 = ONFDMA EQU 80m ¿Dirección DMA por defecto 
0000 = GNESUL EQU 13 ¿Almacenar Longitud (número de caracteres a nover) 
0024 = ONFFCL EQU 36 ¿Longitud del bloque de control de fichero 
0000 ONFSUS DS GNFSVL ¿Area de almacenamiento para nombre/tipo de fichero 
ONF+ 
000D ES Puso apuntador FCB 
O00E pS PusH D apuntador a nombre de fichero 
000F FS PUSH PSA Iidicador primero/siguiente 
0010 118000 EXI D,GNFOMA a dirección conocida 
0013 0E1A MUI CIBSSETOMA función 
0013 CDOS00 CALL BDOS 
0018 FL A] ¿Recuperación de indicador primero/siguiente 
0019 El POr ¿Recuperación apuntador a nombre de fichero 
001A DI Por O ¿Recuperación apuntador a FCB 
0018 DS PusH DD JAlnacenar nuevamente apuntador a FCB 
0010 87 ora A ¿Control de sí FIRST o NEXT 
001D C23€00 ÚNZ ONEN ¿NEXT (siguiente) 
0020 09300 CALL BF construcción del bloque de control de fichero 
0023 EL Poe tecuperación del apuntador a FCB (para reajuste de pila) 
0024 18 Re ¿Retorno si hay error en nombre de fichero 
0025 ES Pu ¿Almacenar nuevamente apuntador a FCB 
¿Traslado de nombre de fichero al área 
¿de almacenamiento 
GAL > 08. 
0026 110000 XI D,ONFSY ¿DE -> área de almacenamiento 
0029 0E0D MUI C:GNFSVL ¿Obtención de La Longitud a guardar 
0028 CDSA0O. CALL MOVE 
002€ DI E] ¿Recuperación de apuntador a FCB 
002F 05 PUSH D ¿Almacenar de nuevo 
0030 0E11 mur isqueda FIRST (del primero) 
0032 CDOS00 CALL 
0035 EL POr tecuperar apuntador a FCB 
0036 FEFF Cer OFEM -omprobación de error 
0038 CA7DOO 37 ONFEX ¿Salida de error 
0038 C35DOO Íme ONO ¿Programa común 
ONFNS ¡Ejecutar una búsqueda del primero 
¿para restablecer contacto 
on el fichero anterior 
FELUFCB del usuario contiene todavía 
Fel nombre y tipo 
003€ CD7FOO CALL ONFZF ¿Rellenado con ceros salvo nombre y tipo 
0041 DI POr o ¿Recuperación de La dirección del FcB 
0042 DS PUSH a iy vuelta a almacenar 
0043 0E11 VI C/BESEARCHF ¿Búsqueda del fichero nuevamente 





cDos00 
Di 
ps 
210000 


Eon, 
COBADO 


oE12 
cDOS00 
El 
FEFF 
CA7DOO 


ES 
87 
87 
87 
87 
Ed 
216000 
Se 


1800 
19 





co7FO0. 
E 


ar 
c9 


37 
c9 


Figura 5-17, 
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Dos 

D ¿Recuperación del apuntador a FCB 

D ¿y vuelta a guardar 

H. ONFSY ¿Transferir el nombre del fichero desde el área 
¿de almacenamiento al FCB 

CONESWL ¿Longitud del área de almacenamiento 

MOVE 


C/BSSEARCHN ¡Búsqueda del siguiente 
bos 

$" ¿Recuperación de La dirección del FC8 
OFF ¿Comprobación de error 

ONFEX ¿salida de error 


¿Almacenamiento de La dirección del FC8 
¿multiplicar código de retorno del 8005 + 32 
ma 

16 

2m 32 

¿HL —> dirección DMA 

¿Companer un valor (código + 32) 


on mi»>»>»>»r 


¿HL -> entrada al directorio de ficheros 


¿Transferár nombre de fichero al FCB 
¡Recuperación de La dirección del FC8 
¿ALnacenar apuntador a La entrada al directorio 
¿Alnacenarla de nuevo 

¿Longitud del área de almacenamiento 


¿Obtención del dísco del área de almacenamiento 
¿Recuperación de La dirección del FCB 
¿Escritura destructiva sobre el número de usuario en el FC 


¿Poner a ceros La parte final 
¿del FCa 
¿Llenado de ceros 

Pop ¿Recuperación apuntador a entrada 
¿del directorio 


RT 


sic ¡Acarreo a uno para indicar error 
RT 


¡ONFZF 

'Búsqueda de fichero siguiente -- rellenado de ceros 

sEsta subrutina rellena con ceros Los bytes que siguen 
| nombre y tipo de fichero en el FC8 


iParánetros de entrada 
, DE => bloque de control de fichero 


ONFZF+ 


FML => FOB + ONESVL 
FDE => FCB + GNESVL 


ADE => FCB + ONFSVL + 1 
Ñ JFCB + ONFSVL = 0 
 ONFFCL-ONFSVL ¿Resto del bloque de control de fichero 


ONESVL 1Salto por encima del área que contiene el nombre de fíchero 
” 
tú 
o 


¡Salto a MOVE 
Lenado de ceros hasta completar 
FEU FCO 


move 
sEsta subrutina desplaza C bytes desde HL a DE. 


moves 
moy Am ¡Obtención del byte fuente 
¿Alnacenamiento del byte destino 





(Continuación) 
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1nx ¿Incremento del apuntador destino 
1NX ¿Incremento del apuntador fuente 
DCR ¿Decremento del contador 

UNZ ¿Vuelta atrás a por más 

Rer 


18r 
; Construcción del bloque de control de fichero 


¡Esta subrutina compone una cadena terminada en un byte 00M 
¡ Cmormalmente in nombre de fichero) en un FC, 

fijando el disco y el nombre y tipo de fichero, 

¿y poniendo a cero el resto del F(B. 


+Parámetros de entrada 
, DE => bloque de control de fichero (36 bytes) 
; HL => cadena nombre-de=fichero (terminada por un byte 00H) 


1Parámetros de salida 
; El bloque de control de fichero construido 


rEsta rutina se muestra en forma íntegra en la figura 5-16 


0093 c9 PFI RE ¿Subrutina ficticia para este ejemplo 





Figura 5-17. (Continuación.) 


Función 18: Búsqueda del siguiente nombre que corresponda 


Código de función: — C=12H 

Parámetros de entrada: Ninguno (toma la llamada de la búsqueda primera 
previa) 

Parámetros de salida: A=Código del directorio 








Ejemplo 
0012 = BSSEARCHN EQU 18 ¡Búsqueda del siguiente 
0005 = BDOS EU Ss ¿Punto de entrada al BDOS 
0000 0E12 MUI CBSSEARCHN ¡Código de función 
¿Nota: No apuntador a FCB 
¡Esta Ll la debe estar precedida por 
una Llamada a búsqueda del primero 
0002 CDO500 CALL BDOS A = 0,1,2,3 


¿CA x 32) + DMA -> entrada al 

7 directorio 

¿A = OFFH sí no se encuentra nombre 
7 de fichero 


Propósito Esta función busca en el directorio el próximo nombre, tipo y extensión 
de fichero que se corresponda con el FCB especificado en una llamada 
previa de la función de búsqueda del primer caso. 

La búsqueda del primer caso y la búsqueda del siguiente son las únicas 
funciones del BDOS que deben utilizarse juntas. Como puede verse, la 
función de búsqueda del siguiente no requiere una dirección del FCB como 
parámetro de entrada —toda la información necesaria se habrá dejado en el 
BDOS en la llamada a la función de búsqueda del primer caso. 

Al igual que en el caso anterior, la búsqueda del siguiente caso devuelve 


Notas 
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un código de directorio al registro A; en este caso, si A=0FFH, significa 
que no hay más ficheros que se puedan comparar con el bloque de control 
de fichero. Si A es distinto a OFFH, tendrá un valor de 0, 1, 26 3, indicando 
el número de entrada al directorio correspondiente. 


Existen dos formas de utilizar las llamadas de búsqueda primera/ 
siguiente. Consideremos un simple programa de copia de fichero que toma 
como entrada un nombre de fichero ambiguo. Se puede examinar el 
directorio, comparando todos los nombres de fichero posibles, quizá 
haciéndolos aparecer en la consola y almacenando los nombres de los 
ficheros que han de ser copiados en una tabla dentro del programa. Esto 
tendría la ventaja de posibilitar la presentación de los nombres de fichero al 
operador antes de que se realice ninguna copia. También se podría prever 
que el operador seleccionase los ficheros que se han de copiar fichero a 
fichero. Un inconveniente sería que no podría predecirse exactamente 
cuántos ficheros habrian de seleccionarse. En algunos sistemas de disco 
rígido posiblemente habría que acomodar varios miles de nombres de 
fichero. 

El método alternativo de enfrentarse con el problema sería comparar un 
nombre, copiarlo y entonces comparar el próximo nombre, copiarlo, etc. Si 
se da al operador la facultad de elegir los ficheros que se han de copiar, éste 
tendrá que esperar en el terminal, según se va copiando cada fichero, pero el 
programa no necesitará tener grandes áreas de tablas para conservar los 
nombres de ficheros. Esta solución al problema es ligeramente más 
complicada, según puede verse en la lógica de la figura 5-17. 

La subrutina de la figura 5-17, Obtener el próximo fichero (GNF), 
contiene toda la lógica necesaria para buscar un directorio para ambas 
alternativas descritas. Requerirá que se indique a/ entrar si debe buscar por 
el primer caso o por el siguiente, colocando A a cero o en algún valor 
distinto a cero respectivamente. 

Como puede verse en la figura 5-17, cuando se llama a la subrutina para 
obtener el fichero siguiente es preciso ejecutar una función de búsqueda del 
primer caso para volver a encontrar el fichero previo. Sólo entonces puede 
lanzarse la búsqueda siguiente. 

Como con todas las funciones que devuelven un código de directorio 
en A, si este valor no es OFFH, será el número de entrada del directorio 
correspondiente en el registro de directorio normalmente en memoria. Esta 
grabación del directorio habrá sido leída en la memoria en aquella dirección 
especificada en la última llamada a la función de fijación de dirección de 
DMA (código 26, 1AH). A pesar de su extraño nombre, la dirección DMA 
es simplemente la dirección en la cual se situará cualquier entrada del disco. 
Si la función de fijación de la dirección DMA no se ha utilizado para 
cambiar el valor, entonces la dirección DMA por defecto de CP/M, posición 
0080H, se utilizará para contener el registro del directorio. 
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El código para localizar la dirección de la entrada del directorio 
particular comparado por las funciones de búsqueda del primer caso/si- 
guiente se muestra en la figura 5-17 cerca de la etiqueta GNFC. El método 
incluye la multiplicación del código de directorio por 32 y adición de este 
producto a la dirección DMA actual. 


Función 19: Borrado de fichero 


Ejemplo 


Código de función: C=13H 
Parámetros de entrada: DE=Dirección del bloque de control de fichero 
Parámetros de salida: A=Código de directorio 














0013 = BSERASE EQU 19 ¿Borrar fichero 
0005 = BDOS Equ s ¿Punto de entrada al 8005 

FCB: ¿Bloque de control de fichero 
9000 00, FOBSDISK: De o ¿Búsqueda en el disco por defecto 
0001 IFIFACASAEFCBINAME: D8 227LENAMÉ ¿Nombre de fichero ambiguo 
0009 3FS950  FCBSTYP: DB “9YP- ¿Tipo de fichero ambiguo 
900c 00, FCBSEXTENT: DB o xtensión 
000D 0000 FCBRRESV: DB 0,0 ¿Reservado al CP/M 
900F 00, FCBSRECUSED: DB o FRegistros usados en esta extensión 
0010 0000000000FCBSABUSED: D8 0,0,0,0,0,0,0,0 ¿Bloques utilizados 
0018 0000000000 De 0,0,0,0,0,0,0,0 
0020 00. FCBSSEQREC: ES o ¿Reg. de Lectura/eseritura secuencial 
0021 0000 FCBSRANREC: DA o ¿Reg de Lectura/escritura aleatoria 
0023 00. FCBSRANRECO: — DB o ¿Byte de desbordamiento de 

7 registro aleatorio (MS) 

0024 0E13 MVI OC, BSERASE ódigo de función 
0026 110000 Lxr D.FCB => bloque de control de fichero 
0029 CDOS00 CALL BDOS 3A = OFFH si no se encuentra el fichero 


Propósito Esta función borra lógicamente del directorio de ficheros aquellos que 


Notas 


corresponden al FCB direccionado por DE. Lo hace reemplazando el 
primer byte de cada entrada relevante del directorio (recuérdese que un solo 
fichero puede tener varias entradas, una para cada extensión) por el valor 
OESH, lo que hace aparecer la entrada del directorio como disponible para 
ser usada. 


Al igual que las dos funciones precedentes, esta función puede tomar un 
nombre y tipo de fichero ambiguos como parte del bloque de control de 
fichero, pero, contrariamente a las otras dos funciones, el código de 
selección de disco lógico no podrá ser un *?”. 

Esta función devuelve un código de directorio en A de la misma forma 
que las operaciones de fichero previas. 
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Función 20: Lectura secuencial 


Ejemplo 


Código de función: C=14H 
Parámetros de entrada: DE=Dirección de bloque de control de fichero 
Parámetros de salida: 'ódigo de directorio 








0014 = BSREADSES. EQU 20 ¡Lectura secuencial 
9005 = BDOS EQU 5 ¿Punto de entrada al BDOS 
FCB: ¿Bloque de control de fichero 
0000 00 FCBSDISK: DB ¿Búsqueda en La unidad de disco por defecto 
0001 A64P4CASAEFCBINAME: DB ILENAME” — ¿Nombre de fichero 
0009 545950 — FCBSTYP: DB “TYP” ¿Tipo de fichero 
000c pS 24 ¿Fijado por apertura de fichero 
¿El registro será Leído en la dirección 
7 fijada por La Llamada anterior 
5 a SETOMA 
0024 0E14 mvI C.BSREADSEO ¿Código de función 
0026 110000 ÍXI O D,FCB => bloque de control de fichero 
0029 CDOS00 CALL BDOS 00H si La operación ha tenido éxito 





ZA = distinto de cero sí no hay datos 
7 en el fichero 


Propósito Esta función lee el próximo registro (sector de 128 bytes) del fichero 


Notas 


designado en la memoria en la dirección indicada por medio de la última 
llamada a la función de fijación de dirección DMA (código 26, 1AH). El 
fichero leído está especificado por el campo de registro secuencial del FCB 
(FCB$SEQREC en el ejemplo de listado para la función de apertura de 
fichero, código 15). Este campo se incrementa en 1 de forma que la llamada 
siguiente a lectura secuencial obtenga el siguiente registro del fichero. Si se 
alcanza el final de la extensión en curso, entonces el BDOS abrirá 
automáticamente la próxima extensión y pondrá a cero el campo de 
registro secuencial, dispuesto para la próxima llamada a función de lectura. 

El fichero especificado en el FCB debe haber sido preparado para 
entradas por una llamada de apertura de fichero (código 15, OFH) o de 
creación de fichero (código 22, 16H). 

El valor 00H es devuelto en A para indicar una operación de lectura 
secuencial satisfactoria, mientras que un valor distinto a cero demuestra 
que la lectura no se ha podido completar por no haber datos en el registro 
siguiente, como al final del fichero. 


Aunque no es evidente, se puede cambiar el número de registro 
secuencial, FCBSSEQREC, y con una extensión dada leer un registro al 
azar. Si se desea acceder a un registro dado dentro de un fichero, es preciso 
calcular qué extensión tendrá dicho registro y fijar el campo de extensión en 
el bloque de control de fichero (FCBSEXTENT,) antes de abrirlo. Entonces, 
aunque el nombre de la función implique un acceso secuencial, en la 
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Función 21 


Ejemplo 


práctica se puede usar para hacer un tipo sencillo de acceso aleatorio. Si se 
necesita realizar un acceso aleatorio real, consúltese más adelante la función 
de lectura aleatoria (código 33), que se encarga de abrir automáticamente la 
extensión correcta. 

La figura 5-18 muestra un ejemplo de una subrutina que devuelve los 
datos de fichero secuencial byte a byte leyendo tantos registros del fichero 
como sean necesarios. Esta subrutina, GETC, es útil como “primitiva” de 
bajo nivel con la que se pueden construir funciones más sofisticadas, tales 
como las que leen un número determinado de caracteres o leen caracteres 
hasta una combinación de CARRIAGE RETURN/LINE FEED. 

Cuando se leen datos de un fichero de texto CP/M, lo convencional es 
rellenar el último registro del fichero con caracteres 1AH (CONTROL-Z). Por 
tanto, dos condiciones posibles puede indicar el final de fichero: bien si se 
encuentra un 1AH, o si se recibe un código OFFH desde la función del 
BDOS (en el registro A). Sin embargo, si el fichero que se está leyendo no es 
de texto ASCII, entonces un carácter 1AH no tiene significado especial —es 
únicamente un byte de datos normal en el cuerpo del fichero. 


: Escritura secuencial 





Código de función: 
Parámetros de entrada: DE=Dirección del bloque de control de fichero 
Parámetros de salida: A=Código de directorio 








0015 = BSWRITESEO EQU 21 ¿Escritura secuencial 
0005 = BDOS Eu 5 ¿Punto de entrada al BDOS 
FCB: ¿Bloque de control de fichero 

0000 00 FCBSDISK: DB o ¿Búsqueda en unidad de disco por defecto 

0001 46494C454EFCBSNAME: De “FILENAME” — ¿Nombre de fichero 

0009 545950  FCBSTYP: DR “TVP" ¿Tipo de fichero 

0000 pS 24 ¿Activación por "Abrir" o "Crear" fichero 
¡EL registro debe estar en La dirección 
; fijada por La Llamada previa a SETOMA 

0024 0E15 MI C.BSWRITESEO ¿Código de función 

0026 110000 LXI  D,FCB ¿DE -< bloque de control de fichero 

0029 CDOS00 CALL BDOS ¿A = 00H sí La operación 





ha tenido éxito 
¿A = distinto de O sí el disco está Lleno 


Propósito Esta función escribe un registro en una dirección especificada en la 


última llamada de función que fija la dirección DMA (código 26, 1AH) en 
el fichero definido en el FCB. El número de registro secuencial del FCB 
(FCB$SSEQREC) se incrementa en 1 de forma que la próxima llamada de 
escritura secuencial escribirá en el registro que ocupa la posición siguiente 
en el fichero. Si es necesario, se abrirá una nueva extensión para recibir el 
nuevo registro. 







































00 
0084 
0085 


0088 
0089 


008c 
0080 


0090 
00% 
0093 
0096 
0097 
00s8 


009% 
009A 
0090. 
D09F 
0042 
00N2 
00m 
00A8 
00R9 
O0AC 
OOAE 
0081 





248000 
7 
CA9900 


20 
328000 
7 
257 


1600 
210000 
19 
TE 
cs 


Ds 
110000 
DEIA 
cDos00 
Dr 
0ELA 
cD0s00 
87 
c2ba0o 
2E80 
328000 
c3esoo 


y GETC 


+ Esta subrutina obtiene el carácter siguiente 
de un fichero secuencial en disco. Supone que 
el fichero ha sido ya abierto. 


Esta subrutina cambia La dirección DMA de CP/M. 





19»> Nota: 








:Parámetros de entrada 


d DE -> bloque de control de fichero 


¡Parámetros de salida 


, A= 





carácter siguiente del fichero 

OFFH en el final fisico del fichero) 

Nota : 1AH es el carácter normal de fin de fichero 
(EOF) en Los ficheros ASCIL. 


+ Secuencia de Llamada 
x 











1 1x1 DE/FCB. 
CALL GETC 
: Cer A, 
, yz EOFCHAR 
1 a) 
; 3 ACTUALEOF 
BSREADSEO Eu 20 
EQU 26 
Eu 5 
Eo 128 
pS GETCES 
De o 
GETC» 
LDA GETCCC 
DRA A 
w] GETCFE 
GETCRES 
DCR 0 
STA GErCCt 
mov A 
MUI ALOETCBS=1 
sue e 
MOV EVA 
mI DO, 
EXI M/GETCBF 
DAD D 
moy Am 
REr 
GETCFB: 
PusH o 
LXI  D,GETCOF 
mr 
CALL BDOS 
poe 0 
MVT C/BSREADSEO, 
CALL BDOS 
RA A 
ÚNZ O GETOX 
MY ALGETCES 
STA GETCCC 
JMP GETCRE 
DETCX: 
A, OFFH 
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AZ2Zz == 





¿Lectura secuencial 
¿Fija La dirección DMA 

¿Punto de entrada al BDOS 

¿Tamaño de memoria intermedia 
¿Declaración de memoria intermedia 
¿Contador de caracteres (inicialmente 
¿Uvacio") 


¿Comprobación de menoria intermedia vacía 


¿Sí, rellenar memoria intermedia 


Punto de reentrada después de Llena La memoria intermedia 
¿No, decrementar contador 
¿Almacenar cuenta decrementada 





¡Cálculo del desplazamiento del siguiente 
¿carácter 

¿Por sustracción 

¿(Tamaño memoria intermedia -- cuenta decrementada) 
¿Componer el valor sobre palabra 

¿HL -> base de La memoria de intermedia 


¿HL -> carácter siguiente en memoria interned 
¿Obtención carácter siguiente 








¿Llenado de La memoria intermedia 
Guardar apuntador a FCB 

¿Fijar dirección DMA a La memoria intermedia 
¿código de función 


Recuperación apuntador a FCB 
Lectura de "registro" (sector) secuencial 












¿Comprobación de Lectura no posible (A = NZ) 
ES] 
¿Puesta a cero contador 


¿Subrutina de reentrada 


¿Final físico de fichero 
¿indicarlo 





Figura 5-18. Lectura del próximo carácter de un fichero secuencial en disco. 
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Notas 


Esta función es análoga a la función de lectura secuencial, escribiendo en 
lugar de leer. El fichero especificado en el FCB deberá ser activado primero 
por medio de una apertura de fichero (código 15, OFH) o por una llamada 
de creación de fichero (código 22, 16H). 

Un código de directorio 00H se devuelve a A para indicar que la 
escritura se ha realizado; un valor distinto de cero en A significará que la 
escritura no ha podido completarse por estar lleno el disco. 


Al igual que con la función de lectura secuencial (código 20, 14H), se 
puede llevar a cabo de forma sencilla la escritura aleatoria en el fichero 
manipulando el número de registro secuencial (FCB$SEQREC). Sin embar- 
go, sólo puede escribirse sobre registros existentes en el fichero, y si se quiere 
cambiar a otra extensión, es preciso cerrar el fichero y reabrirlo poniendo el 
valor correcto en el campo FCBSEXTENT. Para escribir realmente de 
forma aleatoria en el fichero, véase más adelante la función de escritura 
aleatoria (código 34, 22H). Esta se ocupa de abrir o crear la extensión 
correcta del fichero automáticamente. 

La única condición de error lógica que puede ocurrir cuando se escribe 
en un fichero es la de tener insuficiente espacio en el disco para acomodar la 
próxima extensión del fichero. Todos los errores de hardware detectados 
serán tratados por el controlador de disco construido en el interior del BIOS 
o del BDOS. 

La figura 5-19 muestra la subrutina PUTC, a la cual se pueden pasar 
datos un byte cada vez. Ensambla estos datos en una memoria intermedia, 
realizando una llamada a escritura secuencial siempre que ésta se llena, 
Puede verse que se ha hecho una provisión en los parámetros de entrada 
(colocando el registro B en un valor distinto de cero) para que la subrutina 
llene los restantes caracteres no utilizados de la memoria intermedia con 
caracteres 1AH. Esto debe realizarse para señalar el final de un fichero de 
texto ASCII. 


Función 22: Creación (formación) de un fichero 


Ejemplo 


Código de función: C=16H 
Parámetros de entrada: DE=Dirección del bloque de control de fichero 
Parámetros de salida: A=Código del directorio 





0016 = BSCREATE EQu 22 ¡Creación de fichero 
9005 = BDOS Eu 5. ¿Punto de entrada al BD0S 
FcBs .oque de control de fichero 
9000 00 FCBSDISK: DB o ¡squeda en La unidad de disco 
¿ por defecto 
0001 46494C454EFCBSNAME: De “FILENAMES ¿nombre de fichero 


0009 545950  FCBSTYP: DE “TYP" ¿Tipo de fichero 
0000 00 FOBSEXTENT+ DB o ¿Extensión 
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0015 
O01A 
0005. 


0080 
0000. 
0080. 


0085. 
0088 


0088 


0080. 
008€ 


0091 
0094 
0097 








000D 0000 FCBSRESV: DB 0,0 ¡Reservado para CP/M 
000F 00. FCBSRECUSED: DB o ¿Registros usados en esta extensión 
0010 0000000000F CBSABUSED: DB 0,0,0,0,0,0,0,0 ¡Bloques utilizados 
0018 0000000000 DB 0,0,0,0,0,0,0,0 
0020 00 FCBSSEOREC: De o “Reg. de Lectura/escriturá Secuencial 
0021 0000 FCBSRANREC: Du o Reg. de Lectura/escrítura aleatoria 
0023 00 FCBSRANRECO: DB o Byte de desbordamiento de 
7 registro aleatorio (MS) 
¿Nota ; El fichero creado no existe 
¿todavía 
0024 0E16 mv + BECREATE ¿Código de función 
0026 110000 1x1 D,FCB ¿DE -> bloque de control de fichero 
0029 CDOS00 CALL BDOS ¿A = 0,1,2,3 sí La operación 
7 tiene éxito 
2A = OFFH si directorio Lleno 
¿PuTC 


JEsta subrutina sitúa el carácter siguiente al final 
Ide un fichero secuencial, escribiendo en registros completos 
¿(sectores de 128 bytes) o, sí se desea, rellenará 

tel registro en curso no cómpleto con caracteres 1AH 

Sque indican final de fichero a CP/M 


¡Parámetros de entrada 

, DE => bloque de control de fichero 

; B=0, A = carácter de datos siguiente para salida 

; B /= Ó, distinto de cero rellenar el registro en curso con 1AH 





Parámetros de salida 
Ninguno 





+Secuencia de Llamada 
xi 


; la D,FOB 
: mI BO ¡No final de fichero 

ñ LOA CHAR 

; CALL PUTO 

+ o 

; EXI D,FCB 

1 MY B:1 Indicación de final de fichero 


CALL PUTO 











- EU al ¿Escritura secuencial 
- EU 26 Fijar dirección DMA 
- Eu 5 Punto de entrada al BDOS 
- PUTCAS EQU 128 ;Tanaño de La memoria internedía 
PUTCEFS DS PuTcaS Declaración de menoría intermedia 
so PUTCCC: DB o ¿contador de caracteres Cónic. vacio) 
PuTcs 
PusH 0 ¿Almacenar dirección FCB 
PusA PSA ¿Almacenar carácter-dato 
moy AB ¿Comprobación de petición de final de fichero 
RA A 
c29900 ÚNZ O PUTCER ¿si 
Cbca00 CALL PUTCOA ¿No, obtención dirección siguiente byte Libre 
¿HL -> siguiente byte Libre 
¿E = cuenta de caracteres en curso (tal 
¿como A) 
Fr PoR esa Recuperación carácter-dato 
7 mo mA ¿Almacenamiento en memoria intermedia 
78 moy AE JObtención cuenta de caracteres en curso 
ac INR A ¿Actualización contador caracteres 
FESo, ed ¿Comprobación de memoria intermedia completa 
CAR90o Jl PuTCHe ¿Si, escritura de La menoría intermedia 
328000 sta PUTCCC ¿Nos guardar contador actualizado 
DI Por Do ¿Obtención dirección FCB para retorno 
cs Rer 





Figura 5-19. 


Escritura del próximo carácter en un fichero secuencial en disco. 
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Purcers ¿Final de fichero 
0099 EI Por psu ¿Sntención carácter-dato 
009A CDC300 cali PUTCOA ¿HL -> siguiente byte Libre 
ZA = contador carácter en curso 
Purcces ¿Cooar carácter EOF Cfinal fichero 
0090 Feso cel Puras ¿Comprobación Final menoria Intermedia 
009. EARSoO So rurcas ¿SÍ, escritura de La memoria Intermedia 
20ñ2 Seta mea ¿os slmacenar EOF en La memoria intermedia 
Rie De Actualización deL Contador 
Sms 25 ES ¿Actualización apuntador a senoria internedia 
S0Rs E39000 de Purcce ¿Continde hasta el final de nesoria Intermedia 
ae IN ¿Escritura de La menoria intermedia 
FO E del contador de caracteres 
LN A Br Puesta a 0 del contador de 
00Ab 110000 DXE O DipurCSr ¿DE -> menoria intermedia 
cobo Dela mI CibsSerona  Irijación dirección DMA => memoria intermedia 
0oB2 Ebotoo CAL bos 
28 Por o ¿Recuperación dirección FC 
0oBe DELS MUI CoBsumITESEO — ¿Escritura de registro secuencial 
Ses Ebosoo Calo bos 
Some 57 mA Comprobación de error 
0oBe E2cooo SN Pure AN 
sobe 59 E No, retorno 
Pure ¡SaLida de error 
0000 er mi aso Hnalcación de «llo 
0002 > mer 
Purcon: ¿Retorno con HL -> siguiente carácter Libre 
JA z cuanta caricia? on curso 
00ca 3A8000 Lo Purccc Eotención cuenta de carácter en curso 
Doce 3 m0 EA Iruesta en De del valor 
0907 1600 mI DO 
09c 210000 DE Mipurcar ¿ML -> bese de La meroria intermedia 
dae do CO DA otenco caráeter Libre 
000 co Ser 
Figura 5-19. (Continuación). 


«Propósito Esta función crea un nuevo fichero del nombre y tipo especificados. 


Notas 


Primero hay que asegurarse de que no existe ya ningún fichero del mismo 
nombre y tipo en el mismo disco lógico, bien intentando abrirlo (si esto 
tiene éxito, el fichero existe ya) o borrándolo incondicionalmente. 

Además de crear el fichero y su entrada al directorio asociada, esta 
función abre también efectivamente el fichero, de forma que éste está 
preparado para que se escriba en él. 

Esta función devuelve un código normal de directorio si la creación del 
fichero se ha completado satisfactoriamente o un valor OOFFH si no existe 
suficiente espacio en el disco o en el directorio. 


En estas circunstancias puede desearse crear un fichero que sea algo más 
“seguro” que un fichero normal del CP/M. Se puede hacer utilizando bien 
letras minúsculas o caracteres ASCII no gráficos, tales como ASCII NUL 
(00H) en el nombre o tipo de fichero. Ninguna de estas clases de caracteres 
puede generarse desde el teclado; en el primer caso, el CCP cambia todos 
los caracteres de minúsculas a mayúsculas, y en el segundo rechaza los 
nombres que posean caracteres raros. Así, el operador no puede borrar 
estos ficheros porque no existe ninguna forma para crear el mismo nombre 
desde el CCP. 
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La inversa es también cierta; la única forma en que se pueden borrar 
estos ficheros es utilizando un programa que pueda fijar el nombre exacto 
del fichero en un FCB y entonces lanzar una llamada a la función de 
borrado de fichero. 

Obsérvese que esta función no puede aceptar un nombre de fichero 
ambiguo en el FCB. 

La figura 5-20 muestra una subrutina que crea un fichero solamente 
después de haber borrado todos los existentes del mismo nombre. 


Función 23: Cambio de nombre de un fichero 


Ejemplo 


Código de función: C=17H 
Parámetros de entrada: DE=Dirección del bloque de control de fichero 
Parámetros de salida: A=Código de directorio 





0017 = BSRENAME EQU 23 ¿Cambiar de nombre un fichero 
0005 = BDOS EQU 5 ¿Punto de entrada al BD0S 

FCBs ¿Bloque de control de fichero 
0000 00 pe o ¿Busqueda en unidad de disco por 

7 defecto 

0001 AFACAAAEA1 De “OLDNAME “+ ¿Nombre de fichero 
0009 545950 DB “TYP= > ¿Tipo de fichero 
000c 00000000 DB 0,0,0,0 
0010 00 DB o FOR + 16 
0011 4E45574E41 De “NEWNAME ¿Nombre: de fichero 
0019 545950 DB “TP? ¿Tipo de fichero 
001c 00000000 DB 0,0,0,0 
0020 0£17 mur C BSRENAME ¡Código de función 
0022 110000 Lx D/FCB ¿DE => bloque de control de fichero 
0025 CDOS00 CALL BDOS ¿A = 00H si éxito en operación 


GA = OFFH si no se encuentra fichero 


Propósito Esta función da nuevo nombre y tipo a un fichero existente, proporcio- 


Notas 


nándole, por tanto, nuevo nombre y tipo. No es corriente para ello utilizar 
un único FCB para almacenar tanto el nombre y tipo antiguos (en los 
primeros 16 bytes) y el nuevo nombre y tipo (en los segundos 16 bytes). 

Esta función devuelve un código de directorio normal si el cambio de 
nombre se ha completado satisfactoriamente o se tiene un valor OFFH si el 
nombre antiguo no se ha podido encontrar. 


La función cambio de nombre solamente controla que existan el nombre 
y tipo antiguos del fichero; no controla para asegurarse que la combinación 
de nombre y tipo nuevos no exista ya. Por tanto, deberá intentarse abrir el 
nuevo nombre y tipo del fichero. Si se consigue, no hay que intentar la 
operación. El CP/M creará más de un fichero del mismo nombre y tipo, y se 
puede perder la información de ambos si se intenta resolver el problema. 

Para mayor seguridad, se pueden utilizar también letras minúsculas y 
caracteres no gráficos para nombre y tipo de fichero, como se ha descrito 
anteriormente en la función de creación de fichero (código 22, 16H). 
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1CF 


¿Creación de fichero 
tEsta subrutina crea un fichero borrando cualquier otro 
Fantes de crear el nuevo. 


¡Parámetros de entrada 
, DE => bloque de control de fichero para el nuevo 


IParámetros de salida 
3 Acarreo a cero si La operación tiene éxito 














h (A = 0,1,2,3) 
, Acarreo a uno si hay értor (A = OFFH) 
1Secuencia de Llamada 
1 Ext D,FOB 
; CALL CF 
1 se ERROR 
0013 2 BSERASE. EQU 19 ¿Borrar fichero 
pole = BSCREATE EQU 22 ¿Crear fichero 
0003 = Dos Eu 5 ¿Punto de entrada al BD0S 
CFr 
0000 pS PusH o ¿Conservación apuntador al FCB 
0001 0E13 VI C.BOERASE ¿Borrado de cualquier otro fichero 
0003 CDOS00 CALL BDoS > 
0006 D1 A] ¿Recuperación apuntador a FC8 
0007 0E16 MI C.BSCREATE ¿Creación (y abrir) nuevo fichero 
9009 CDOS00 CALL BDOS 
000C FEFF CPI OPM, ¿Acarreo a uno sí 0K, a 0 sí error 
000€ 3 cmo ¿Completar usando el acarreo a 1 si error 
000 co Rer 





Figura 5-20. Petición de creación de fichero. 


No deben usarse nunca nombres de fichero ambiguos en una operación 
de cambio de nombre; produce efectos extraños y puede resultar que los 
ficheros queden dañados irremediablemente. Esta función cambiará todas 
las versiones del antiguo nombre al nombre nuevo. 

La figura 5-21 muestra una subrutina que aceptará un nombre y tipo de 
fichero existente y un nuevo nombre y tipo volverá a denominar el fichero 
antiguo de acuerdo con el nuevo nombre. Controla que el nuevo nombre de 
fichero no exista ya, devolviendo un código de error si es así. 


¡Ar 
¿Cambio de nombre de fichero 

¿Esta subrutina cambia de nombre un fichero. 

¿Usa La rutina BF (construcción FCB) mostrada en Fig. 5.16 


¡Parámetros de entrada 
: ske No hay cambio de minúsculas a mayúsculas «es 

HL -> nombre de fichero a cambiar (terminado por 00H) 
: DE => nuevo nombre (terminado por 00H) 


¡Parámetros de salida 
; Acarreo a cero sí éxito en opera 
(A = 0,1,2,3) 
Acarreo a uno si értor 
A = OFEN si existe ya el nuevo fichero 
A = OFFN si no existe el fichero a cambiar 


'ón 








igura 5-21. Petición de cambio de nombre de fichero. 


9017 
0005 


0010 
0020 


0037 


0047 





Figura 5-21. 





111000 
cosD00 


111000 
DEOF. 
cDOS00. 
FEFF 
EFE 


110000 
0517. 
cos00 
FEFF 


cs 


05D C9 
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+5ecuencia de Llamada 


Ha OLONAME 1HL -> nombre antiguo 
DNEHNAME 1DE => nombre nuevo 

RE 

ERROR 

EQU 15 rAbrir fichero! 

EQU 23 ¿Cambio de nombre de fichero 
EU 5 *Punto de entrada al BDOS 


0,0,0,0,0,0,0,0 11 1/2 FCB** long 
0,0,0,0,0,0,0,0 








RES 
PUSH a ¿Guardar apuntador a nuevo nombre 
LX D,RFFCB ¿Construcción FCB nombre antiguo 

ÍNL => nombre antiguo 

CALL BF 
A] ¿Recuperación apuntador nuevo nombre 
XI D/REFCBe16 ¿Componer nuevo nombre en La segunda parte 
CALL BF ¿del bloque de control de fichero 
LX D,RFFCBR16 ¿Intento experimental 
MYI C:BSOPEN ¿de abrir el nuevo fíchero 
CALL BDOS ¿para asegurar 
CPI OFFH ¿que no existe ya 
MUI ALOFEM ¿suposición de error (marcas no cambiadas) 
Re FAcarreo a uno sí A es 0,1,2,3 
ba ¿Cambio de nombre del fichero 
mur 
CALL 
cer ¿Acarreo a 1 5i0K, a 0 si error 
ES ¿Inversión uso del acarreo, a 1 si error 
ReT 

ver 


1Construcción bloque de control de fichero 
FEsta subrutina compone una cadena terminada 
¿por un byte DOM en el FCB, poniendo disco 

y mombre y tipo de ficheró y poniendo a cero 
vel resto del FC8 





+Parámetros de entrada 
; DE => bloque de control de fichero (36 bytes) 
1 HL => cadena nombre de fichero (terminada con un byte 00M) 


¡Parámetros de salida 
, Bloque de control de fichero construido 


+Secuencia de Llamada 





, EXI D,FCB 
, LX AFILENAME 
CALL BE 

REr 





Jubrutina ficticia: Ver Figura 5-16 





(Continuación.) 


Función 24: Obtención de discos activos (vector de apertura) 


Código de funció! 


C 





8H 





Parámetros de entrada: Ninguno 


Parámetros de salida: 








HL=Activación del mapa de disco (vector de apertura) 
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Ejemplo 
0018 = BSGETACTDSK E0u 24 ¿Obtención discos activos 
0008 = BDOS Eu 5 ¿Punto de entrada al 8005 
¡Ejemplo de obtención del código 
0000 018 mi C, BSGETACTDSK ; de función de disco activo 
0002 cDOS00 CALL BDOS ¿HL = mapa de bits disco activo 





¿Los bits son = 
¿Bits 15 14 13 
¿Disco P 0 N 





si disco activo 
210 





CBA 


Propósito Esta función devuelve un mapa de bits, denominado vector de apertura, 
al par de registros HL, indicando qué controlador de disco lógico ha sido 
seleccionado desde el último arranque caliente o desde la última llamada a 
la función de puesta a cero del disco (código 13, 0DH). El bit menos 
significativo de L corresponde al disco A, mientras que el bit de mayor 
orden de H corresponde al disco P. El bit correspondiente al disco lógico 
específico está puesto a 1 si el disco ha sido seleccionado o a 0 si el disco no 
está actualmente en línea. 

Los discos lógicos pueden ser seleccionados por programa a través de 
una operación de ficheros que pone el campo de unidad en un valor distinto 
de cero, a través de la función de selección de disco (código 14, OEH), o por 
el operador por introducción de una orden “X:”, donde “X” es igual a A, 
Bi. Re 


Notas Esta función está pensada para los programas que necesitan saber qué 
discos lógicos están activos actualmente en el sistema —es decir, aquellos 
discos lógicos que han sido seleccionados. 


Función 25: Obtención del disco actual por defecto 
Código de función: C=19H 


Parámetros de entrada: Ninguno 
Parámetros de salida: A 





(0= 
Ejemplo 
0019 = BSGETCURDSK EQU 25 ¿Obtención disco en curso 
0005 = BDOS EQU 5 ¿Punto de entrada al 8DOS 
9000 0E19 FIYI C.BSOETCURDSK — ;Código de función 
0002 CDOS00 CALL BDOS 7A=0si az, 1 siB: 





Propósito Esta función devuelve el disco actual por defecto fijado por medio de la 
última llamada a la función de selección de disco (código 14, OEH) o por la 
introducción al CCP de una orden ““X:” por el operador, donde *“X” es A, 
Bic Ro 
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Notas Esta función devuelve el disco actual por defecto en forma codificada. 
Registro A=0 si la unidad A es la actual, 1 si es B, etc. Si se necesita 
convertir esto a los caracteres ASCII correspondientes, hay que añadir 
simplemente 41H al registro A. 

Utilicese esta función para convertir el nombre y tipo de fichero de un 
FCB a una cadena ASCII para visualizarla. Si el primer byte del FCB es 
00H, se está utilizando el controlador por defecto. Por consiguiente, habrá 
de utilizarse esta función para determinar la letra lógica del disco para el 
disco por defecto. 


Función 26: Fijación de la dirección DMA (lectura/escritura) 
Código de función: C=1AH 


Parámetros de entrada: DE=Dirección de DMA (lectura/escritura) 
Parámetros de salida: Ninguno 


Ejemplo 
001A = BISETDMA EQU 26 ¡Fijar dirección DMA 
0005 = BDO Eo ¿Punto de entrada al 8005 
9000 SECBUFF+ FS 128 ¿Memoria intermedia de sector 
0080 ELA MI Ci BSSETDMA ¿Código de función 
0082 110000 LXI D/SECBUFF ¿Apuntador a memoria intermedia 
0085 CDOS00 CALL BDOS 


Propósito Esta función coloca la dirección de acceso directo a memoria del BDOS 
(DMA) en un nuevo valor. El nombre es una reliquia histórica que data de 
los tiempos del sistema de desarrollo Intel, en el que se desarrolló 
originalmente CP/M. Esta máquina, en virtud de su hardware, podía leer 
datos de un disquete directamente en la memoria o escribir datos en un 
disquete directamente desde la memoria. El nombre de dirección DMA se 
aplica ahora a la dirección de la memoria intermedia a la cual y desde la 
cual se transfieren los datos siempre que un disquete lee, escribe o cuando se 
realiza una operación de directorio. 

Siempre que el CP/M se pone en marcha por primera vez (arranque en 
frio) o se realiza arranque caliente o se llevan a cabo operaciones de puesta 
a cero del disco, la dirección del DMA se pone en su valor por defecto 
0080H. 


Notas Ninguna llamada de función puede informar acerca del valor actual de 
la dirección DMA. Todo lo que puede hacerse es una llamada a la función 
que fija la dirección DMA para asegurar que esté cuando se necesite. 

Una vez que se ha fijado la dirección DMA en el lugar correcto para el 
programa, quedará fijada allí hasta que se realice otra llamada a la función, 
puesta a cero del disco o arranque caliente. 
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Las operaciones de lectura y escritura secuencial y aleatoria utilizan el 
valor en curso de la dirección del DMA como lo hacen las operaciones de 
directorio búsqueda del primer caso y búsqueda del próximo. 


Función 27: Obtención del vector de situación 
Código de función: — C=1BH 


Parámetros de entrada: Ninguno 
Parámetros de salida: HL=Dirección del vector de situación 


Ejemplo 
0018 = BSGETALVEC EQU 27 ¡Obtención dirección de vector de situación 
0005 = BDOS EU 5 ¿Punto de entrada al BD0S 
0000 0E1B MUI Ci BSGETALVEC ¡Código de función 
0002 cDos00 CALL BDOS ¿HL => dirección base del 
¿0 Vector de situación 


Propósito Esta función devuelve la dirección base, o de comienzo, del vector de 
situación para el disco lógico actualmente seleccionado. Esta información, 
que indica las partes del disco que están asignadas, se utiliza por los 
programas de utilidad y por el propio BDOS para determinar cuánto 
espacio no utilizado existe en el disco lógico, para localizar un bloque no 
utilizado para extender un fichero, o para abandonar un bloque cuando se 
borra un fichero. 


Notas Digital Research considera la disposición actual del vector de situación 
como información propia. 
Función 28: Situación del disco lógico en modo de sólo lectura 
Código de función: C=1CH 


Parámetros de entrada: Ninguno 
Parámetros de salida: Ninguno 





Ejemplo 
001c BeSETDSKRO EQU 28 ¿Puesta del disco en sólo Lectura 
5 código de función 
0005 = DOS Eu 5 ¿Punto de entrada al BDOS 
¿Fijación de Los discos seleccionados 
anteriormente 
¿selección de LLanada de función 
5 de disco 
0000 OE1C MVI O C.BSSETDSKRO — ¿Código de función 
0002 CDOS00 CALL BDOS 
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Propósito Esta función fija lógicamente el disco seleccionado a un estado de sólo 


Notas 


lectura. Cualquier intento de realizar una función de escritura secuencial o 
al azar en el disco seleccionado será interceptada por el BDOS y aparecerá 
en la consola el mensaje siguiente: 


BDOS Err on X1 R/O 


donde X: es el disco seleccionado. 


Una vez se ha requerido el modo de sólo lectura para el disco lógico 
actualmente seleccionado, ésta permanecerá aun en caso de que se proceda 
a seleccionar otros discos lógicos. Efectivamente, estará en vigor hasta el 
próximo arranque caliente o hasta la llamada a la función de puesta a cero 
del sistema de disco. 

La documentación de Digital Research se refiere a este código de 
función como a protección de escritura del disco. La descripción de sólo 
lectura se utiliza aquí porque corresponde al mensaje de error producido si 
el programa intenta escribir en el disco. 


Función 29: Obtención de los discos en estado de sólo lectura 


Ejemplo 


Código de función: C=IDH 
Parámetros de entrada: Ninguno 
Parámetros de salida: HL=Mapa de disco de sólo lectura 


Eu 29 ¡Obtención de discos en modo sólo Lec. 
Eu 5 ¿Punto de entrada al BDOS 





C,BSOETRODSKS — ¿Código de función Ñ 
BDOS ¿HL = mapa de bits de discos en sólo 
5 Lectura 
¿Los bits están a 1 sí disco en sólo 
7 Lectura 
¿Bits 15 14 13 
¿Disco P 0 N 





Propósito Esta función devuelve un mapa de bits en los registros H y L mostrando 


qué discos lógicos del sistema se han puesto en modo de sólo lectura, bien 
por una llamada a la función de situación del disco en modo de sólo lectura 
(código 28, 1CH), o por el propio BDOS, porque ha detectado que se ha 
cambiado un disquete. 

El bit menos significativo de L corresponde al disco lógico A, mientras 
que el bit más significativo de H corresponde al disco P. El bit que 
corresponde al disco lógico especifico está puesto a 1 si el disco se ha puesto 
en modo de sólo lectura. 
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Función 30: Fijación de atributos de fichero 


Código de función: C=1EH 
Parámetros de entrada: DE=Dirección del FCB 
Parámetros de salida: A=Código de directorio 








QO1E = BOSETFAT EQU 30 ¿Fijar atributo de fichero 
0003 = BDOS. Eu 5 ¿Punto de entrada al BD0S 
FCB+ ¿Bloque de control de fichero 
0000 00 FCB9DISK1 DR o ¿Búsqueda en la unidad de disco por defecto 
0001 46494C454EFCBINAME 1 De “FILENÁME” ¿Nombre de fichero 
0009 DA FCBSTYP» DB T-+80H ¿Tipo con 
7 atributo R/O 
0004 5930 7 eYpo 
0000 0000000000 De 0,0,0,0,0,0,0,0,0,0,0 
0022 OE1E MI C,BSSETFAT ¡Código de función 
0024 110000 LXI  D,FCB ¿DE -> bloque de control de fichero 
¿Bits MS a uno en nombre/tipo de fichero 
0027 CDOS00 CALL BDOS ¿A = OFFH sí no fichero no encontrado 


Propósito Esta función fija los bits que describen los atributos de un fichero en las 


entradas relevantes del directorio para un fichero específico. Cada fichero 
puede contener hasta 11 atributos. De estos 11, dos tienen significados 
predefinidos, otros cuatro están disponibles para ser utilizados por el 
programador, y los cinco restantes están reservados para usos futuros del 
CP/M. 

Cada atributo consiste en un bit único. El bit más significativo de cada 
byte del nombre y tipo de fichero se utiliza para almacenar los atributos. 
Los atributos de fichero se designan por un código consistente en la letra 
“f” (para nombre de fichero) o “t” (para tipo), seguida del número de 
posición del carácter y una comilla única. Por ejemplo, el atributo de sólo 
lectura es tl”. 

El significado de los atributos es el siguiente: 


efFafe Disponible para ser utilizado por el programador 


ef afe' Reservado para uso futuro del CP/M 
et Atributo de sólo lectura del fichero 
..nb Atributo de fichero modo sistema 
ely Reservado para uso futuro del CP/M 


Los atributos están fijados presentando esta función con un FCB en el 
cual el nombre no ambiguo del fichero ha sido fijado previamente con los 
bits más significativos colocados apropiadamente. Esta función busca 
entonces el directorio para una comparación y cambia las entradas 
comparadas para que contengan los atributos que se han fijado en el FCB. 


Notas 


8000 
4000 
2000 
1000 


0800 
0400 
0200 
o100 


0080 
0090 
9040 
9020 


001€ 





Figura 5-22. 
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El BDOS interceptará cualquier intento de escribir en un fichero que 
tiene puesto el atributo de sólo lectura. La orden DIR del CCP no muestra 
ningún fichero en modo sistema. 


Se pueden usar los cuatro atributos disponibles para poner en marcha 
un sistema de seguridad de ficheros o quizá para marcar ciertos ficheros que 
deben mantener otros discos. Las funciones de búsqueda del primer caso y 
búsqueda del siguiente permiten visualizar la entrada completa del directo- 
rio, de forma que los programas pueden comprobar fácilmente los atri- 
butos. 

Los ejemplos de subrutinas de las figuras 5-22 y 5-23 muestran cómo 
fijar los atributos de fichero (SFA) y obtener atributos de fichero (GFA), 
respectivamente. Ambos utilizan un mapa de bits en el cual los 11 bits más 
significativos del par de registros HL se utilizan para indicar los bits 
correspondientes de los 11 caracteres de la combinación nombre/tipo de 
fichero. Se verán entonces algunas equivalencias que hacen más fácil la 
manipulación de los atributos en este mapa de bits. 


¿SEA 
¡Fijación de atributos de fichero 

FEsta subrutina toma Un mapa de bits comprimido de todos Los bits 
ide atributos del fichero, Lo expande en un bloque de control 
ide fichero existente y háce una petición a CP/M para activar 
¡Los atributos en el directorio de fícheros. 





iParámetros de entra 

DE => bloque de control de fichero 

HL => mapa de bits. Sólo se utilizan los bits más 
significativos que corresponden directamente 
a los posíbles bytes de atributos 





:Paránetros de salida 
; Acarreo a cero si éxito en La operación (A = 0,1,2,3) 
EE) 





: Acarreo a uno si error (A 


+Secuencia de Llamada 
: EXI D,FCB 
; EXI H/0000SO0O0$110080000B ¿Mapa de bits 
; CALL SFA 
; Je ERROR 
¿Equivalencias de atributos de fichero 
EQU 100O8ODO0SOGOOSOO00B — ¿FI - FA 





EQU O10OS0000$0OOOSO000B — ¿Disponible para su uso por 
EQU OO1OSO00DS0OOOS0000B — ; programas de aplicación 
EQU O0018O000RO000R0000B 


EQU OO0OS1O0OSO0O0KO000B — ¿FS' - FB 
EQU 0000S0100S00008000! ¿Reservado para CP/M 
EQU O00080010SO000KO000! 





EQU 0000000190000$0000B 
EQU 0000s0000$1000s00008 — ¿TI -- fichero sólo Lectura 
E0U FasTi 

EQU 0O0OSO00OSOIVORO0008 — ¿T2' == fichero modo sistema 
EQU FAS 





EQU OO00SO00OSOOLOSO000B — ¿T3' —- reservado para CP/M 


BSSETFAT E0u 30 ¿fijar atributos de fichero 
BDOS EU 5 ¿Punto de entrada al 8005 








Fijación de atributos de fichero. 
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Figura 5-22. 


Figura 5-23. 


¡Guardar apuntador a FCB 
'HL —> primer carácter nombre de fichero 
¿Bucle de conteo para nombre y tipo de fichero 


¡Bucle principal de proceso 


Desplazamiento del siguiente bit MS en el acarreo 
0,1 dependiendo del acarreo 


(Guardar resultado (00M o BON) 
HL => carácter en FCB. 

¿Obtención de carácter en FCB 

FArsLar todo excepto bit de atributo 

¿Puesta a uno del atributo en base al resultado 
sy almacenar en FCB 

¿DE => FCB, ML = resto de mapa de bíts 

¿DE -> carácter siguiente en el FCB 

¿Descuento de carácter en contador 

¿Salto atrás para nuevo carácter 

¿Activar código de función de atributo en fichero 
¿Recuperar apuntador a FCB 


¡Acarreo a uno si 0K, a cero sí error 
¿Inversión para utilizar acarreo a 1 si error 


(Continuación.) 





¿FA 

tObtención de atributos de fichero 

tEsta subrutina busca el fichero deseado utilizando La rutina 

¿de búsqueda del primero antes de abrir el fichero. Construye 

Fentonces un mapa de bits con Los bits de atributos en el nombre 

1y tipo de fichero. Con este mapa y el mapa de bits de entrada 

táe hará La operación AND y devolverá el resultado en el indicador 
le cero. El mapa real será también devuelto en caso 

¿de que Se necesite una comprobación más compleja. 


1>»> — Nota: Esta subrutina cambia La dirección DMA de CP/M. 


¡Parámetros de entrada 
ñ DE -> bloque de control de fichero 

: HL = máscara de mapa de bits para ser operado (AND) 
, con Los atributos 


¡Parámetros de salida 
Acarreo a cero. Operación terminada con éxito 
Estado distinto de cero como resultado de La operación AND 
entre la máscara y el conjunto de bits de atributo. 
HL = conjunto de bytes de atributo no enmascarados. 
Acarreo a uno, fichero no encontrado 


Eo 2 ¿Fijación dirección DMA a 
EQU 17 ¿Búsqueda de La primera entrada para coincidencia 
Eu s ¿Punto de entrada al BDOS 
EQU 80H ¿Dirección DMA por defecto 


+Secuencía de Llamada 
ÉxI D,FCB 
LXI MH; OO0ON00008110090000B ¡mapa de bits 
CALL FA 
Je ERROR 


¿Equivalencias atributos de fichero 


1000800009O000KOOVOB —+F1” - FS” 
ONOOSOO0OSOOO0S00008 — ¡Disponible para su uso por 





Obtención de atributos de fichero. 











| 

2000 = FASFS EQU OO1OSO000SO00OSO0008 ¿Programas de aplicación 
1000 = FASFA EQU 000180000S0000SO000E 
0800 FASES EQU sr: - Fe 
0400 = FAsFS EQU sReservado para CP/M 
0200 = FASF7 EQU O000S001OSOONOSOO0OR 
0100 FASFS EQU O000$0001S0O00S0000B 
0080 = FAST EQU O0O0SGONOSIOOOSAD0OB — +T1” == fichero de sólo Lectura 
0080 = FASRO EQU FASTI e 
0040 = FASTZ EQU OGOOSGOVOSOIOOSO000B +12" == fichero en modo sístena 
0040 = FAsSYS EQU FASTZ 
0020 = PASTA EQU OOOOROGOOROOLOSOO0OB +13" -- reservado para CP/M 

ora: 
0000 ES O] ¿Almacenamiento náscara-AND 
0001 05 PuUsH D ¿Almacenamiento apuntador a FCB 
0002 0E1A MvI Ci BSSETOMA ¿Puesta de DMA a dirección por defecto 
0004 118000 EXI D:GFADMA ¿DE => dirección DMA 
10007 CDOS00 CALL BDOS 
0004 11 Porn ¡Recuperación apuntador a: FC8 
0008 011 MVI O C/BSSEARCHF ¡Busqueda de coincidencia con nombre 
00D CDOSO0. CALL BDOS 
0010 FEFF CPI OFFM ¡Acarreo a 1 si 0£, a cero sí error 
0012 37 cue ¿Inversión para usar acarreo a 1 sí error 
0013 DAs100 se FAX Retorno si error. 

¿multiplicar por 32 para obtener el desplazamiento 
5 en La memoria intermedia DMA 

0016 87 ADD A 2 
0017 87 ADD A 4 
0018 87 ADD A a 
0019 87 ADD A 16 
GOJA 87 ADD A 22 
0018 SF moy EA ¿Composición del valor sobre una palabra 
SOIc 1800 mI Dy0 SmL => oirección DMA 
SOlE 218000 LXI— H+OFADRA FHL => entrada al directorio en mem. int. DMA 
q9a 19 A] ¿HC 7 primer carácter de nombre de fichero 
9022 23 EN FDE => primer carácter de nombre de fíchero 
0024 0808 mI c.0ra ¿Cuenta de caracteres en nombre y tipo de fichero 
0026 210000 AS Borrado del mapa de bits 

OFAL: ¿Bucle principal 
0029 14 LOAX 0 ¿Búsqueda del carácter siguiente de nombre de fichero 
002A ES80. ANI 80m ¿Aislamiento del bit de atríbuto 
002c 07 RLO ¿Transferencia del bit MS en el bit LS 
0020 BS ORAL R del conjunto de bits previo 
002€ SF HOY LA ¿Guardar resultado 
002 29 DAD ¿nesplazamiento de HL 1 bit a La izquierda cada vez 
0030 13 1Nx ¿DE => carácter siguiente en nombre tipo de fichero 
0031 0D Dor Cc )escontar del contador 
0032 022900 ÚNZ FAL ¿Vuelta atrás para carácter siguiente 
0035 29 DAD mM ¡Justificación a La izquierda de Los bits de atributo en HL 
0036 29 A] FEU bit de atributo MS estará ya 
0037 29 DAD > ¿en el onceavo bit de ML, hacen falta, por tanto, sólo 
0038 29 DAD ¿cuatro desplazamientos 
0039 01 Por o ¿Recuperación máscara-AND 
0034 74 moy AD ¿Obtención byte MS de resultado 
0038 A4 ANA ¿AND con el byte MS de resultado 
903c 47 moy BA ¿Guardar resultado intermedio 
0030 78 moy AE ¿obtención byte LS de La máscara 
003 AS ANAL ¿AND con el byte LS de resultado 
O03F BO ORO B ¿Combinar ambos resultados para fijar el indicador 2 
0040 CS Rer 

FAX: ¡Salida de error 
0081 EL A] ¿Pop de la pila 
0042 09 Rer : 

a 
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Figura 5-23. (Continuación.) 
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Función 31 


Ejemplo 


Propósito Esta función devuelve la dirección del bloque de parámetros de disco 


Notas 





















: Obtención de la dirección del bloque de parámetros de disco 
Código de función: C=1FH 
Parámetros de entrada: Ninguno 
Parámetros de salida: HL=Dirección del DPB 
O01F BSOETOPB EQU 31 ¡Obtención de La dirección del bloque 
5 de parámetros del disco 
0005 = BDOS EU Ss ¿Punto de entrada aL BDOS 
¿Devuelve La dirección DPB del disco 
; seleccionado previamente 
3 con La función selección 
5 de disco 
0000 OELF MI C.BSGETDPB ¿código de función 
0002 CDOS00 CALL BDOS ¿HL -> dirección de comienzo del blog 


+ de parámetros del disco en curso 


(DPB) para el último disco lógico seleccionado. El DPB, explicado en el 
capítulo 3, describe las características de un disco lógico específico —infor- 
mación de interés principalmente para programas de utilidad del sistema. 


Las subrutinas presentadas en la figura 5-24 se enfrentan con dos graves 
problemas. Primero, dado un número de pista y de sector, ¿en qué bloque se 
introducirá? Y a la inversa, dado un bloque, ¿cuáles son su pista y su sector 
iniciales? 

Estas subrutinas se utilizan normalmente por las utilidades del sistema. 
Primero obtienen la dirección del DPB usando esta función del BDOS. 
Entonces conmutan para utilizar llamadas directas del BIOS para realizar 
sus otras funciones, tales como selección de discos, pistas y sectores y para 
leer y escribir en el disco. 

La primera subrutina, GTAS (obtención de pista y sector), en la figu- 
ra 5-25, toma un número de bloque y lo convierte para proporcionar los 
números de pista y sector iniciales. El GMTAS (obtención de pista y sector 
máximos) devuelve el número máximo de pista y sector para el disco 
especificado. El GDTAS (obtención de pistas y sectores del directorio) 
indica no sólo la pista y el sector iniciales del directorio, sino también el 
número de sectores de 128 bytes del directorio. 

Obsérvese que siempre que un número de pista se utiliza como 
parámetro de entrada o salida, es un número de pista absoluto. Es decir, el 
número de pistas reservadas del disco antes del directorio ha sido agregado 
a él 

GNTAS (obtención de la pista y el sector siguientes) ayuda a leer 
sectores secuencialmente. Añade 1 al número de sector, y cuando se alcanza 
el final de una pista, actualiza el número de pista añadiendo 1 y pone a lel 
número del sector. 
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¿Subrutina de utilidad para acceder a datos situados 
¿en el bloque de parámetros del disco 


000 BASELOSK E0u 18 ¡selección del código de función del disco 
D01F = BOOETDPE E0U 31 ¿obtención dirección DPB, 
0005 = BoOS EU 5 Punto de entrada al BDOS| 





¿Hace un código más compacto, por razones de facilidad, 
¿para copiar el bloque de parámetros del disco específico 











10N variables Locales mientras se manipula la información. 
JEstas variables son Las siguientes: 
DP: ¿Bloque de parámetros del disco 

0000 0000 DEBSPTE DM 0 ¿Sectores de 128 bytes por pista 

0002 00 DeBBSI DO 0 Inesplazamtento de bloques 

2003 00 DeBem De 0 ¿máscara de bloques 

c00a do Dese Do O Máscara de extensión 

000s 0000 DPBMAB: DO Número máxino de bloque 

0007 0000 DPBNOD: DW 0 iNimero de entradas al directorio=1 

0005 0000 DPRDABI DA O Jnloaues del directorio 

0008 0000 DPRCES: DA O deonrobación tamaño memoria internedia 

000D 0000 DPBTBD: DW o ¿Pistas reservadas antes del directorio 

ooo Dres7 E0U DPS Tenaño del bloque de paránetros del disco 
¿sEroPa 


¿Obtención bloque de parámetros del disco 
sta subrutina copia el DPB del disco Lógico especificado 
sen las variables locales para DPB mencionadas. 








¡Parámetros de entrada 
A A = número de disco Lógico ( 





¡Parámetros de salida 





é Variables Locales conteniendo DPB 
GETOPE: 
000 SE. moy EA ¡Obtención del código de disco del disco seleccionado 
0010 050€ MVT C/BRSELDSK ¿Selección del disco 
0012 Cbos00 CALL BDOS 
0015 DELE MVT C/BSGETOPe ¿Obtención de La dirección de comienzo de Los parámetros 
¿de disco 
0017 cbos00 CALL BDOS| SAL > 0P8, 
DOLA 0E0F MVT C,DPBSZ ¿Activación del contador 
do1c 110000 EXI D/DPe ¿Obtención de La dirección de comienzo de Las variables 
¿locales 
GDPBL: ¡copía del DPB en las variables Locales 
DOF 7 moy Am ¿Obtención de un byte del DP8 
0020 12 STAXx  p ¿Almacenar en una variable Local 
0021 13 ue a ¿Actualización apuntador a variable Local 
0022 23 Nx > ¿Actualización apuntador DP8 
0023 0D pOr € ¿Descontar del contador 
0024 C21FOO INZ GORE Vuelta atrás para byte siguiente 
0027 09 Rer 
¿STAS 


¿Obtención de pista y sector (dado un número de bloque) 
¡Esta subrutina convierte un número de bloque 

Jen un núnero de pista y Sector -- nótese que se basa en 
¿sectores de 128 bytes 


122>>> Nota: Debe Llamarse a GETOPB antes de 
PA» Llamar a esta subrutina 


¡Parámetros de entrada 








Ej HL = número de bloque 
¡Parámetros de salida 

A úmero de pista 

; DE = núnero de sector 
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Figura 5-24, Acceso a los datos del bloque de parámetros del disco. 
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¿Métodos 








¿más 





¡Parámetros de salida 








Parámetros de salida 





80 

4 DE 

ls HL 

GDTAS: 
0045 2A0700 LALO DPBNOD 
0048 23 INM 
0049 CDDO0O. CALL SHA 
004C CDDODO CALL SHA 
D04F ES Pus 
0050 210000 o 
0033 CD2800 CALL GOTAS 
0056 C1 POP B 
0037 C9 Rer 





e sec. por pista) +1 
GOTAS: 
0028 340200 LOA DPBBS 
GTASS+ 
0028 29 DAD mM 
002c 3D. DORA 
0020 22800 JNZ O GTASS 
0020 ES. Xcmo 
0031 240000 LALO DPeSPT 
0034 ES XCHO 
10035 CD8FO0 CALL DIVHL 
0038 23 moon 
0039 ER xemo 
DO3A 240000 LLO DPBTBD. 
0030 09 DAD E 
003€ C9 Rer 
¿SMTAS. 


¿Parámetros de entrada: Ninguno 


F mi 
; DE = sector máximo 
GMTAS: 

003F 2A0500 LHLO— DPBMAR: 

0042 C32800 JMP O GTAS. 
¿SDTAS. 


Parámetros de entrada: Ninguno 


En términos matemáticos La pista puede ser deducida: 
Trk = (Bloque * sec. por bloque) / sec. por pista 
; + pistas antes del directorio 

¡EL sector se deduce en La forma: 

¿Sec = (Bloque * sec. por bloque) nódulo/ 





¡Obtención bloque desplazado -- de 3 2 7 
“dependiendo del tamaño de bloque Ñ 
¿Será usado cono contador para desplazamiento 


¡Desplazamiento del bloque un Lugar a la izquierda 
¿becrenento del contador de desplazamiento de bloque 
¿Necesidad de más desplazamientos 

¿DE = bloque + sec. por bloque 

¿gor ejemplo, DE = número total de sectores 
¿Obtención de sectores/pista 

¿HL = sec. por pista, DE = número total de sectores 
ML/DE, HL 

pista, HL 








resto 
sector 









sector, HL = pista 
istas antes del directorio 
sector, HL = pista absoluta 


¿Obtención de pista y sector máxinos 


¿Es únicamente una Llamada a GTAS con el bloque 
como parámetro de entrada 


19>>>> — Nota: Debe Llamarse a GETDPB antes 
PP» de Llamar a esta subrutina 


núnero náxino de pista 


¡Obtención bloque máximo 
¿Retorno a GTAS con Los parámetros en HL y DE 


¿Obtención de pista y sector del directorio 


¿Devuelve La písta-y sector de comienzo 
¿del directorio de ficheros junto con el número 
ide sectores del directorio. 


1)>>>> Nota: Debe Llamarse a GETOPB antes 
22» de Llamar a esta subrutina 


número de sectores del directorio 
Sector de comienzo del directorio 
pista de comienzo del directorio 





¡Obtención de núnero de entrada al direc 
¿Componer número verdadero de entradas 
“ada entrada tiene 32 bytes de Longitud, dividir 
¿nor cuatro para convertir a sec. de 128 bytes 
¿Y 2 Cesplazando HL a La derecha 1 11) 
¿Guardar número de sectores 
| directorio empieza en bloque 0 
IL = pista, DE = sector 
lecuperar fúnero de sectores 











Figura 5-24. (Continuación.) 
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0058 
0059 
005A 
0050 
0060 
0061 
0062 
0063 
0086 


0067 
006 
0089 
006 
0080 


0070 
0071 
0074 


0077 





ES 
13 
2A0000 
Coc900 
E 
po 
23 
110100 
cs 


ps 
Es 
2A0D00 
EB 
Encsoo 


E 
2A0000 
EDasoo 
en 





¿GNTAS. 
¿Obtención pista y sector de siguiente 


¿Esta subrutina actualiza La pista y sector de entrada 


Sañadiendo una unidad, incrementando el número de pista 
3Y s1tuando el número de sector en La forma adecuada. 


1997>> Nota: Debe Llamarse a GETDPB antes 
PR» de Llamar a esta subrutina 





¡Notas Debe comprobarse final-de-disco comparando 
¿09 eL número de pista devuelto por esta rutina 
7 con el devuelto por GMTAS + 1. Sí coinciden 
Se ha Llegado al final del disco. 





¡Parámetros de entrada 
HL = número de pista en curso 
DE = núnero de sector en curso 





>aránetros de salida 











; HL = núnero de pista actualizado 
; DE = núnero de sector actualizado 
ONTAS: 
Pus ¡Guardar pista 
IND JActualizar sector 
LHLD DPeSPT tener sectores por pista 
CALL SUBML IL = HL - DE 
O] ¿Recuperar pista en curso 
3 ¿Retorno si sector act. <= sec. por pista 
10M ¿Actual1zar pista sec. act. > Sec. por pista 
EXI D,A ¿Puesta a 1 del sector 
RET 
¿6A8 


¿Obtención de bloque 


¿Esta rutina devuelve un núnero de bloque 
¿dado un número de pista y de sector. Da también 

jel desplazamiento del bloque en el que puede 
¿encontrarse el sector. Este desplazamiento viene dado 
Jen unidades de sectorres de 128 bytes. 





19357) Nota: Debe LLamarse a GETDPB antes 


1223) de Llamar a esta subrutina 
¡Parámetros de entrada 

¿ HL = número de pista 

A DE = minero de sector 


¡Parámetros de salida 
NL = núnero de bloque 


Método 

El núnero de bloque se obtiene: 

lam = tsector + Upista - pistas antes del directorio) 

; e sectores por pista)) / Log 2 (sectores por bloque) 





¿El desplazamiento de sector de un bloque se calcula de La forma siguiente: 








¿nespla = (sector * Ú(pista - pistas antes del directorio) 
; + sectores por pista) / AND (sectores por bloque=1) 
CAB: 
pusH O ¿Guardar sector 
xCH6 ¿DE = pista 
LMLD O DPBTRD Jobteneión número de pistas antes del directorio 
xcHo. ¿DE = número de pista antes dir. NL = písta 
CALL SUBML HL - DE 
pista relativa en disco lógico 
xCHO Pista relativa 
LEAL DPeSPT ¿Obtención sectores por pista 
CALL MULHL HL = ML DE 
Número de sectores 
xcH6 húmero de sectores 








Figura 5-24, (Continuación.) 
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0078 El POr ¡Recuperar sector 
0079 28 A] ¿Hacerlo relativo a 0 
007A 19 DAD DO ¿HL = sector relativo 
0078 340300 LOA DPaem ¿Obtención máscara de bloque 
007E 47 MOV BA ¿Preparado para operación AND 
007 70 CAN ¿Obtención byte LS de sector relativo 
0080 A0 ANA a, ¿AND con máscara de bloques 
0081 FS PUSH PSM ¿A = desplazamiento de sector 
0082 3A0200 LOA DPeBS 'Obtención desplazamiento bloque 
0085 4 moy C,A Puesta en contador 
ABS: iento 
9088 CDDO0o CALL SMA ¿HL desplazado a La derecha (dividido por 2) 
0089 0D. CS ¿Descont 
008A C28600 UNZ GABS ¿Desplazar más sí es necesario 
0080 FL POR Psm ¿Recuperación del desplazamiento en dirección 
008E C9 Rer 


¿Subrutinas de utilidad 


¿DIAL 
ivide HL por DE utilizando La sustracción iterativa 





¿Parámetros de entrada 
ds HL = dividendo 
; DE = divisor 





'ónetros de salida 






























80 cociente 
mL Festo 
ovas 
0er Ds Pus 0 ¿Guardar divisor 
ÍNota 2 El complemento a 2 se obtiene 
¿invirisendo todos los Bits y +71 
0090 78 mov AE ¿complenentar divisor (para Hacer 
0091 2 ena ¿aespuén ADO Sterarivo) 
0992 Se PO EA 
0093 7a mo AD ¿tención byte ns 
0094 2F CHA ¿Complementación de éste 
0098 57 OS 
009% 13 id La ¿Realización complemento a 2 
¿nestar el divisor negativo hasta que se haga 
rgativo el dividendo contando el número 
Veces que se resliza la resta 
10097 010000 bal so inicializar cociente 
or: ¿Bucle de resta 
209 es aux E ¿Suma de una unidad al cociente 
os 19 DAD p, ¿Restar divisor 
09c DASADO eo Divas [Dividendo no negativo todavia 
JDsvidendo yA negativo, cociente d 
dor os .er > ¿Cociente correcto 
dieulo resto correcto 
Doro Es ae E reato=divisor 
9941 El Lr- 2 E ri visor positive 
9042 19 DAD 0 reves pasivo 
Decidió MER ¿BC = cociente, HL = resto 
pu 
¿Producto HL * DE utilizando ADD Sterativanente 
¿Parámetros de entrada 
PAL malta cando 
FO DE altaLIcador 
¿Parámetro de salida 
PTE producto 
FDEZ aleoLicador 
uu 
00m4 CS Pus a Guardar registrorde-usuarto 


¿Comprobar sí multiplicando 
3 o multiplicador nulos 





¿Esta subrutina realiza la aritmética de 16 bits sobre el par de registro HL 


¡Prácticamente utiliza una ADD iterativa del complemento del divisor 











Figura 5-24. (Continuación.) 
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os. 
00A7. 
008A 
00AB 
90Ac 


o0AF 
0050. 
001 
004 


0085 
0086 
0087 


0089 


0088 
voBC 
Dor 
00co. 
D0cI 


00ce 


00c7 
00c8 


00co 
DOCA 
00c8 
doce 


D0cF 


00Do 
0001 
0002. 


0003 
0004 
0005 
0008 
0007. 





0045 7C 


BS 
caceoo 
7A 
83 
CAcaoo 


7A 
Be 
DABSOO 
ED 


42 
8 
En 
50 
08 


78 
Br 
CAc7OO. 
19 
08 
CaBaoo 


210000 


cr 
5 


70 
93 
éF 
70 
9% 
5 
cs 


7 
70 
1 


$7 
70 
1 
e 
ES 


ORA 
yz 
mov 
RA 
7 


cae 
xcHo 


HULMLNS 
moy 
mov 
mov 
moy 
Dex 


HULHLA: 


yz 
DAD 
DCx 
ae 


MULLze 
Lxr 


MULA 
Por 
RT 


¿SUN 
¿sustracción HL 


am 


MULHLZ 
AD 


HULL 


- DE 


¡Parámetros de entrada 


7 HL 
; DE 








RT 


¿SHLR 
¿Desplazamiento 


iminuendo 
Sustraendo 


Parámetros de salida 
IL = diferencia 








Sí, producto ficticio 


¿SÍ, producto ficticio 


Esta rutina será nás rápida si el 

menor valor se encuentra en DE 
¿Obtención de byte MS del valor DE en curso 
¿Comprobación de cuál es el menor 

¿Ca uno sí D <H, por tanto mo cambio 








¿BC = multiplicador 


¿DE 





IL = multiplicando 


¿Ajustar conteo de manera que 
¿1 * multiplicando = multiplicando 


¿Bucle ADD 
¿Comprobar si iteración completada 


¿Sí salida y 
¿HL = multiplicando + multiplicando 
¿Cuenta sobre multiplicador - 1 

¿Muelta atrás hasta hacer todas Las ADD. 








¡Producto ficticio si multiplicando 
5 o multiplicador nulos 


¿Recuperación registro-de-usuario 


¡Obtención byte LS 
¿Sustracción sin prestar atención al acarreo 
Situar en diferencia 

Obtención byte NS 

'Sustracción incluyendo acarreo 

Situar en diferencia 








de ML un Lugar a La derecha (dividiendo HL por 2) 


¡Parámetros de entrada 


Bl HL = valor a desplazar 


¡Parámetros de salida 
y HL = valor/2 


SHURe 
ORA 
moy 
RAR 


mov 
mov 
RAR 
mov 
Rer 


a 
am 


23 
> > 


¿Borrado de acarreo 

¿Obtención byte MS 

¿Séptimo bit puesto del acarreo 

7 bir O va al acarreo 

¿Resituar MS byte desplazado 
tención byte Ls 

t 7 = bit 0 del byte MS 

¿Puesta en resultado 








Figura 5-24. (Continuación.) 
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Función 32: Fijación/obtención del número de usuario 


Ejemplo 


Propósito Esta subrutina lo mismo fija que obtiene los números de usuario en 


Notas 





GAB (obtención del bloque de situación) es el inverso del GTAS 
(obtención de pista y sector). Devuelve el número de bloque, dados una 
pista y un sector. 

Finalmente, la figura 5-24 incluye algunas subrutinas útiles de 16 bits 
para dividir el par de registro HL por DE (DIVHL), para multiplicar HL 
por DE (MULHL). para restar DE de HL (SUBHL —esto puede también 
utilizarse como comparación de 16 bits—) y para desplazar HL un bit a la 
derecha (SHLR). Las subrutinas de división y multiplicación son de alguna 
manera primitivas, utilizan iterativamente la sustracción y la adición 
respectivamente. No obstante, representan su papel como subrutinas de 
soporte. 

























Código de función: C=20H 

Parámetros de entrada: E=0FFH para obtener el número de usuario, o 
E=0 a 15 para fijar el número de usuario 

Parámetros de salida: A=Número de usuario en curso si E era OFFH 


0020 = BSSETOETUN EQU 32 ;Obtención/ fijación número de usuario 
0005 = BDOS EQU 5 ¿Punto de entrada al 8D0S 
¡Para fijar número de usuario 
0000 0E20 mv C,BSSETGETUN — ¿Código de función 
0002 1EOF mv Es 15 ¿Número de usuario requerido 
0004 CDOS00 CALL BDOS ¿Para obtener el número de usuario 
0007 0E20 mv C,BSSETGETUN — ¿Código de función 
0009 1EFF mur E, OFFH ¿Indicar petición a GET 
0008 CDOS00 CALL BDOS 5A = número usuario en curso (0 -- 15) 


curso. Este número determina qué entradas al directorio se comparan 
durante todas las operaciones de fichero del disco. 

Cuando se llama a esta función, los contenidos del registro E especifican 
cuál es la acción que se ha de realizar. Si E=0FFH, entonces la función 
devolverá el número de usuario en curso al registro A. Si se sitúa en E un 
número de 0 a 15 (es decir, un número de usuario válido), la función fijará 
el número de usuario actual a este valor. 


Puede utilizarse esta función para compartir ficheros con otros usuarios. 
Se puede localizar un fichero intentando abrir un fichero y conmutando a 
través de todos los números de usuario. O bien se puede compartir un 
fichero en otro número de usuario poniéndose en dicho número, operando 
en el fichero y volviendo entonces al número de usuario original. 
Si se cambia el número de usuario en curso, habrá que proveer en el 
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programa el retorno al número original antes de que el programa termine. 
Es desconcertante para los operadores de computadoras encontrarse con 
que están en un número de usuario distinto después de un programa. De 
esta forma, los ficheros pueden ser dañados fácilmente o bien borrados. 


Función 33: Lectura aleatoria 


Código de función: 





Parámetros de salida 





Ejemplo 
0021 = ESREADRAN 
0005 = BDOS 

FCB: 

0000 00 FCBSDISK: 
0001 46494C454EFCBSNAME: 
0009 545950 FCBSTYP: 
000c 00 FCBSEXTENT: 
900D 0000 FCBSRESV: 
000F 00 FCBSRECUSED: 
0010 O000000000F CESABUSED: 
0018 0000000000 
0020 00 FCBRSEOREC: 
0021 0000 FCBSRANREC: 
0023 00 FCBSRANRECO: 
0024 p204 RANRECNO: 
0026 242400 LALO 
0029 222100 SHLD 
002c 0E21 mur 
002€ 110000 xl 
0031 CDOS00 CALL 


C=21H 
Parámetros de entrada: DE=Direci 





n del FCB 


A=Código de retorno 





E0U 33 ¡Lectura aleatoria 
Eu 5 ¿Punto de entrada al BDOS 
¿Bloque de control de fichero 
De o ¿Búsqueda en unidad de disco por defecto 
DB “FILENAME/ ¿Nombre de fichero 
DR -TWp+ ¿lipo de fichero 
De o ¿Extensión 
DB 0,0 ¿Reservado para CP/M 
pe o ¡Registros utilizados en esta extensión 
De 0,0,0,0,0,0,0,0 ¡Bloques utilizados 
DR 0,0,0.0,0,0,0,0 
DB o ¿Reg. de Lec./escritura secuencial 
De o “Reg. de Lec./eserítura aleatoria 
De o ¿Byte de desbordamiento de registro 
7 aleatorio (MS) 
De 1234 ¡Ejemplo de número de registro aleatorio 
¿El registro se leerá en la dirección 
; fijada por la Llamada previa 
5 a SETOMA 
RANRECNO ¿obtención número de registro aleatorio 
FCBSRANREC — ;Activación bloque control de fichero 
C,BSREADRAN — ¿Código de función 
D,FCB DE -> bloque de control de fichero 
BDos 00 sí operación realizada con éxito 





¿A = 0 si el dato no está en el 

; fichero. Especificamente: 

¿A = 01 -- intento de Lectura de 

: registro no escrito 

03 -- CP/M no puede cerrar 
extensión en curso 


04 -- intento de Lectura de extensión 
no escrita 
06 -- intento de Lectura después 


del final del disco 


Propósito Esta función lee un registro especifico CP/M (128 bytes) de un fichero de 
acceso directo, es decir, un fichero en el que se tiene acceso directo a los 
registros. Supone que ya se ha abierto el fichero, fija la dirección de DMA 
utilizando la función correspondiente del BDOS y fija el registro específico a 
leer en el número de registro aleatorio del FCB. Esta función calcula la 
extensión del número de registro especifico e intenta abrirlo y leer el 
registro correcto CP/M en la dirección de DMA. 

El número de registro aleatorio del FCB tiene tres bytes de longitud (en 
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los bytes relativos 33, 34 y 35). El byte 33 es el menos significativo, el 34 el 
medio y el 35 el más significativo. El CP/M sólo utiliza el byte más 
significativo (35) para calcular el tamaño general del fichero (función 35). 
Es preciso poner a 0 este byte cuando se fija el FCB. Los bytes 33 y 34 se 
usan juntos para la lectura aleatoria, de forma que se puede acceder desde el 
registro 0 al 65.535 (un tamaño máximo de fichero de 8.388.480 bytes). 

Esta función vuelve con A puesto a O para indicar que la operación se ha 
completado satisfactoriamente o con Á puesto a un valor distinto a cero si 
ha ocurrido algún error. Los códigos de error son los siguientes: 


A=01 (intento de leer un registro no escrito) 
A=03 (el CP/M no ha podido cerrar la extensión en curso) 
A=04 (intento de leer una extensión no escrita) 


A=06 (intento de leer más allá del final del disco) 


A diferencia de la función de lectura secuencial del BDOS (código 20, 
14H), que actualiza el número de registro (secuencial) en curso en el FCB, 
la función de lectura aleatoria deja invariable el número de registro hasta 
que una nueva escritura aleatoria reemplace el registro que acaba de leerse, 

Se puede seguir una lectura aleatoria con una escritura secuencial 
(código 21, 15H). Esta volverá a escribir el registro que se acaba de leer, 
pero después actualizará el número de registro secuencial. O se puede elegir 
utilizar la lectura secuencial después de la lectura aleatoria. En este caso, el 
mismo registro será releido y el número de registro secuencial aumentará. 
Abreviando, el fichero puede ser leído o escrito secuencialmente una vez que 
la lectura aleatoria se ha utilizado en la posición requerida en el fichero. 


Para usar la función de lectura aleatoria, primero hay que abrir la 
extensión de base del fichero, es decir, la extensión 0. Aunque puede no 
haber registros de datos reales en esta extensión, su apertura permite que el 
fichero sea procesado correctamente. 

Un problema que no se presenta de inmediato con los ficheros de acceso 
directo es que pueden ser creados fácilmente con espacios internos vacíos, Si 
se hubiera de crear el fichero con los registros números O y 5.000, no 
intervendría ninguna extensión de fichero. Si se intenta leer o copiar el 
fichero secuencialmente, incluso utilizando las utilidades de copiado de 
ficheros del CP/M, solamente se copiaria la primera extensión (en este caso, 
el registro 0). Una función de lectura secuencial devolvería un error de 
“final de fichero” después de haber leído el registro 0. Por consiguiente, hay 
que ser consciente del tipo de fichero que se intenta leer. 

Véase la figura 5-26 como ejemplo de subrutina que realiza lecturas y 
escrituras en ficheros de acceso directo. Lee y escribe registros de tamaños 
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distintos a 128 bytes, donde es necesario leer o escribir varios registros del 
CP/M, leyéndolos previamente sobre su propia memoria intermedia cuando 
el registro que se escribe ocupa sólo parte del registro CP/M. Contiene 
también subrutinas para producir un producto de 32 bits que surge de 
multiplicar HL por DE (MLDL —multiplicación de doble longitud —) y un 
desplazamiento de un bit a la derecha para DE, HL (SDLR —desplaza- 


miento a la derecha de doble longitud—, 


Función 34: Escritura aleatoria 


Código de función: 


€ 





2H 





Parámetros de entrada: DE=Dirección del bloque de control de fichero 


Parámetros de salida: 









Ejemplo 

BSWRITERAN 

BDOS 

FcB: 
0000 00 FCBSDISK: 
0001 46494CASAEFCBINAME: 
0009 545950 Pr 
000c 00 ATENTA 
000D 0000 sv 
000F 00 FCBSRECUSED: 


0010 0000000000FCBSABUSED: 
0018 0000000000 


0020 00 FOBSSEQREC: 
0021 0000 FCBSRANREC + 
0023 00 FCBSRANRECO: 
0024 D204 RANRECNOs 
0026 242400 LHLD 
0029 222100 SHLD. 
0020 0E22 mur 
002€ 110000 Lxr 
0031 CDOS00 CALL 











A=Código de retorno 

EQU 34 ¡Escritura alestoria 

EU 5 Ípunto de entrada al 8005 
¿Bloque de control de fichero 

Da Tnúsqueda en disco por defecto 

D5 Cenenare “Nombre de fichero 

Da -TYB= Tipo de fichero 

AS tensión 

DB 0,0 ¿Reservado para CP/M 

0 Ihegistros Utilizados en esta extensión 

DB 0,0,0,0,0,0,0,0 ¿Bloques utilizados 

PB 0:0.0.0:0,0.0,0 

po 0 Seg. lect./escrit. secuencial 

AS Jfeg. Lect./escrit, aleatoria 

0 ¿Byte de desbordamiento de registro 
¿aleatorio (m5) 

DM 1234 ¡Ejemplo de número de registro aleatorio 
¿EL registro será escrito desde la 
¿dirección fijada por La Llanada 
¿previa a SETÓNA 

RANRECNO ¡obtención núnero de fichero aleatorio 

FCBSRANREC ¿Activación bloque de control de 

C,BSWRITERAN —; fichero 

D:FCR ¿código de función 

Bhos ¿DE> bloque de control de fichero 


SA = 00 sí operación terminada con éxito 
¿A = 0 si no hay datos en el fichero, 

7 concretamente: 

¿A = 03 -- CP/M no puede cerrar la 

: extensión en curso 

05 =- directorio completo 

06 -- intento de escritura 

después del final del disco 








Propósito Esta función escribe un registro específico del CP/M (128 bytes) en un 
fichero aleatorio. Se inicia casi igual que la función consorte, lectura 
aleatoria (código 33, 21H). Supone que se ha abierto ya el fichero, fija la 
dirección de DMA a la dirección de la memoria que contiene el registro a 
escribir en el disco y pone el número de registro aleatorio del FCB en el 
registro especifico que se está escribiendo. Esta función calcula también la 
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extensión en que se encuentra el número de registro especifico y abre la 
extensión (creándola si no existe ya). Los códigos de error devueltos a A por 
esta llamada son los mismos que los de la lectura aleatoria, con la adición 
del código de error 05, que indica directorio lleno. 

Igual que la lectura aleatoria (pero contrariamente a la escritura 
secuencial), esta función no realiza una actualización de la extensión lógica 
y del número de registro secuencial (en curso) en el FCB. Por consiguiente, 
cualquier operación secuencial siguiente accederá al registro recién escrito 
por la llamada a lectura aleatoria, pero estas funciones actualizarán el 
número de registro secuencial. La escritura aleatoria puede utilizarse, por 
consiguiente, para situarse en el lugar requerido del fichero, al cual puede 
accederse entonces secuencialmente. 


Con el fin de utilizar la escritura aleatoria, primero hay que abrir la 
extensión base (extensión 0) del fichero. Aunque pueden existir registros sin 
ningún dato en esta extensión, la apertura permite que el fichero sea 
procesado correctamente. 

Como se ha explicado en las notas para la función de lectura aleatoria, 
puede crearse fácilmente un fichero aleatorio con espacios vacios en su 
interior. Si se crea un fichero con número de registro O y número de registro 
5.000, no habrá extensiones intermedias. 

La figura 5-25 muestra un ejemplo de subrutina que crea un fichero 
aleatorio (CRE) pero evita este problema. Se debe especificar el número de 
registros de 128 bytes del CP/M del fichero. La subrutina crea éste y 
entonces escribe registros llenos de ceros en su totalidad. Esto hace más 
fácil procesar el fichero y permite a los programas de utilidad estándar del 
CP/M copiar el fichero porque hay un registro de datos en cada posición de 
grabación lógica del fichero. Ya no es un fichero “raro”. 

La figura 5-26 muestra una subrutina que liga las funciones de lectura y 
escritura aleatorias. Realiza las operaciones aleatorias (RO). A diferencia de 
las funciones estándar del BDOS que operan en registros CP/M de 128 
bytes, el RO puede tratar tamaños de registro arbitrarios que van desde uno 
hasta varios miles de bytes. Se debe especificar el número de registro 
relativo del registro, no el del CP/M (el RO calcula este último). El RO lee 
también previamente un registro CP/M cuando el registro lógico a copiar 
ocupa parte de un registro de 128 bytes, bien porque es menor de 128 bytes 
o porque se extiende más de un sector de 128 bytes. La subrutina suprime 
esta lectura previa si se utiliza un tamaño de registro múltiplo de 128 bytes. 
En este caso, los registros encajarán exactamente en uno de 128 bytes, de 
forma que nunca existirá un sector de 128 bytes parcialmente ocupado. 

Este ejemplo contiene también subrutinas para producir un producto de 
32 bits, que surge de multiplicar HL por DE (MLDL —multiplicación de 
doble longitud —), y un desplazamiento de un bit a la derecha para DE, HL 
(SDLR —desplazamiento a la derecha de doble longitud—). 
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0013 
0016 
D01A 
0015 
10005 


0000. 
0032 
0064 


0050 


0082 
0085 
0088 
0088 
0088 
008c 
9080 
0er. 
0092 
0094 
0095 
0096 
0097 


0098 
009m 
09D 
00ñ0 


00A1 
00m8 
DAS. 
0086. 
0087 
o0R8: 
ODAB: 
ODAC 
O0RE 


0081 
0082 





¿CRE 


3Creación de fichero de acceso directo aleatorio) 
¡Esta subrutina crea un fichero aleatorio. Antes de crearlo borra 
¡cualquier otro que exista previamente y entonces rellena 


3con ceros el fic) 


¡Parámetros de ent 


hero completo. 


trada 


DE -> bloque de control para el nuevo fichero 

















+ HL = número de registros CP/M de 128 bytes que deben 
+ rellenarse con ceros. 
¡Parámetros de salida 
: Acarreo a cero si La operación tiene éxito (A = 0,1,2,3) 
: Acarreo a uno si error (A = OFF 
¿Secuencia de Llamada 
; Éx1I D,FCB 
; CALL CRE 
; Je ERROR 
- BSERASE EQU 19 ¡Borrado de fichero 
- BSCREATE EQU 22 ¿Creación de fichero 
- ESSETOMA E0U 26 ¿Fijación de dirección DMA 
» BSURITESEO. EQU 21 ¿Escritura de registro secuencial 
- BDOS EU 5 ¿Punto de entrada al BD05 
CRFBUFS ¿Menoría intermedia Llena con ceros 
0000000000 De 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, 
9,0,0 
0000000000 Du 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, 
0.0.0 
00000000 Du 0,0,0,0,0,0,0,0,0,0,0,0,0,0 
0000 CRFRC: DA o ¿Contador de registros 
Cars 
228000 sHLO ¿Guardar contador de registros 
05 PUSH ¿Conservar apuntador a FC8 
oE13 mur ¡Borrado de cualquier fichero 
coos00. CALL 
Dl Por lecuperación de apuntador a FC8 
DS Puse 7 y volver a guardarlo 
DELS MVT CL BSCREATE ¿creación y apertura de nuevo fichero 
C0os00 CALL BhoS 
FER Cer OEA ¡Acarreo a 1 sí 0K, a 0 sí error 
ar cmo inversión para usar acarreo a 1 sí error 
5 POr o ¿Recuperar dirección del FC8 
pe Re ¿Retorno sí hay error 
Ds Pus! o ¿Volver a guardar apuntador a FCB 
DEIA MUI C/BSSETOMA ¿Fijación de dirección DMA a men. int.-0 
110000 LAT DICRFBUF 
cDO0S00 CALL BbOS 
Dl Por D ¡Recuperación apuntador a FCB 
CRFL: 
248000 LHLD CRERC ¡Obtención cuenta de registros 
70 moy AL 
pa O] ¿Comprobación de cuenta a cero 
ce Rz 4, salida 
2b Dx om ¿Descontar unidad de contador 
228000 SMLD CRERC ¿Almacenar contador 
DS PUSH O ¿Volver a guardar apuntador a FCB 
oE1S VI C-BSMRITESEO — ¿Escritura secuencial 
cDos00 CALL BDOS 
Do poro ¿Recuperación FC8 
C3ar00 me CRL ¿Escritura registro siguiente 








Figura 5-25. Creación de fichero aleatorio. 
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3Operación de acceso directo (aleatoria) (Lectura o escritura) 


1Esta subrutina escribe o Lee un registro aleatorio de un fichero. 
Ta Longitud del registro puede ser distinta de 128 bytes. Esta 

tsubrutina calcula el comienzo del registro CP/M (que es de 128 bytes) 

+y en el caso de Lectura, realiza una Lectura aleatoria y traslada 

sel registro especificado a una menoría intermedia del usuario. Si es necesario, 
3se leerán más registros CP/M hasta que el registro especificado por el usuario 
3 haya sido Leido completamente. En escritura, si el tamaño de registro 
+especificado por el usuario no es múltiplo exacto de registros €, 

y serán preleidos Los sectores apropiados. Esta prelectura no es necesaria 

* cuando el registro especificado por el usuario es un número exacto 

¡de registros CP/M ni cuando La subrutina procesa registros CP/M que cubren 

y completamente el registro especificado por el usuario. 


1Parámetros de entrada 
HL => bloque de parámetros de La forma: 
o .OFFH para Lectura, OOM para escritura 
Fco “Apuntador al FC8 


De 

DH RECNO — ¿Número de registros usuario 

E] RECSZ  ¿Tamaro de registro usuario 

DH BUFFER — ¿Apuntador a La memoria intermedia del usuario 
7 de Longitud RECSZ bytes 


Parámetros de salida 
A= 0 si completa La operación (registro usuario 
copiado en memoria intermedia del usuario) 

Intento de Lectura de registro CP/M no escrito 
CP/M no puede cerrar una extensión 
Intento de Lectura de extensión no escrita 
CP/M no puede crear una nueva extensión 
Intento de Lectura después de final de disco 


y Secuencia de Llamada 
; LALO HPARAMS ¿HL > bloque de parámetros 
: CALL RO 

1 OR A ¿Comprobación de error 

' ÚNZ ERROR 


FCBESRANREC EQU ¡Desplazamiento de número de registro aleatorio en FCB 
BISETOMA EQU Jación de dirección DMA 
BSREADRAN EQU ¿Lectura de registro aleatorio 
BSMRITERANZ EQU ¿Escrótura de registro aleatorio con rellenado 
¿ de ceros en bloques desubicados 
7 previamente 
DoS ¿Punto de entrada al 8005 


:gen del bloque de par. 
¿NZ en Lectura, 2 en escritura 
¿Apuntador al Fc8 
¿Núnero de registro usuario 

ngitud de registro usuario 
¿Apuntador a memoria intermedia de usuari 
¿Longitud bloque de parámetros 


ipuntador al comienzo del fragmento de registro usuario 
¿ en primer registro CP/M Leído 
¿Longitud del fragmento 
¿Apuntador a número de registro (en FCB de usuario) 
iZ cuando se trata de esc. de registro que son un 
7 número exacto de registros CP/M (y que 
Í por tanto no necesitan prelectura) 


453 Ss 883833 3 
SER E EXEZES 


¿Menoria intermedia para registro CP/M 


3 


¿DE -> bloque de parámetros Locales 
¿Longitud del bloque de parámetros 
¿Transferencia de € bytes de HL a DE 


¡Para calcular el desplazamiento de registros usuario en registro 
CP/M, calcular el byte de desplazamiento relativo del comienzo 

3 del fegistro usuario en el fichero (por ejemplo, número de registro 

3 usuario * tamaño del registro). Los 7 bits menos significativos 








Figura 5-26. Lectura/escritura aleatoria de registros de longitud variable. 


0097 
0098 


0080. 


00co. 
00c1 


00ca 
00cs 


00c9 


00n0. 
0003. 


0006 
0009 
DODA 
0000. 


Don 


d0€2 
003 
D0EA 


00€6. 





2A0500 
70, 
ES7F 

7 





C2a40o 


32000 
E 

2A0300 
coB801 


ES 
70 
ESTE 


ar 
0800 
210F00 


220900 


% 
2890 


320800 


47 
3A0600 
27 

c2D800 
340500 


D20600 
320800 


2M0E00 
7 
340000 


320800 


Er 
Di 
E07 
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de este producto dan el byte de desplazamiento 
3 del comienzo del registro usuario. 

¿El producto / 128 (desplazado 7 bits) da el núnero de registro 
¿0P/M del comienzo del registro usuario. 


LHLD ROURL ¡Obtención de Longitud registro de usuario 
moy AL btención de Los bytes LS de La Longitud del reg. usuario 














ANI FM 'omprobación de múltiplo exacto de 128 
ora A Ftes decir, número exacto de registros C) 
MI AO SA = 0 no Cambian Los indicadores 
UNZ O RONE ¿No núnero exacto de registros CP 
DORA 5A= FF 
STA ROMECR Juesta a uno del indicador de esc.-de=nún.-exac.-reg.-C 
xcHo. E = Longitud de regístro de usuario 
LHCD ROURN ¿Obtención número de registro de usuario 
CALL MLDL ¿DE,NL = HL + DE 

¿DEJAL = bytes de desplaz. de reg. usuario en el fichero 
pusH 0 ¿Alñacenar byte de desplazamiento de registro usuario 
PU A 
moy AL ¿Obtención del byte LS del producto 
ANI TER ¿Aislamiento de byte de desplazamiento en el 
moy CA ¿registro CP/m 
mI BO ¿situar como valor en palabra 
EXI HROBUE ¡Obtención de dirección base menoría intermedia Local 
DAD 8 ¿HL => comienzo del fragmento en La memoria interned: 
SHO ROFRP. ¿Almacenar apuntador a fragmento 


¿Calcular Longitud máxina del fragmento que puede residir 
“en un registro CP/N basado en el byte de desplazamiento 
Gdl registro CP/M donde comienza el fragmento. 








moy BA Tomar copia del desplazamiento en el registro CP/M 
mv As128 ¡Tamaño de registro CP/M 

sua E ¿Cálculo de byte de desplazamiento 128 

STA ROFRL ¿Suposición de que es La Longitud del fragmento 





4 La Longitud de registro del usuario es menor que la supuesta, 
; se usará ésta en Lugar del resultado anterior 











mov BA ¿obtención de copía de Long. de fragmento supuesta 
DA ROURLeL ¿Obtención del M5 byte de La Long. del reg. de usuario 
Ra A ¿Si NZ, Long. de reg. debe ser > 128 
ÚNZ ROFLOK En este caso Long. de fragmento 0K 
LOA ROURL Todavía es posible que La Long. del frag. 
meo 8 sea menor que la Long. del reg. 
INC ROFLOK 5 Lona. eg. usario > oro, fraguento 
STA ROFRL ¿Lono. reg. de usuario < Long. 
Puesta de La Longitud de (Faq. al menor 
LOA ¡Obtención de indicador de reg. exacto CP/M 
13 ¿para efectuar AND con indicador READ 
LOA Obtención indicador de operación de Lectura (READ) 
Cma Inversión de NZ si escritura 
ANA 8 Formación del AND Lógico 
STA ROMECR ¿Guardar en indicador 


¡Recuperación del byte de desplazamiento de doble Longitud en el fichero 
¿de comienzo del registro usuario. Desplazar 7 posiciones 

La derecha para dividir por 128 y obtener el numero de registro CP/M 
¿para el comienzo del registro usuario. 












poro ¿Recuperar byte de desplazamiento del registro usuario 
Por D 

mI 0,7 ¿Cuenta para desplazamiento a derecha 

CALL SILA ¿DELAL = DEJML / 2 





Figura 5-26. (Continuación.) 
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7a 'rror si DE todavia NZ después 
82 de dividir por 128 
C2Acor 


ictivación del número de registro CP/M en el FC8 
Es E = número de registro CP/M 

2AD100 ¿Obtención de apuntador a FCB 

012100 y ¿Desplazamiento de núm. de registro aleatorio en el FC 
09 IL -> numero de registro aleatorio en el FCB 

220c00 ¿Almacenamiento de apuntador a número de registro 

73 ¿Almacenamiento de byte LS 

23 

72 ¡Almacenamiento de byte NS 


OElA ¿Fijación dirección DMA a La menoría intermedia Local 
1LoFO0 
cDO500 


JADEDO ¿Ignorar prelectura si se escriben sectores exactos 
8 A 
C2IFOr 


240100 ¿Obtención apuntador a FCB 
Es ¿DE > FB. 

0E21 ¿Función de Lectura aleatoria 
cnoso0 


FEOS -omprobación de código de error < 5 
DCAFO1 ¿Si, comprobar sí error ignorable 
7 (es decir, error de Lectura de fichero 
¿en La op. de prelectura) 
27 ¡Comprobación de error 
co ES] 


ROMNF+ ¿Transferir nuevo fragmento 
240700 ¿Obtención apuntador a memoria intermedia de usuario 
ES ¿DE -> memoria intermedia de usuario 

240900 ¿HL -> comienzo de registro usuario en mem. int. Local 
3AOBOO. ¿Obtención de Longitud de fragmento 

ae ¿Preparado para transferencia 


30000 ¿Comprobación de Lectura 

97, 

23201 0/1, DE y ML permanecen sin cambio 

En ¿Escritura, intercambiar fuente y destino 
¿DE -> comenzo registro de usuario en mem. 
¿HL -> memoria intermedia de usuario 


cali ¿Lectura - fragmento Local -> men, int. usuario 
sscritura - fragmento usuario => mem, int. Local 

LOA ¿Comprobación de escritura 

Oña 

Y ¿Escrítura, se mantiene HL -> men. int. usuario 

xcmo ¿ML => byté siguiente en mem. int. de Usuario 


SHO ¿Guardar apuntador a mem. int. de usuario actualizada 
LOA ROREAD ¿Comprobación de Lectura 

RA A 

UNZ O RORDS. Sí, ignorar código de escritura 


MVT Ci BSMRITERANZ — ¡Escritura aleatoria 

LALO ROFCE ¿Obtención dirección del FCa 
XCHO ¿DE > FCO 

CALL BDOS 


¡calcular La Longitud residual del regístro usuario no transferido. 
¿Si es necesario (a causa de que hay que transferir. 

una gran cantidad de datos) serán Leídos más registros CP/M. 

¿En este caso, el comienzo del fragmento de ser desplazado a 0. 

¿La Longitud del fragmento depende de cómo termine el registro 
isuario en el siguiente registro o deba expandirse. 5i La Longitud 
¿residual del registro de usuario es > 128, La Longitud del fragmento 

¿pondrá a 128. 
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0150 2A0500 
0153 3AOBOO 
0156 5F 
0157 1600 
0159 CDEAO1 
0130 70 
0150 B5 
DISE CS 


OLSF 220500 
0162 4D 
0163 118000 
0166 DEA! 
0169 FASEOL 
Dlec 0E80 


ROLTI28+ 
OL6E 79 
OLÉF 320800 


0172 210F00 
0175 220900 


0178 2A0C00 
0178 SE 
0170 23 
0170 56 
017€ 13 
OL7F 7A 
0180 B3 
OLB1 C28701 
3E06 
018s c5 





ROSAN: 
0187 72 
oLs8 28 
0189 73 


OLBA 3A0E00 
0180 87 
DIBE C21FOL 


0191 3A0000 
0194 87 
0195 C2A001 


0198 3AOBOO 
0198 FEs0 
DL9D CALFOL 


RORDZ: 
OLAO 0E21 
OLAZ 2A0100 


OLAS EB 
OLAS CDos00 
DIAS CSIFOL 


ROERO» 
DLAC 3508 
OLAE C9 

ROCIEs 
47 
340000 


97 
78 








Lo 
LDA 


En 
CALL 


ORA 
AZ 


SHO 
mov 
Lx1 
CALL 


mur 


STA 


La 
suo 


Luo 
moy 
1Nx 


10x 
moy 
Oña 
INZ 
wr 
RT 


pCx 
mov 


LOA 
RA 
NZ 


LOA 
INZ 


LOA 
cer 
Je 


mr 
107 


xcHo 
CALL 


mur 
RET 


moy 
LDA 
GRA 
moy 


ROURL 
ROFRL 
EA 
po 
umm 
A/A 


ROURL 
CL 
D, 128 


ROLTI28 
c,128 


ac 
ROFRL 


ROWECR 
A 
ROMNE 


ROREAD 
A 
RORDZ 


ROFRL 


128 
RON 


C, ESREADRAN 
ROCA 


nos 
ROME 


BA 
RÓREAD 


AR 





¡Obtención Longitud residual de registro de usuario 
¿Obtención de La Long. del frag. que acaba de transterirse 
isituación como valor en palabra 


¡Calcular ROURL = ROFAL 
¿Comprobación de resultado 0 


¿Retorno cuando se complete la transferencia 
; del registro usuario 

vvardar La Longitud residual del registro ya descontada 
¿Suposición de longitud residual < 128 
¿comprobación Longitud residual < 128 

HL = HL = DE 
¿Negativo 53 < 128 


13 128, en consecuencia puesta a 128 de la Long. de frag. 


¿La Longitud del fragnento es ahora 128 
si faltan más de 128 bytes para entrar 
en el registro Usuario o exactamente 
el número de bytes correcto (< 128) 
para completar el registro de usuario 
¿todos Los registros CP/M siguientes comenzarán al principio 
5 de La menoria intermedia 


¡Actualización del número de registro aleatorio en el FCB 
¿HL > número de registro aleatorio en FCB del usuario 
¿Incremento del número de registro aleatorio 

¿HL > byte MS del número de registro 

¿Obtención del byte MS 

JActualizar el número de registro 

¿Comprobación de número registro 0 


¿No, guardar núnero de registro 
¿Indicar "final del disco" 
¿Retorno al usuario 


¿Almacenar número de registro 

¿HL => byte LS 

¡En Lectura, comprobar necesidad de prelectura 
¿Comprovación de escritura de nun. exacto de registro CP/M 


¿SI, transferenc 





fragnento siguiente 


¿Si Lectura, realizar una Lectura incondicional 





¡Para escritura, ignorar prelectura sí todo 
¿ el registro C6/M ha sido reescrito 
7 (longitud del fragmento = 128) 


¡Lectura del siguiente registro CP/M 
5 en secuencia 


¿DE CB 
¿Vuelta atrás para transferir fragmento siguiente 


¿Error debido a núnero de registro usuario 
7 * Longitud registro de usuario / 128 da 

7 un número de registros CP/M > 65.535 
¿indicación "intento de Lectura de extensión 








¡Comprobación error ignorable (prelectura 
/ para operación de escritura) 
¿Almacenamiento código de error original 
¿Comprobación de operación de Lectura 


Restauración código de error original, 
2 pero permaneciendo Los indicadores 
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o1BS co ¿Retorno si Lectura 
0186 AF ¿Indicador de no error ficticio 
0187 C9 


¿NLOL. + 
¿Multiplicación NL + DE utilizando ADD iterativo 
¿con devolución del producto en DE,HL. 


Parámetros de entrada 
HL = multiplicando 
; DE = multiplicador 


¡Parámetros de salida 
; DE,NL = producto 
; DE= multiplicador 


Lu ;0 en cabecera de pila 

PUSH para actuar como byte MS del producto 
¡Comprobación de multiplicando 0 
multiplicador nulo 

mov 

ORA 

yz LDL: ¿Si, producto ficticio 

mov 

ORA 

Je LOL: ¿Si, producto ficticio 


¿Esta rutina será más rápida si el menor valor 
¿esta en DE 
'obtención del byte MS del valor DE en curso 
¿Comprobación del menor 

activado sí D < H, en consecuencia no cambia 


¿BC = multiplicador 
¿DE = ML = multiplicando 


¡Ajustar contador de forna que 
5 1 * multiplicando = multiplicando 
¿Bucle ADD 

¿Comprobación 


¿Si, salida 
¿HL = multiplicando + multiplicando 

¿HL = byte MS del resultado, TOS = prod. parcial 
¿Obtención byte Ls de primera mitad del producto 
¿Sumar 1 sí acarreo activo 

¿Reemplazamiento 

¿Repetir para byte MS 


! 


zo3ro> 


¡Cuenta atrás del multiplicador=1 
¿Bucle atrás hasta hacer todos Los ADDs 


E 


¡Simulación del producto si multiplicando o 
5 multiplicador son nulos 





¡Recuperación parte NS del producto 


DE = sustraendo 


¡Parámetros de salida 
; HL = diferencia 
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OIEA 70 moy AL 
OLE 93 sue E 
OLEC SF moy LA 
OLED 7C PO ASA 
OLE DA sar D 
OLEF 67 Poy A ¿Transferir a diferencia 
DIFO C9 RT 
¿SOLA 
¿Desplazamiento de DE y HL un Lugar a La derecha (dividiendo DE y HL por dos) 
Iránetros de entrada 
DE,HL = valor a desplazar 
¿Parámetros de salida 
; DE,ML = valor / 2 
sous 
or RA A ¿Borrar acarreo 
OLFZ xcHo. ¿desplazar primero DE 
DIES CDF7O1 CALL SDLRZ 
OLFS ER xcHO. ¿Desplazar HL 
¡Salto a SDLR2 con acarreo puesto correctamente 
5 a partir del bít LS 
5 de DE 
SOLRZ> ¡pesplazamiento de ML un Lugar a La derecha 
017 70 moy A ¿Obtención byte MS 
DLF8 AF RAR. ¿Bit 7 a 1 del acarreo previo 
¿8it O entra en acarreo 
OLE 87 mo A ¿Puesta del byte NS desplazado 
OIFA 7D moy AL ¿Obtención byte LS 
OLFB 1F RAR ¿Bit 7 = bit O de byte NS 
OLEC éE MOV LA ¿Puesta en resultado 
DIED Co RT 
¡move 
jTransferir € bytes desde HL a DE 
moves 
DIFE 7E moy A ¡Obtención byte fuente 
OAFF 12 STAXx DD ¿Almacenar en destino 
0200 13 10D ¿Actualización apuntador destino 
0201 23 INx A ¿Actualización apuntador fuente 
0202 0D DR Cc ¿Decrenento del contador 
0203 C2FEO1 ÚNZ MOVE ¿Obtención byte siguiente 
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Función 35: Obtención del tamaño de fichero 


Código de función: C=23H 
Parámetros de entrada: DE=Dirección del FCB 
Parámetros de salida: Campo de registro aleatorio fijado en el FCB 





Ejemplo 
0023 = BOGETFSIZ Eu 35 ¡Obtención temaño fichero Lón. aleatorio 
0005 = BDOS E0U 5 ¿Punto de entrada al BDOS 
FCB: ¡Bloque de control de fichero 
0000 00 FCBRDISK: DE o ¿Búsqueda de unidad de disco por defecto 
0001 4S4P4CASAEFCBSNAME + D5 “FILENAME” — ¿Nombre de fichero 
0009 543950 FCBSTYP: DB TYP" ¿Tipo de fichero 
000c 00 FOBSEXTENT: DB o ¿extensión 


000D 0000 FCBSRESV» DB 0,0 ¿Reservado para CP/M 
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000F 00 FCBSRECUSED: — DB o ¿Registros usados en esta extensión 

0010 0000000000FCB+ABUSED: De 0,0,0,0,0,0,0,0 ¡Bloques utilizados 

0018 0000000000 DB 0,0,0,0,0,0,0,0 

0020 00 FCBSSEDREC: De o ¡Reg! de Lectura/escritura secuencial 

0021 0000 FCBSRANREC: De o ¿Reg. de Lectura/escritura aleatoria 

0023 00 FCBSRANRECO: DB o ¿Byte de desbordamiento de registro 
5 aleatorio (MS) 

0024 0E23 mur C+BSGETFSIZ ¿Código de función 

0026 110000 (677 D.FCB ¿DE -> bloque de control de fichero 

0029 CDOS00 CALL BDOS 

0020 242100 LMLD FCBSRANREC ¿Obtención núm. de registro aleatorio 


¿HL = tamaño del fichero lógico 
es decir, número de registro del 
5 último registro 


Propósito Esta función devuelve el tamaño virtual del fichero especificado. Lo hace 


Notas 





Fun 


Ejemplo 


n 36: Fija 


fijando el número de registro aleatorio (bytes 33-35), en el FCB específico, 
al máximo número de registros de 128 bytes del fichero. El tamaño virtual 
del fichero se calcula desde la dirección del registro hasta el final de fichero. 
Los bytes 33 y 34 forman un valor de 16 bits, que contiene el número de 
registro cuyo desbordamiento se indica en el byte 35. Si el byte 35 es Ol, esto 
significa que el fichero tiene una cantidad máxima de registros de 65.536. 

Si la función no puede encontrar el fichero especificado en el FCB, 
vuelve con el campo de registro aleatorio puesto a cero. 

Puede usarse esta función cuando se quieran añadir datos al final de un 
fichero existente. Llamando primero a esta función, los bytes de registro 
aleatorio se pondrán al final del fichero. Las llamadas siguientes a escritura 
aleatoria escribirán registros en esta dirección preestablecida. 


No se debe confundir el tamaño virtual del fichero con el tamaño del 
fichero real. En un fichero aleatorio, si se escribe únicamente un registro 
CP/M en el número de registro 1.000 y entonces se llama a esta función, 
volverá con el campo de número de registro en el FCB puesto a 1.000 —aun 
cuando exista un solo registro en el fichero. 

Para ficheros secuenciales, esta función devuelve el número de registros 
del fichero. En este caso, los tamaños de los ficheros virtual y actual 
coinciden. 





”n del número de registro aleatorio 


Código de función: C=24H 
Parámetros de entrada: DE=Dirección del FCB 
Parámetros de salida: Campo de registro aleatorio fijado en el FCB 


0024 = BSSETRANREC EQU 36 ¿Fijación número de registro aleatorio 
BDOS Equ 5 ¿Punto de entrada al BD0S 
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FCB: ¿Bloque de control de fichero 
0000 00 FCBSDISK: De o ¿Búsqueda de unidad de disco por defecto 
0001 46494C454EFCESNAME: DB “FILENAME ¿Nombre de fichero 
0009 545950  FCBSTYP: De TWP" > ¿Tipo de fichero 
000c 00 FCBSEXTENT: DB o ¿Extensión 
000D 0000 FCBSRESV: DB 0,0 ¿Reservado para CP/M 
000F 00 FOBSRECUSED: — DB o ¿Registros usados en esta extensión 
0010 OO00000000FCBSABUSED: DB 0,0,0,0,0,0,0,0 ¡Bloques utilizados 
0018 0000090000, DB 0,0,0,0,0,0,0,0 
0020 00 FCBASEOREC: DB o ¡Reg. de Lectura/escritura secuencial 
0021 0000 FCBSRANREC: DW o ¿Reg. de lectura/escritura aleatoria 
0023 00 FCBSRANRECO: — DB o ¿Byte desbordamiento de registro 

7 aleatorio (MS) 

5=:. fichero abierto y Leído 

¿0 escrito secuencialmente... 
0024 0E24 HI C,BSSETRANREC ¿Código de función 
0026 110000 LXI D,FCB ¿DE => bloque de control de fichero 
0029 CDOS00 CALL BDOS 
002c 2A2100 LHLD FCBSRANREC ¡Obtención núm. de registro aleatorio 


¿HL = número de registro aleatorio 
7 corresponde al avance 

7 hacia abajo del 

7 fichero 


Propósito Esta función fija el número de registro aleatorio del FCB en el valor 


Notas 


correcto para el último registro leido o escrito secuencialmente en el fichero. 


Esta función suministra una forma conveniente para construir ficheros 
de índices, de forma que se pueda acceder aleatoriamente a un fichero 
secuencial. Abre el fichero secuencial y, cuando se lee cada registro, extrae 
el campo de claves apropiado de los registros de datos. Hace la petición de 
fijación de registro aleatorio al BDOS y crea un nuevo registro de datos 
justo con el campo de claves y el número de registro aleatorio. Escribe el 
nuevo registro de datos en el fichero de indices. 

Una vez que se ha hecho esto para cada registro del fichero, el fichero de 
índices significa un. método conveniente, dado un valor de la clave de 
búsqueda, para encontrar el registro CP/M en el que se encuentran los 
datos. 

También se puede usar esta función como medio de averiguar la 
posición en curso en un fichero secuencial —bien para relacionar un 
número de registro CP/M con la posición, o simplemente para marcar el 
sitio de forma que permita volver a situarse más tarde en el mismo lugar. 


Función 37: Puesta a cero del controlador de disco lógico 


Código de función: C=25H 
Parámetros de entrada: DE=Mapa de bits del controlador lógico 
Parámetros de salida: A=00H 
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Ejemplo 








0025 = BSRESETD Eu 37 uesta a O discos lógicos 
0005 = BDOS EU 5 unto de entrada al BD0S 
¿DE = mapa de bits de Los discos 
5 a poner a O 
¿Los bits son iguales a 1 si el dis 
¿ debe ser puesto a 0 
¿Bits 15 14 13 ...2.10 
¿Disco P 0 No CBA 
9000 110200 LXI  D.OO0O8O0000SO00OSO010B ¡puesta idd b: 
0003 0E25 MUI CBSRESETD. od ri a 
0005 CDOS500 CALL BDOS y 


Propósito Esta función pone a cero los controladores individuales de disco. Es una 


Notas 


versión más precisa de la función de puesta a cero del sistema de disco 
(código 13, ODH), en la que pueden fijarse discos lógicos específicos mejor 
que todos ellos. 

El mapa de bits de DE muestra qué discos han de Ponerse a cero. El bit 
menos significativo de E representa el disco A, y el bit más significativo de 
D el disco P. Los bits puestos a 1 indican que los discos se han de Ponera 
Cero. 

Obsérvese que esta función devuelve un valor cero en A para mantener 
la compatibilidad con el MP/M. 


Esta función deberá utilizarse sólo cuando los disquetes especificados 
necesiten cambiarse. El cambio de un disquete sin una petición al CP/M 
para que lo registre provocará que el BDOS suponga que se ha cometido un 
error y coloque el nuevo disco en modo de sólo lectura como medida de 
protección. 


Función 40: Escritura aleatoria con rellenado de ceros 


Ejemplo 


Código de función: C=28H 
Parámetros de entrada: DE=Dirección del FCB 
Parámetros de salida: A =Código de retorno 


0028 = BSWRITERANZ EQU 40 ¿Escritura aleatoria con rellenado 
7 de ceros 

0005 = BDOS Eu 5 ¿Punto de entrada al BDOS 

FCB: ¿Bloque de control de fichero 

0000 00 FCB$DISK: De o ¿Búsqueda de unidad de disco por defecto 

0001 46494C454EFCBSNAME: DB “FILENAME ¿Nombre de fichero 

0009 545950 — FCBSTYP: DB “TYP* ¿Tipo de fichero 

000c 00 FCBSEXTENT: DB o ¿Extensión 

000D 0000 FCBSRESV: DB 0,0 ¿Reservado para CP/M 

000F 00 FCBSRECUSED: DB o ¿Registros usados en esta extensión 

0010 0000000000FCBSABUSED: DB 0,0,0, ¿Bloques utilizados 

0018 0000000000 DB 0,0,0, 





0020 
0021 
0023 


0024 


0026 
0029 
0020 
002€ 
0031 


00 
0000 
00 


D204 


242400 
222100 
0628 

110000 
CDos00. 


FCBSSEQREC: 
FCBSRANREC: 
FCBSRANRECO: 


RANRECNO: 


LHLD 
SHLD 
mv 
1x1 
CALL 
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DB 
De 
DB 


200 


1) 1234 


RANRECNO. 
FCBSRANREC 

C, BSWRITERANZ 
D,FCB 

BDOS 


¡Reg. de Lectura/escritura secuencial 
¿Reg. de Lectura/escritura aleatoria 
¿Byte desbordamiento de registro 

5 aleatorio (MS) 


¡Ejemplo número de registro aleatorio 


¿El registro será escrito desde La 

¿ dirección fijada por La Llanada 

¿a SETOMA anterior 

¿obtención núnero registro aleatorio 

¿Activación bloque de control de fichero 

Código de función 

DE => bloque de control de fichero 

= 00 si operación terminada con éxito 

distinto de O sí no hay datos en 

ichero. Concretamente: 

03 -- CP/M mo puede cerrar 
extensión en curso 









05 =- directorio completo 
06 -- intento de escritura 
; después de final de disco 


Propósito Esta función es una extensión de la función de escritura aleatoria 
descrita previamente. Además de realizar la escritura aleatoria, llenará cada 
nuevo bloque con 00H. Digital Research añadió esta función para asistir a 
Microsoft en la producción de su compilador COBOL —hace más fácil la 
lógica de manejo del código de fichero—. Además es una forma económica 
de llenar completamente un fichero aleatorio con 00H. Sólo se necesita 
escribir un registro por bloque; el BDOS borrará el resto del bloque. 


Notas 


Consúltese la descripción de la función de escritura aleatoria (códi- 
go 34). 




















Componentes del BIOS 

Puntos de entrada del BIOS 

Funciones de arranque y carga 

Funciones de entrada/salida de caracteres 

Funciones del disco 

Llamada a las funciones del BIOS 
directamente 

Ejemplo de BIOS 


El sistema básico 


de entrada/salida 





Este capítulo examina más detenidamente el sistema básico de entrada/ 
salida (BIOS). El BIOS procura el software de conexión entre el procesador 
de órdenes de consola (CCP), el sistema operativo básico de disco (BDOS) y 
el hardware físico de la computadora. El CCP y el BDOS interaccionan con 
las partes del sistema de cálculo sólo como dispositivos lógicos. Por tanto, 
pueden permanecer invariables de un sistema a otro. El BIOS, sin embargo, 
se adapta al tipo particular de computadora y de controlador de disco. La 
única parte predecible del BIOS es la forma en que se encara con el CCP y el 
BDOS. Esto debe permanecer inalterable, sin tener en cuenta los dispositi- 
vos especiales que se hayan construido en el BIOS. 











Componentes del BIOS 





Un BIOS estándar consiste en subrutinas de bajo nivel que controlan 
cuatro tipos de dispositivos fisicos: 
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e Consola: el CP/M se comunica con el mundo exterior por medio de la 
consola. Normalmente será un terminal de vídeo o un terminal de 
copia dura. 


e “Lectora” y “perforadora”: Estos dispositivos se utilizan normalmen- 
te para comunicarse entre computadoras —los nombres “lectora” y 
“perforadora” son reliquias históricas de los primeros tiempos del 
CP/M. 


e Listado: Es una impresora de copia dura, bien de letras o de matriz de 
puntos. 


e Unidades de disco: Estas pueden ser cualesquiera de las estándar de 
la industria, desde los disquetes de una sola cara, simple densidad y 8 
pulgadas, a las de disco rígido con capacidad para varios cientos de 
megabytes. 





Puntos de entrada del BIOS 








Las primeras pocas instrucciones del BIOS son todas instrucciones de 
salto (IMP). Transfieren el control a las 17 subrutinas diferentes del BIOS. 
El CCP y el BDOS, cuando hacen una petición especifica al BIOS, lo 
realizan transfiriendo el control a la instrucción JMP adecuada en la tabla 
de saltos o vector de saltos del BIOS. El vector de saltos del BIOS empieza 
siempre al principio de una página de 256 bytes, de forma que la dirección 
de la primera instrucción de salto es siempre de la forma xx00H, donde 
“xx” es la dirección de la página. Las posiciones 0000H a 0002H tienen una 
instrucción de salto a la segunda entrada del vector de saltos del BIOS —de 
forma que se pueda encontrar siempre la dirección de página del vector de 
saltos al mirar en el lugar 0002H. 

La figura 6-1 muestra los contenidos del vector de saltos del BIOS junto 
con la dirección relativa de la página correspondiente a cada salto. Las 
etiquetas utilizadas en las instrucciones de salto se han adoptado por 
convenio. 

Las secciones siguientes describen las funciones de cada una de las 
subrutinas principales del BIOS. Consúltese también el manual de Digital 
Research Guía de modificación del CP/M 2.0 para la descripción de las 
rutinas del BIOS. 


Funciones de arranque y carga 








Existen dos funciones de arranque. El arranque en frío carga el sistema 
operativo completo cuando el sistema se conecta por primera vez o bien 
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XXO0H JP. BOOT ¡Arranque en frio (primera vez) 

xx03H JM? MBOOT ¿Arranque caliente 

xx06H JMP CONST ¿Estado de entrada de La consola 

xx09H JMP CONIN ¿Entrada de consola 

xxOcH JUMP CONOUT ¿Salida de consola 

Xx0FH UMP LIST, ¿Salida de impresora 

XXIZH UMP PUNCH ¿Salida perforadora 

xxISH  JMP READER ¿Entrada Lectora 

XxIBH o UMP. HOME ¿situación de cabezas de disco en pista O 
XXIBH UMP SELDSK ¿Selección disco Lógico 

XXIEH UMP. SETTRK — ¿Fijación número de pista 

XxZIH UMP SETSEC ¿Fijación número de sector 

xx24H o UMP. SETOMA ijación dirección de DMA 

Xx27H MP READ, ¿Lectura de sector (128 bytes) 

JOZAH O UMP WRITE ¿Escritura de sector (128 bytes) 

%x2DH JUMP ListsT ¿Estado dispositivo de Listado de salida 
ZIGOH MP SECTRAN ¿Traducción de sector 





Figura 6-1. Disposición del vector de saltos estándar del BIOS. 


cuando se pone a cero. El arranque caliente recarga el CCP cuando un 
programa salta a la posición 0000H. 


BOOT: Arranque “en frío” 


La instrucción de salto BOOT es la primera instrucción ejecutada en el 
CP/M. La secuencia de arranque debe transferir el control al punto de 
entrada BOOT para poner a punto el CP/M. En general, una PROM recibe 
el control tanto cuando se aplica la energía por primera vez como después 
de haber pulsado el botón RESET de la computadora. Esta lee en el cargador 
del CP/M, en el primer sector de la unidad de disco físico elegido para ser el 
disco lógico A. Este programa de carga del CP/M lee la imagen binaria del 
CCP, el BDOS y el BIOS en la memoria en unas direcciones previamente 
determinadas. Entonces transfiere el control al punto de entrada BOOT del 
vector de saltos del BIOS. 

Esta rutina BOOT debe inicializar todo el hardware de la computadora. 
Fija velocidad de comunicación para la consola física (si no se ha hecho ya 
durante la secuencia de arranque) y para las unidades de “lectura”, de 
“perforación” y de listado, así como la unidad de disco. También deberá 
fijar la página base de memoria, de forma que haya un salto de la situación 
0000H al punto de entrada de arranque caliente en el vector de saltos del 
BIOS (en xx03H) y un salto de la posición 0005H al punto de entrada del 
BDOS. 

La mayor parte de las rutinas BOOT se manifiestan componiendo un 
mensaje en la consola, que indica la versión actual del CP/M y el hardware 
de la computadora que este BIOS puede soportar. 

La rutina BOOT acaba transfiriendo el control al principio del CCP +6 
bytes (el CCP tiene su propio vector de saltos pequeño al principio). 
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Exactamente antes de que la rutina BOOT salte al CCP, coloca el registro C 
a 0 para indicar que el disco lógico A será la unidad de disco por defecto, 
Esto es lo que provoca la “A>” a la indicación inicial del CCP. 

El punto de entrada en curso del CCP se deriva de la dirección básica del 
BIOS. El CCP y el BDOS juntos requieren 1E00H bytes de programa, de 
forma que la primera instrucción del CCP se sitúa en la posición BIOS— 
1E00H. 


WBOOT: Arranque “caliente” 


A diferencia del punto de entrada de arranque en “frío”, que se ejecuta 
sólo una vez, el WBOOT o rutina de arranque caliente se ejecuta cada vez 
que termina un programa, saltando a la posición 0000H, o siempre que se 
mecanografía un CONTROL-C en la consola como primer carácter de una 
línea de entrada. 

La rutina WBOOT es responsable de la recarga del CCP en la memoria. 
Los programas utilizan a menudo toda la memoria hasta el punto de 
arranque del BDOS, reescribiendo sobre el CCP durante el proceso. La 
filosofía en que se basa es que mientras se está ejecutando un programa no 
se necesita el CCP, de forma que el programa puede utilizar la memoria 
ocupada previamente por éste. El CCP ocupa 800H (2.048) bytes de 
memoria —y esto es frecuentemente justo lo suficiente como para marcar la 
diferencia entre un programa que no puede funcionar y uno que si puede. 

Algunos programas que están contenidos en sí mismo y no requieren los 
servicios del BDOS superarán también el BDOS para obtener otros 1600H 
(5.632) bytes de memoria. Por consiguiente, para estar realmente a salvo, la 
rutina de WBOOT deberá leer tanto el CCP como en el BDOS. Para ello se 
necesita también fijar los dos JMP en la posición 0000H (al propio 
WBOOT) y en el lugar 0005H (al BDOS). La situación 0003H debería fijarse 
con el valor inicial del IOBYTE si éste está implementado en el BIOS. 

En esta última acción, la rutina WBOOT fija el registro C para indicar el 
disco lógico seleccionado (C=0 para A, 1 para B, etc.). Entonces transfiere 
el control a la primera instrucción del CCP con el fin de ponerlo de nuevo 
en marcha. De nuevo, la dirección en curso se calcula basada en el 
conocimiento de que el CCP empieza 1E00H bytes más abajo en la 
memoria que la dirección básica del BIOS. 





Funciones de entrada/salida de caracteres 





Las funciones de entrada/salida de caracteres se enfrentan a los dispositi- 
vos lógicos: la consola, la “lectora”, la “perforadora” y la impresora. Como 
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estos dispositivos lógicos pueden conectarse en la práctica por medio de 
software a uno o varios dispositivos físicos en entrada/salida de caracteres, 
muchos BIOS utilizan las características del IOBYTE del CP/M para 
asignar dispositivos lógicos a los fisicos. 

En este caso, cada una de las funciones del BIOS deberá controlar el 
campo de bits adecuado del IOBYTE (véanse figura 4-2 y tabla 4-1) para 
transferir el control al controlador del mecanismo físico correcto (programa 
que controla un mecanismo físico). 


CONST: Modo de entrada por consola 


CONST devuelve simplemente un indicador que muestra si existe un 
carácter de entrada desde el dispositivo de consola. Lo convencional es que 
A=00FFH si hay un carácter esperando para ser procesado, A=0 si no lo 
hay. Obsérvese que el signo cero no necesita colocarse para reflejar los 
contenidos de A en el registro; lo importante son los contenidos. 

El CCP llama a CONST siempre que éste está en medio de una 
operación que puede ser interrumpida pulsando un carácter del teclado. 

El BDOS llamará a CONST si un programa realiza una llamada a la 
función de lectura del estado de la consola (BSCONST, código 11, OBH). 
También se le llama por medio de la rutina BIOS de entrada de consola, 
CONIN (descrita a continuación). 


CONIN: Entrada de consola 


CONIN lee el próximo carácter de la consola 'en el registro A y pone a 
cero el bit más significativo (paridad). 

Normalmente, CONIN llamará la rutina CONST hasta que detecte 
A=0FFH. Sólo entonces introducirá el carácter de datos y enmascarará el 
bit de paridad. 

CONIN es llamada por el CCP y por el BDOS cuando un programa 
ejecuta una función de lectura de byte de consola (BÉCONIN, código 1). 


CONOUT: Salida de consola 


CONOQUT envía el carácter (en ASCII) del registro C a la consola. El bit 
más significativo (paridad) de este carácter será siempre 0. 

CONQUT deberá controlar, en primer lugar, que el dispositivo de 
consola esté dispuesto para recibir más datos, retrasándose si es necesario 
hasta haberlo comprobado y enviando sólo entonces el carácter al disposi- 
tivo. 
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CONOUT es llamado por el CCP y el BDOS cuando un programa 
ejecuta una función de escritura de byte en la consola (BSCONOUT, códi- 
go 2). 


LIST: Salida de listado 


LIST es similar a CONOUT, excepto que envía el carácter del registro C 
al dispositivo de listado. También controla, en primer lugar, que esté 
preparado para recibir el carácter. 

LIST es llamado por el CCP en respuesta a CONTROL-P para la 
repetición por impresora de la salida de consola y por el BDOS cuando un 
programa realiza una llamada de escritura de un byte por impresora o una 
llamada a la visualización de cadenas (B$LISTOUT y BSPRINTS, códigos 
5y9). 


PUNCH: Salida para “perforación” 


PUNCH envía el carácter del registro C al dispositivo de “perforación”. 
Como se ha dicho anteriormente, la “perforadora” no suele ser una 
perforadora real para cinta de papel. En la mayoría de los BIOS, el punto 
de entrada PUNCH o bien vuelve inmediatamente, con lo que es efectiva- 
mente una rutina anulada, o bieñ envía el carácter a un mecanismo de 
comunicaciones, tal como un “modem”, de la computadora. 

PUNCH debe controlar que el mecanismo de “perforación” se encuen- 
tre realmente preparado para aceptar otro carácter de salida y si no lo está 
habrá de esperar. 

La documentación de Digital Research establece que el carácter que se 
ha de enviar tendrá siempre su bit más significativo puesto a cero. Esto no 
es cierto. El BDOS transfiere simplemente el control al punto de entrada 
PUNCH del BIOS; la fijación del bit más significativo será determinada por 
el programa que realiza la petición de función del BDOS (B$PUNOUT, 
código 4). Esto es importante porque el requerimiento de un cero impediría 
la posibilidad de enviar datos puramente binarios por medio de la función 
PUNCH del BIOS. 


READER: Entrada de “lectora” 


Como en el punto de entrada PUNCH, el punto de entrada READER 
rara vez conecta con una lectora real de tira de papel. 

La función READER deberá devolver el próximo carácter desde el 
dispositivo de lectura al registro A, esperando, si es necesario, hasta que 
haya un carácter. 
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La documentación de Digital Research vuelve a decir que el bit más 
significativo del registro A deberá ser 0, pero este no es el caso si se desea 
recibir información puramente binaria a través de esta función. 

READER es llamada siempre que un programa realiza una petición de 
función de lectura de byte en la “lectora” (BSREADIN, código 3). 








Funciones del disco 








Todas las funciones del disco que siguen se habían diseñado original- 
mente para operar en sectores de 128 bytes utilizados en disquetes de una 
sola cara, simple densidad y 8 pulgadas, que fueron industrialmente 
estándar en su momento. Ahora que CP/M funciona con muchos tipos 
distintos de discos, algunas de las funciones BIOS del disco parecen 
extrañas porque la mayoría de los controladores de disco nuevos utilizan 
tamaños de sector distintos de 128 bytes. 

Para manejar tamaños de sector mayores, el BIOS tiene algunos 
programas adicionales que hacen que el BDOS responda como si estuviera 
manejando aún sectores de 128 bytes. Este programa se denomina progra- 
ma de bloqueo/desbloqueo. Como su nombre indica, acumula varios 
“sectores” de 128 bytes y escribe solamente en el disco cuando se ha 
completado un sector físico. Cuando lee, lo hace en un sector físico y 
entonces lo desbloquea, devolviendo algunos “sectores” de 128 bytes al 
BDOS. 

Para hacer todo esto, el programa de bloqueo/desbloqueo utiliza un área 
especial de memoria intermedia del mismo tamaño que los sectores físicos 
del disco. Esto se conoce como memoria-intermedia-grande o HSTBUF. 
Los sectores físicos se leen en esta memoria y se escriben desde ella en el 
disco. 

Para optimizar esta rutina de bloqueo/desbloqueo, el BIOS lo ha 
codificado para reducir el número de veces que se realiza una lectura o 
escritura de disco real. Un efecto secundario es que en cualquier momento 
dado se pueden almacenar algunos “sectores” de 128 bytes en el HSTBUF, 
esperando para ser escritos en el disco cuando el HSTBUF se llena. Esto 
complica a veces la lógica de las funciones BIOS del disco. No se puede 
seleccionar simplemente una nueva unidad de disco, por ejemplo, cuando el 
HSTBUF contiene datos destinados a otro. Esta complicación se verá en el 
BIOS únicamente en forma de aumento de operaciones lógicas; las 
funciones BIOS del disco raramente disparan operaciones físicas inmedia- 
tas. Es más fácil entender estas funciones BIOS si se considera que realizan 
peticiones —y que estas peticiones se satisfacen sólo cuando tiene sentido el 
hacerlo, teniendo en cuenta la lógica de bloqueo/desbloqueo. 
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HOME: Envío de disco al principio 


HOME coloca la pista y el sector a 0. 


SELDSK: Selección del disco 


SELDSK no realiza lo que su nombre implica. No puede (ni debe) 
seleccionar fisicamente un disco lógico. En lugar de ello, envía un indicador 
al par de registros HL de la cabecera de parámetros del disco para el disco 
lógico especificado en el registro C. C=0 para la unidad A, | para B, etc. 
SELDSK almacena también este código para que el disco requerido sea 
utilizado más tarde en las funciones READ y WRITE. 

Si el código de disco lógico del registro C se refiere a un disco no 
existente o a uno para el cual no existe cabecera de parámetros de disco, 
entonces SELDSK deberá volver con HL puesto a 0000H. Entonces el 
BDOS enviará un mensaje en esta forma: 


"BDOS Err on X: Select" 


Obsérvese que SELDSK no sólo no selecciona el disco, sino que 
tampoco indica si el disco solicitado está fisicamente presente o no —sino 
simplemente si existen tablas de discos presentes para el disco o no. 

SELDSK es llamado por el BDOS bien durante las operaciones de 
fichero de disco o por un programa que lanza una petición de selección de 
disco (BSSELDSK, código 14). 


SETTRK: Fijación de pista 


SETTRK guarda la pista de disco que está en el par de registros BC 
cuando SETTRK obtiene el control. Obsérvese que éste es un número de 
pista absoluto; es decir, el número de pistas reservadas antes del directorio 
de ficheros se ha añadido al número de pistas correspondientes al principio 
del disco lógico. 

El número de la pista requerida se utilizará en la próxima función 
READ o WRITE del BIOS (descritas posteriormente en este capitulo). 

SETTRK es llamado por el BDOS cuando éste necesita leer o escribir un 
sector de 128 bytes. Los números de pista legítimos van de 0 a OFFFFH 
(65.535). 


SETSEC: Fijación de sector 


SETSEC es similar al SETTRK en que almacena el número de sector 
requerido para uso posterior en las funciones de lectura o escritura (READ 
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o WRITE) del BIOS. El número de sector requerido es enviado por 
SETSEC al registro A: los valores legítimos van de 0 a OFFH (255). 

El número de sector es un número de sector lógico. No toma en cuenta 
ningún entrelazamiento de sectores que pueda utilizarse para mejorar el 
rendimiento del disco. 

SETSEC es llamado por el BDOS cuando necesita leer o escribir un 
sector de 128 bytes. 


SETDMA: Fijación de dirección DMA 


SETDMA guarda la dirección en el par de registros BC en la dirección 
requerida de DMA. La próxima función READ o WRITE del BIOS utiliza- 
rá la dirección DMA como apuntador a la memoria intermedia de un sector 
de 128 bytes en la que se leen o desde la cual se escribirán los datos. 

La dirección por defecto de DMA es 0080H. SETDMA es llamada por el 
BDOS cuando necesita leer o escribir un sector de 128 bytes. 


READ: Lectura de un sector 


READ lee en un sector de 128 bytes con tal de que se hayan hecho 
llamadas previas del BIOS a 


SELDSK — “selección” del disco. 
SETDMA— fijación de la dirección del DMA. 
SETTRK — fijación del número de pista. 
SETSEC — fijación del número de sector. 


Debido al programa de bioqueo/desbloqueo del BIOS, existen frecuentes 
ocasiones en las que el sector requerido esté ya en la memoria-intermedia- 
grande (HSTBUF), de forma que una lectura física del disco no es 
necesaria, Todo lo que se requiere entonces es que el BIOS transporte los 
128 bytes adecuados desde el HSTBUF a la memoria intermedia señalada 
por la dirección de DMA. 

Sólo durante la función READ se comunicará normalmente el BIOS con 
el controlador de disco físico, seleccionándolo e intentando leer la pista y el 
sector solicitados. Durante este proceso, la función READ deberá manejar 
también los errores de hardware que se presenten, intentando de nuevo una 
operación si ocurre un error “suave” o recuperable. 

La función READ deberá volver con el registro A puesto a 00H si la 
operación de lectura se ha completado satisfactoriamente. Si la función 
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WRITE: Escritura de sector 


READ vuelve con el registro A puesto a 01H, el BDOS compondrá wn 
mensaje de error en la forma: 


BDOS Err on X: Bad Sector 


En estas circunstancias existen sólo dos soluciones: se puede introducir 
un CARRIAGE RETURN, ignorar el hecho de que existia un error e intentar 
utilizar los datos de la memoria intermedia de DMA sensatamente. O se 
puede mecanografiar un CONTROL-C para abortar la operación, realizar un 
arranque y devolver el control al CCP. 

Como puede verse, el manejo de errores del CP/M no ayuda demasiado, 
por lo que la mayoria de los autores de BIOS añaden procedimientos más 
sofisticados para anular errores precisamente en el controlador de disco. 
Esto puede incluir interacciones con la consola de forma que se pueda 
realizar un esfuerzo más determinado para corregir errores o, al menos, 
proporcionar mayor información acerca de dónde está el error. Este 
procesamiento de los errores se trata en el capítulo 9. 

Si se trabaja con un sistema de disco duro, el controlador de disco debe 
tratar también el manejo de sectores estropeados. No se puede simplemente 
reemplazar una unidad de disco rígido si uno o dos de los sectores se hacen 
ilegibles. Este manejo de los sectores estropeados requiere normalmente que 
se ponga antes de usarlo un directorio de sectores “disponibles” en el disco 
rígido para almacenar datos. Entonces, cuando se encuentra que un sector 
está dañado, uno de los sectores “disponibles” se pone en lugar de éste. 
Esto se trata también en el capítulo 9. 
















WRITE es similar a READ, pero con la diferencia obvia de que los 
datos se transfieren desde la memoria intermedia de DMA al sector 
específico de 128 bytes. Al igual que READ, esta función requiere que las 
llamadas a función que siguen hayan sido ya realizadas: 


SELDSK — “selección” del disco. 

SETDMA— fijación de la dirección de DMA. 

SETTRK — fijación del número de pista. 

SETSEC — fijación del número de sector. 

Nuevamente, es únicamente la rutina WRITE la que el controlador 
pondrá en marcha para hablar directamente con el hardware fisico, 
seleccionando la unidad de disco, la pista y el sector y transfiriendo los 


datos al disco. 
Con el programa de bloqueo/desbloqueo, el BDOS optimiza el número 
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de escrituras de disco que se necesitan indicando en el registro C el tipo de 
escritura de disco que se ha de realizar: 


O=escritura de sector normal. 
1=escritura en el sector de directorio de ficheros. 


2=escritura en el sector de bloques no usados previamente. 


El tipo 0 se realiza siempre que el BDOS escribe en un sector de datos de 
un bloque ya utilizado. En estas circunstancias, el controlador de disco 
deberá leer previamente el sector-grande adecuado porque puede haberse 
almacenado previamente información en él. 

El tipo 1 sucede siempre que el BDOS escribe en un sector del directorio 
de ficheros —en este caso, el BIOS no debe diferir la escritura del sector al 
disco, porque la información es demasiado valiosa para conservarla en 
memoria hasta que el HSTBUF esté lleno—. Cuando más larga sea la 
información que reside en el HSTBUF, mayor será la oportunidad de que 
exista un fallo de energía o caída de tensión haciendo inaccesibles los datos 
ya escritos fisicamente en el fichero en el disco porque el directorio no ha 
sido actualizado. 

El tipo 2 ocurre siempre que el BDOS necesita escribir en el primer 
sector de un bloque no usado previamente. No usado, en este contexto, 
incluye un bloque que se ha hecho disponible como consecuencia del 
borrado de un fichero. En este caso no hay necesidad de que el controlador 
de disco haga la prelectura de un sector de tamaño grande en el HSTBUF, 
ya que no existen datos de valor en el sector físico. 

Igual que con la rutina READ, la función WRITE vuelve con A puesto a 
00H si la operación se ha completado satisfactoriamente. Si la función 
WRITE vuelve con A puesto a 01H, entonces el BDOS compondrá el mismo 
mensaje que para READ: 


BDOS Err on X: Bad Sector 


Ahora puede verse por qué la mayor parte de los autores de BIOS 
añaden rutinas más extensas de recuperación de errores y de interacción con 
el usuario a sus controladores de disco. 

Para sistemas de discos rígidos, algunos controladores de disco se 
escriben de tal forma que “salvan” automáticamente un sector que falla, 
escribiendo los datos en uno de los sectores disponibles del disco. 





LISTST: Modo de listado 


Como puede deducirse de su posición en la lista de las funciones del 
BIOS, la función LISTST es un añadido. Se agregó cuando el CP/M se varió 
de la versión 1.4 a la versión 2.0. 


SECTRAN: 
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Esta función devuelve el modo en curso del dispositivo de lista 
utilizando si es necesario el IOBYTE para seleccionar el dispositivo físico 
correcto. Pone el registro A a OFFH si el dispositivo de listado pi 
aceptar otro carácter para salida o a 00H si no está preparado. 

La documentación de Digital Research establece que esta función e 
utiliza por el programa de utilidad DESPOOL (que permite imprimir 
fichero “simultáneamente” con otras operaciones) para mejorar la respues- 
ta de la consola durante su operación, y que es siempre aceptable para la 
rutina devolver 00H si se escoge no implementarla completamente. 

Desgraciadamente, esta aseveración es falsa. Muchos otros programas. 
utilizan la función LISTST para “comprobar” el dispositivo de listado a fin 
de asegurar que esté dispuesto, y si no está dispuesto después de un tiempo 
determinado previamente, se envía un mensaje a la consola indicando que 
la impresora no está preparada. Si se hace una llamada a las funciones de 
salida de listado del BDOS, escritura impresión del byte en impresora 
(códigos 5 y 9) y la impresora no está preparada, entonces el CP/M esperará 
eternamente —y el programa habrá perdido el control, de forma que no 
puede detectar que ha ocurrido un problema—. Si el LISTST vuelve 
siempre a 00H, entonces la impresora aparecerá siempre como no prepara- 
da. No sólo resulta inservible la función del LISTST, sino que también 
puede causar un aluvión de mensajes de error falsos “Impresora no 
preparada” que aparecerán en la consola. 

















Traducción de sector 


SECTRAN, dado un número de sector lógico, coloca el número de 
sector fisico correcto en la tabla de traducción de sectores para el 
controlador de disco lógico previamente seleccionado (por medio del 
SELDSK). 

Obsérvese que tanto los números de sector lógico como los de sector 
fisico son sectores de 128 bytes, de forma que si se está trabajando con un 
sistema de disco rígido, no es demasiado eficaz imponer un entrelazado de 
sectores a nivel del sector de 128 bytes. Es mejor imponer el entrelazado de 
sectores justamente dentro del controlador de disco rígido, si se realiza; en 
general, los discos rígidos giran tan rápidamente que el CP/M sencillamente 
no puede beneficiarse del entrelazado de sectores. 

El BDOS maneja el número de sector lógico en el par de registros BC, 
con la dirección de la tabla de traducción del sector en el par de regis- 
tros DE. SECTRAN deberá devolver el número de sector físico en HL. 

Si SECTRAN es una rutina nula, deberá transferir los contenidos de BC 
a HL y volver. 
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Llamada a las funciones del BIOS directamente 











Como regla general, no se deben hacer llamadas directas al BIOS. Al 
hacerlas, los programas se vuelven menos transportables de un sistema 
CP/M a otro. Impide la posibilidad de que estos programas funcionen con 
un MP/M que tenga una forma diferente de BIOS, denominada sistema de 
entrada/salida extendido, o XIOS. 

Existen uno o dos problemas, sin embargo, que sólo pueden resolverse 
haciendo llamadas directas al BIOS. Esto ocurre en los programas de 
utilidad que, por ejemplo, necesitan realizar un acceso directo al directorio 
de ficheros del CP/M, o necesitan acceder a algunas instrucciones "particu- 
lares” de salto que ya han sido añadidas al vector de saltos estándar del 
BIOS. 

Si se necesita realmente acceso directo al BIOS, la figura 6-2 muestra un 
ejemplo de subrutina que lo hace. Requiere que el registro Á contenga un 
código de función del BIOS que indique el desplazamiento, en el vector de 
saltos, de la instrucción de salto a la cual se ha de pasar el control. 











E ¡Añadir aquí programas "privados" BIOS 

B1os 

Esta rutina transfiere control a La entrada apropiada del vector 
de saltos del BIOS, basado en un código funérico que se maneja 
para ello en el registro L. 


Parámetros de entrada 


L = número de código (en realidad es la dirección 
relativa-a-La-página de La instrucción JMP correcta 

en el vector de saltos. 

Todos Los demás registros son protegidos y llevados sin manipular 
fuera de La rutina del BIOS. 





Parámetros de salida 





1 








Figura 6-2. Equivalencias del BIOS. 
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108: 
0000 FS 
0001 340200 


0004 67 
0005 Fl 
0006 E9 


ES 


Esta rutina no LLama a la rutina BIOS, por Lo que cuando 
ésta RETorna Lo hace directamente sobre aquella 
que La ha Llamado. 


Secuencia de Llamada 


MI L,CodesNumber 
CALL BIOS 

PUSH: - ES ¡Almacenar registro-de-usuario A 

LDA0002H ¿obtención página del vector de saltos del BIOS 

7, a partir de JMP-arranque-caliente 

MOV MA ¿ML -> entrada al vector de saltos del BIOS 

POP PSW ¿Recuperación del registro-de-usuario A 

POHL ¿Transterencia del control a La rutina BIOS 





Figura 6-2. (Continuación.) 


Números de Línea 


0072-0116 
0120-0270 
0275-0286 
0289-0310 
0333-0364 
0369-0393 
0397-0410 
0414-0451 
0456-0471 
0476-0492 
0496-0511 
0516-0536 
0540-0584 
0589-0744 
0769-0824 
0831-0878 
0881-0907 
0910-0955 
0958-0964 
0967-0973 
0978-0984 
0987-1025 
1028-1037 
1041-1056 
1059-1154 
1157-1183 
1185-1204 
1206-1378 
1381-1432 
1435-1478 
1481-1590 
1595-1681 
1685-1764 








Componente funcional o rutina 


Vector de saltos del BIOS 

Programa de inicialización 

Visualización de mensaje 

Cargar CP/M 

CONST - Estado de La consola 

CONIN - Entrada consola 

CONOUT - Salida consola 

LISTST - Estado de impresión 

LIST - Salida de impresión 

PUNCH - Salida de perforación 

READER - Entrada de Lectora 

JOBYTE - Selección de dispositivo 

Tablas de control de dispositivo 

Controladores de bajo nivel para consola, impresora, etc. 
Tablas cabecera de parámetros de disco 

Bloques de parámetros de disco 

Otras áreas de datos de disco 

SELDSK - Selección de disco 

SETTRK - Fijación de pista 

SETSEC — Fijación de sector 

SETDMA - Fijación dirección de DMA 

Tablas de desplazamiento de sectores 

SECTRAN - Traducción de sectores lógicos a físicos 
HOME - Vuelta a La pista O 

Areas de datos del algoritmo de desbloqueo 

READ - Lectura de sector de 128 bytes 

WRITE - Escritura de sector de 128 bytes 
Algoritmo de desbloqueo 

Transferencia a la memoria intermedia 

Subrutinas de desbloqueo 

Lectura/escritura en disco flexible fisico de 8'! 
Lectura/escritura en disco flexible físico de 5 1/41 
BOOT - Arranque caliente 














Figura 6-3. Indice funcional de la figura 6-4. 
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Ejemplo de BIOS 








El resto de este capítulo se dedica a un ejemplo de listado del BIOS. Este 
BIOS, trabajando prácticamente, muestra la escritura general y la interfase 


con las subrutinas del BIOS. 


A diferencia de la mayoría de los BIOS, éste se ha escrito especificamen- 
te para ser entendido con facilidad. Los nombres variables son desacostum- 
bradamente largos y descriptivos y cada bloque de programa lleva un 


comentario para situarlo en el contexto. 


Cada línea de código fuente ha sido numerada secuencialmente (una 
opción usada poco frecuentemente que permite el ensamblador ASM de 
Digital Research). La figura 6-3 contiene un índice funcional del BIOS 
como un conjunto, de forma que se puedan encontrar funciones particula- 


res en el listado de la figura 6-4 mediante el número de línea. 





0001 <—= Minero de Línea 1 — Figura 6-ú. 
0002 : 


0082 


3730 
3531 
3238 








. . 
y. Listado del B10S " 








VERSION EQU “00% ¡Equivalencias utiliza 
MONTH EQU “07% de señal de "funcionando 
DAY EQU “157 

YEAR EQU 1827 


NV 
jm Este BIOS es para un sístena de cálculo con la siguiente 
configuración hardware: 


- CPU 8080. 
GAK bytes de RAM. 

- Controlador de teclado/CRT que transfiere datos como si fuera un 
puerto serie [pero sin necesitar un generador de impulsos 
para control de velocidad de transmisión (baud rate generator) o 
programación de La USARTI. 

- Un puerto serie, usado por La impresora o por Los dispositivos 
de Listado, Lectura o cinta perforada. Este chip es un 
INTEL 8251Á con un generador de control-de=velocidad 8253, 

- Dos unidades de discos flexibles de 5 1/41*, doble cara, doble 
densidad. Estos dispositivos utilizan sectores de 512 bytes 
que son Utilizados como discos lógicos A: y B:. 

- Dos unidades de disco estándar de 8'* (sectores de 128 bytes) 
que se usarán cono discos lógicos C: y Diz 












se utilizan dos controladores de disco inteligentes, 
uno para cada tipo de disquete. Estos controladores acceden 
directamente a La memoria para Leer Los detalles 

de Las operaciones que deben realizar y para Leer y escribir 
" datos desde o en los disquetes. 














y Las equivalencias para definir el tamaño de menoría, La dirección base 
» y La Longitud de Los componentes del sistema son: 


el mensaje 




















Figura 6-4, Listado del BIOS simple. 
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Figura 6-4. 


Caa9e 


casera 
casera 


coesFa 


CaFeFS 
carsFC 
casara 


cacora 


Memory8Size EU ss +Núnero de Kbytes de RAM 


La Longitud del BIOS puede determinarse por inspección. 
Cambiando el primer carácter de La Línea ORG BIOSSEntry, más abajo, 
por un punto y coma se pondrá ésta como línea de comentario. (Esto 
hará que el ensamblador comience el BIOS en la posición 0.) Ensamblar 
el BIOS y marcar en La posición próxima a 1004 La dirección que se 
visualiza en La consola al final del ensamblaje. 

, 

BIOSSLength EQU 0900m 

ñ 

CCPeLength EQU 0800H Constante 

BDOS Length E0U OE0M  sConstante 


Overall8Length ((CCPALENGth + BDOSSLength + BIOSSLength) / 1024) +1 


CcPsEntry EQU ry8Size - Overall8Length) * 1024 
BOOSHENtry EQU CCPREntry + CCPaLength + 6 
BIOSHENtry EQU CCPSEntry + CCPsLength + BDOSSLength 
, 


ORO BIOSSEMtry ¡Código de ensamblaje en La dirección del BIOS 


Vector de saltos del BIOS. 

El control se transferirá desde el CCP o el BDOS al punto 

de entrada adecuado, ambos calculan La dirección relativa del vector 
de saltos del BIOS para localizarlo. 

Los pragranas transitorios pueden hacer también Llamadas directas 
al 8105 transfiriendo control a La posición xx00H, donde xx es el 
valor situado en La posición 0002H. 


UMP BOOT ¿Arranque en frio -- entrado desde el cargador de CP/M 
HarmsBoot8Entry1 — / Etiquetado de forma que el programa de inicialización pueda situar 
La dirección de entrada de arranque caliente en La posición 
0001H y 0002H de La página base 
um MBOOT ¿Arranque caliente -- entrado saltando a La posición 00004 
Recarga el CCP que puede haber sido reescrito 
destructivamente por el programa anterior en el área 
de programas transitorios 
:stado de consola —— devuelve ASOFFH si existe un carácter esperando 
en La consola 
¿Entrada de consola -- devuelve en A el siguiente carácter 
del teclado de la consola 
Jalida de consola -- Lanza al dispositivo 
5 de consola el carácter que está en € 
¿salida de impresora —- Lanza al dispositivo de impresión el carácter 
que está en € 
ida de perforadora -- Lanza al dispositivo Lógico de perforación 
el carácter que está en € 
jEntrada de Lectora -= sitúa en A el siguiente carácter de entrada 
home ¿del dispositivo de Lectura 
SElDeK ¿sitúa en la písta O al disco seleccionado en curso 
¡Selecciona La unidad de disco especificada en C y devuelve La 
sermrk ¿dirección de Los parámetros cabecera del disco 
ija, a partir del par de registro BC, la pista del disco para la 
sersec 5, próxima operación de Lectura o escritura 
152, a partir del registro A, el sector del disco para La próxina 
SETOMA Operación de lectura o escrítura 
¿Fija, a partir del par de registro DE, La dirección de menoría de 
¿ acteso directo para La próxima op. de Lectura o escritura 
ReaD ¿Lee sobre la dirección de DMA La pista y sector del disco 
7, seleccionado especificado previamente 
HrrTe ¿Escribe en el disco seleccionado La pista y sector especificados en 
5 Cel disco seleccionado desde La dirección de DMA 
ListsT ¿Devuelve A = DFFM si el dispositivo de impresión puede aceptar 
otro carácter de salida 
iraduce un sector Lógico en uno físico 








31414 111511939955 





SECTRAN 


El código de inicialización de arranque en frio es necesario una sola vez. 








(Continuación.) 





orar 
0122 
0129 
orza 
0125 
0126 
0127 
0128 
0129 
0130 
LS 
0132 
0133 
0134 
0135 
0136 
0137 
0138 
0129 
0140 
0141 
0142 
0143 
0144 
olas 
0146 
0147 
0148 
0147 
0150. 
0151 
0152 
0153 
0154 
0155 
0156 
0197 
0158 
0159 
0160 
oLeL 
0162 
0163 
0164 
D16s 
o16S 
0167 
0168 
D169 
0170 
0171 
0172 
0173 
0174 
0175 
017% 
0177 
0178 
0179 
0180 
0191 
0182 
ole 
0194 
018 
0186 
0187 
0168 
0189 
0190 
0191 
0192 
0193 
0194 
0195. 
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0200 


Fea3 


Fasa 
Fesa 


Fe3a 
Fs24 
Esas 
FS36 
637 
Fese 
Fe39 


F63a 


Fesa 
Fé3c 
Fé3D 


FSJE 
FS3F 
Féso 


Fes2 


0000. 


ED 
06 


2 
sE 


25 


or 
ps 


02, 
2800 


00 


PhysicalsSectorsSize EQU 512 ¡Este es el tamaño real de sector 


Diskebutfer: Ds PhysicaláSectorsSize 


AfLersDisksBuffer EQU hs = Valor en curso del contador de posiciones 


InitializesStream Este flujo de datos se utiliza 


ge 








Puede ser reescrito destructivamente una vez que ha sido ejecutado. 
A pesar de ello, está "escondido" en La memoria intermedia principal del disco. 
Cuando se transfiere el control al punto de entrada de autocarga (BOOT), 

este programa se ejecuta, y sólo se escribirá sobre él destructivamente 

datos del disco una vez que el proceso de inicialización se ha completado. 





Para guardar programas en La memoria intermedia, ésta se declara primero normalmente. 
En este momento se anota el valor del contador de posiciones que sigue 

a la memoria intermedia. Entonces, utilizando una instrucción ORG (origen), 

el contador de posiciones es "vuelto atrás" al comienzo de La menoria y el programa 
de inicialización escrito normalmente. 

AL final de este programa se utiliza otra instrucción ORG 

para fijar el contador de posiciones donde estaba antes 

de que La memoria se declarase. 





¿para disquetes de 5 1/4 
¿Los disquetes de 8" utilizan sectores de 128 bytes 
¿Se declara La menoría de disco físico 

¿para disquetes de 5 1/4% 


'Suardar contador de posiciones 


ORG DisksBuffer ¡Situar atrás el contador de posicione 


ipara inicializar La subrutina. Tiene 
rel siguiente formato: 


De Nonero de puerto a inicializar 
De Número de bytes a Lanzar a salida 
De xxx p10,xx datos a Lanzar a salida 
De Núnero de puerto de terminal 00H 


¡Nota ; En esta máquina el puerto de consola no precisa 
, ser inicializado. Lo hace casi totalmente 

' el código cargador en PROM. 

- ¿Inicialización de La USART 8251A utilizada por Los 
7 dispositivos de comunicación y de Listado 








CommunicationsStatussPort ¿Número de puerto 
$ ¿Número de bytes 
o ¿Preparación del chip para ser programado 
o enviando datos ficticios 
o 
DB 0100800108 ¿Puesta a cero y armado del terminal de datos 
De OIs10S11$10B — ¿1 bit de parada, paridad-no, B bits por carácter y factor 


7 de división de 16 cono control-de-velocidad (baud rate) 
Levar petición para mandar y dispuesto 
% para transmitir y recibir 


De 0010801018 





¿Inicializar el temporizador programable 8352 
¿ usado para generar el control de 
7 velocidad de La USART 82514 
Communicat ionsBaudhode ¿Núnero de puerto 
1 ÍNimero de bytes 
1OS11S01150B_— ¡Selección contador 2, cargar primer byte de LS 
Contador binario nódulo 3 (para control-de-velocidad) 











e CommunicationsBaudsRate ¿Número de puerto 

De 2 ¿Núnero de bytes 

Du EN 51200 baudios (basado en La división por 16 
5 seleccionada en La USART 82514) 

pe o ¿Núnero de puerto de O terminaciones 

Equivalencia para mensajes de "funcionando". 

E om ¿Retorno de carro 





Figura 6-4. (Continuación.) 
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¿Salto de Linea 


¡Mensaje de "funcionando" principal 
“CP 2.2." 
VERSION ¿Número de versión en curso 
MONTH ¡Fecha del día 
ps 
Day 
eya 
YEAR 
ODOADA CRL LE 
53696D706C “Simple BIOS”,CR,LF,LF 
4469736820 “Disk configuration 1“,CR,LF,LF. 
2020202020 2 Ar 0.35 Mbyte 3" Floppy”,CR,LF 
2020202020 Bi 0:35 Mbyte 5" Floppy", CRLE,LE 
2020202020 €: 0:24 Moyte 9" Floppy", CRILF 
2020202020. Di 0.24 Mbyte 8" Floppy", CR,LF 
1 
00 
ñ 
- DefaulteDisk EQU 0004 ¿Disco por defecto en página base 
BOOTY y Entrada directa desde el vector de saltos del BIOS. 
y El control será transferido directamente aquí 
Y por el cargador de CP/M 
El estado de inicialización del sistema de cálculo 
» estará determinado por el cargador en PROM 
Y y por el cargador de CP/M activado 
, 


¡Sistena de inicialización 
¿Esta rutina utiliza la InitializeSStream 
5 declarada anteriormente 

Dr ¡Desactivación de interrupciones para prevenir cualquier 
; tipo de efectos durante la inicialización 

LXI Hi InitializesStream  1HL => flujo de datos 


1 
InitializesLooo: 
moy ASA 
RA A es 00H, inteiaLización completada 
y InstializesComplete 
STA InitializesPort ¡Activación de La instrucción OUT 
CC ¿HL -> cuenta del número de bytes a Lanzar a salida 
moy Cn ¿Obtención cuenta de bytes 
, 
InitializesnenteBytes ¿HL -> siguiente byte de datos 
mo ¿Obtención siguiente byte de datos 
moy A ¿Salida a puerto correcto 
DB obr 
InátializesPorte 
DB o ¿<- Fijar anterior 
CS Descontar. 
JNZ— InátializestextsByte ¿Vuelta atrás si existen nás bytes 
mxo o.4 HL > número de puerto siguiente 
IMP InitializesLooo ¿Vuelta atrás para inicialización puerto siguiente 


InitializesComplete: 
; 


MVT Ar 0OS00S00801B 'ijación del 1OBYTE para indicar que el terminal 
STA 5 actúa como consola 


ext ¿Visualización en La consola de mensaje de 
Ens 5 "funcionando" 


xRA ¿Fijar a Az unidad de disco por defecto 

STA DefaultsDisk Ñ a 

El ¿Activar interrupciones 

UMP O Enterscóm Completar La inicialización y entrar 
en CP/M yendo al procesador de comandos 

5 de consola 





Final del programa de inicialización de arranque en frio 
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0310 
03m 
0312 
0313 
0314 
0313 
0316 
0317 
0318 
0319 


0321 


0323 
0324 


0326 
0327 


0329 
0330 
0331 


0333 
0334 
0335 
0336 
0337 
0338 


0340 
0341 
0342 
0343 


0343 
0346 
0347 








F633 7E 
F63a 87 
Fe3s ce 
F837 ES 
Fe3e CDesFe 
Fe3B El 
Feac 29 
Fe3D c339Fe 


FBSF C3O0EO 


0003 = 


FOs2 CDSAFO 
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Puesta a cero del contador de posiciones 





¿Visualizar el mensaje especificado en la consola 
¿En entrada, HL apunta al flujo de bytes a Lanzar a La salida 


7 Termina £L mensaje un byte DOM 














moy A ¡Obtención siguiente byte de La menoria intermedia 
DRA A comprobación de terminal 
Az ¿Si, vuelta a La rutina que efectuó La Llamada 
moy CA ¿Preparación para Lanzar a La salida 
cut 8 FAlmacenar apuntador a memoria intermedia 
CALL CONQUT ¿Ira La rutina principal de salida de consola 
A] ¿Recuperación de apuntador a memoria intermedia 
Nx OR ¿Traslado al siguiente byte de La memoria 
«He ¿Bucle hasta terminar salida de La memoria 
Enterscpm: ¿Esta rutina se entra a partir del arranque en frío o en caliente. 
Activa Las instrucciones JMP en La página base y fija La dirección 
de entrada/salida de unidades de disco de alto nivel (conocida 
5 también como dirección de DMA). 
, 
Cd ¡Obtención código máquina para MP. 
STA 0000 ¿Activación JMP en La posición D000H 
STA 005% 7 y 0005H 
, 
EXI MH MarmBBoot8Ent ¡Obtención de La dirección del vector BIOS 





SHO 0001H Puesta de La dirección en La posición 0001 











LXE_ H,BDOSSEntry — ¿Obtención punto de entrada al 8005 
suo 6 ¿Puesta de La dirección en La posición 0005H 
LAI B,80m ¿Fijación de dirección de ent./sal. de disco por defecto 
CALL SETOMA jtilización rutina nornal BIOS 
' 
El ¡Asegurar interrupciones activadas 
DA DefaulteDisk ¿Transferencia disco en curso por defecto al 
moy CA 7_ procesador de órdenes de consola 
me CEPSEMtrY ¿Transferencia al CCP 


Controladores de entrada/salida serie 


Estos controladores examinan el 1OBYTE en la posición 00034 
que ha sido fijado por La rutina de arranque en frío. 

EL 10BYTE puede ser modificado por La rutina de utilidad STAT, 
por Llamadas al BDOS, o por un programa que sitúe un valor 
directamente en La posición 0003H. 


Todas estas rutinas hacen uso de La subrutina SelectSRoutine, 
que tona Los dos bits menos significativos del registro A 

y los utiliza para transferir el control a una de las rutinas 
cuya dirección sigue inmediatamente a La Llamada a SelectSRoutine. 
Un segundo punto de entrada SelectSRoutines21 utiliza 

Los bits 2 y 1 para hacer La misma operación -- ésta guarda 
espacio para salvar una instrucción innecesaria. 








lOBYTE EQU 0003 ¡Byte de redireccionamiento de entrada/salida 


CONST+ ¿Obtención estado de consola 
¿Entrada directamente desde el vector JMP del BIOS 
devuelve un parámetro que refleja La existencia 

5 de datos a entrar desde La consola 


00H (marca de cero activada) si no hay datos 
OFF (marca de cero a cero) si existen datos 





.CONST es Llamada por programas que realizan 
comprobaciones periódicas para indagar sí el operador 
ha pulsado algunas teclas —- por ejemplo, para interrumpir 
un programa en ejecución 








¿Retorno A = cero o distinto de cero 
¿De acuerdo con el estado, convertir después 


Figura 6-4. (Continuación) 
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87 
ce 
DEF 
cs 


280300 


concre 


Fere 
FCF8 
29 
oBFS 


240300 
cDDCF8. 


aero 
3er 
rd 
ARES 


ORA 
RL 

mur 
RET 


3, para seguir La convención de parámetros 
A ¿Activación de marcas para reflejar el estado 
iO, no existen datos de entrada 
A, OFFH ¿En caso contrario, devolución de A = OFFH para indicar 
7 existencia de datos de entrada 


GetsConsolesStatus: 


Loa 


cali 


Du 
E] 
E] 


De 
Du 
De 
DH 


, 
Liststs 


Figura 6-4, (Continuación.) 


1OBYTE ¡Obtención de byte de redireccionamiento de entrada/salida 
¿Se selecciona La consola de acuerdo con 
5_ Los bits 1 y O del 1OBYTE 
SelectsRoutine ¿Selección de la rutina apropiada 
stas rutinas devuelven el control a La que efectuó 
la Llamada a GetSConsolesStatus 
Teletyr 100 <- bits 1,0 del 1OBYTE 
TerminalSInsStatus 101 
CommunicationsInsStatus 510 
DummysIn8Status 0 


'Obtención de carácter de entrada de consola 

'Entrada directamente del vector JMP del B1OS; 

+ devuelve en el regístro A el siguiente carácter 
de datos de La consola. El bit más significativo 
del carácter-dato será O excepto cuando se 
seleccionado La Lectora (puerto de comunicaciones). 
En este caso Los ocho bits de datos completos 
serán devueltos para permitir La recepción de datos 
binarios 


Normalmente, esta rutina será Llamada después 
oe que uns Llamada a CONST indique que está preparado 
ún carácter-dato, pero en cualquier caso el CCP o el BD0S 
no pueden hacer hada hasta que ocurre una entrada 
por La consola, entonces CONIN será Llamada sin una LLanada 
anterior a CONST 


1OBYTE ¡Obtención de byte de redireccionamiento de entrada/salida 
Selectóñoutine ¡Selección de La rutina CONIN correcta 
¿Estas rutinas devuelven control directamente a la 
5 rutina que Llamó a CONIN 
TeletypesInput 300 < bits 1,0 del 10BYTE 
Terminal8Input 
CommunicationsInput 
Dumny 8 Input 





¿Salida de consola 

tEntrada directamente desde el vector JMP del BIOS; 

+ Lanza a salida el carácter situado en el registro € 
1. sobre el dispositivo apropiado de acuerdo con Los 

3 bytes 1 y O del 108YTE 


10BYTE ¡Obtención del byte de redireccionamiento de entrada/salida 
Selectófoutine ¿Seleccionar rutina CONOUT correcta 
¡Estas rutinas devuelven control directamente 
5 a La que Llanó a CONOUT 
Teletypesdutput 300 < bits 1,0 del IOBYTE 
Terminal80utput ¿01 
CommunacationsOutput ¿10 
Dummy80utput Jl 


sEstado del dispositivo de Listado (impresión, salida) 
¿Entrada directamente desde el vector JNP del BIOS; 

3 devuelve en el registro A el estado del disp. de Listado 

3 que indica cuándo el dispositivo de Listado puede aceptar 

Y otro carácter de salida. Los bits 7, 6 del IOBYTE determinan 
3 el dispositivo físico a utilizar 


FA = 00H. (indicador de cero a uno) no puede aceptar datos 
ZA = OFFH Cindicador de cero a cero) puede aceptar datos 
: 

















(Continuación.) 
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a 
Fe98 Ca sl ¿Si 0, mo pueden aceptarse datos para salida 
1099 3EFF mur A, OFFH ¿En caso contrario devuelve A = OFFH para indicar 
decias 
uta. a Il ia 
a A 2 
; 
a E 
ma a aa 
a O a. a 
a o 
o O E 
A 
j 
F8BC 340300 LOA 10BYTE z nc redireccionamiento de lectura/escrítura 
a ES a a 
ES E 
dese ide mapas. CON IA 
5 A ia 
O 
a 


¿Entrada directamente desde vector JNP del BIOS; 
entra en el registro A el carácter dato siguiente 
7 desde el dispositivo de lectura 
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¡El dispositivo apropiado se selecciona de acuerdo con 
» Los bits 3,2 del 1OBYTE 
10BYTE ¡Obtención byte de redireccionamiento de Lec./est. 
¡Transferencia de bits 3,2 a 2,1 
SelectóRoutines21 ¡Seleccionar rutina READÉR correcta 
sEstas rutinas devolverán el control directamente 
3/3 La que Llamó a READER 
< bits 1,0 del JOBYTE 


Communications0utput 
Terminal80utput 


A 
Selectóñoutines iransfiere el control a una dirección específica 
siguiendo su dirección de Llamada de acuerdo 
con el valor de los bits 1,0 de A 
Rue ¡Desplazamiento de Los valores seleccionados a Los bits 2,1 
¿ para realizar aritmética de palabras 


1 
SelectóRoutines21s ¿Punto de entrada para seleccionar La rutina de selección 
¿ Los bits están ya en 2,1 

ANI 0000801108 Áslar bits 2,1 

xr ¿AL -> primera palabra de dirección después 
de instrucción de Llamada 

mov fadir el valor de selección a tabla base 

mur de direcciones 

DAD ¿NL -> dirección de rutina seleccionada 
Jtención de dirección de rutina en HL 


¿Cabecera de pila -> rutina 
¿Transferencia a rutina seleccionada 


EQU OEDM 
ECH 

EQU 0000800018 ¡Máscara de estado 
EG O000so0I0B ¿Máscara de estado 


EU 01H 
02H 

Terminal8Output SReady EG 000080001 ¡Máscara de estado 

Terminal8InputsReady EQU 0000800108 ¿Máscara de estado 

, 

Communicat ion$StatussPort oEDH 

CommunicationsDatasPort EQU OECH 

Communicat ions0utputéReady G000800018 ¿Máscara de estado 

Communicat 1on8 Input sReady 0000800108 ¿Máscara de estado 

A 

Communicat 10n8l EQU ODE ¡Selección de modo 
EQU 0DEM ¿Selección de velocidad 


Tablas de control de dispositivo serie 
Para reducir La cantidad de código ejecutable, se utiliza 
el misno programa de control de bajo nivel para todos Los puertos serie. 


AL entrar al controlador de bajo nivel, HL apunta a La tabla 
de control apropiada 


Da TeletypesInputsReaoy 


, 
TerminalsTables 
De Terminal8StatussPort 
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0378 Feer 02 DB TerminalsDatasPort 
0377 FOFO 01 DB TerminalsOuIputóReady 
0378 FOFL 02 DB TerminalsInputeñeady 
0379 1 
0300 CommunicationeTabl 
0581 F8F2 ED 18 CommunicationeStatussPort 
0382 FOFa EC 
0369 Fera OL 
050% FOFS 02 
c5es , 
0586 ; 
037 ; 
0509 ; 
0309 )- Las rutinas siguientes son Llamadas por SelectSRoutine 
0590 Y para realizar La entrada/salida de bajo nivel: 
25 : 
0392 TeletypesInestatus 
0393 FOFS 21EArS Lx TR, Teletypestable ¿AL > tabla de control 
0394 FOF9 CIABFO e Input Ínótese el Uso de JMP. InputSStatus 
El 5 ejecutará el RETorno 
0396 
0597 
0598 FOrC 21EEFS ¿AL -> tabla de control 
03599 FOR COABr9 Se InputeStatus Nótese el Uso de JMP. InputSStatus 
0800 ¿ejecutará el RETOrno 
0601 1 
0602 CommunicattonsIneStatu: 
0603 F902 21F2ES UXI o MCommunicatlonsTable — ¿HL -> tabla de control 
004 F90S CIABr9 Se IrputeStatus ¿Nótese “el uso de IMP. InpurSStatus 
0605 Pejecutará el RETorno 
0%0s » 
0607 DumnySIn8Statust ¿Estado ficticio, siempre vuelve 
0608 908 3ErF UL AL OFFM ¿indicando dato preparado 
0809 F90A C9 Rer 
610 , 
ost 3 
0612 TeletypesoutéStatuss 
0613 F9OB ZIEAFO Lar Telety ¿ML > tabla de control 
0614 F9OE C3SSF9 SP OutputeStatas Nótese el Uso de INP. OutputSStatus 
0615 ¿ejecutará el RETorno 
0618 , 
0817 Terminals0uteStatuss 
0618 911 Z1EEFS ax ¿AL > tabla de control 
0519 F91A 336F9 se 7Nótese el uso de INP. OutputSStatus 
0820 ¿ejecutará el RETOrMO 
082 ñ 
0622 Communicat lonsdutóStatust 
0622 F917 21E2ES LAT NiCommunicatloneTable — ¿ML —> tabla de control 
062A FOLA COSSF> Se OUtpuleStatus Nótese el uso de JMP. OutputSStatus 
0623 ¿ejecutará el RETorno 
0628 , 
0827 Danny s0UteStatuss ¿Estado ficticio, siempre vuelve 
0620 F91D 0er ML ¿indicando prepárado para salida 
0829 FOIE Co ReT 
0830 , 
os , 
0632 TeletypesImpute 
DS 920 Z1EAFS LR retet ¿HL —> tabla de control 
DSA 923 C360F> Se IrpUtiDala ¿Nótese el uso de IMP. InputSData 
0635 ¿ejecutará el RETOrno 
0838 ñ 
0837 Terminal8Inputr 
0638 F926 21EErO EXDO o TerminaleTable ¿HL > tabla de control 
0639 ejecutará el RETorno 
040. F929 CDSOF9 CALL ImputeData Jak Caso especial ee 
08 ¿ImputSdata volverá aquí ya que 
0642. F92C ESIF ANI TEA 7 DAt de paridad puesto a 0 
0643 F92E Co RET 
0644 1 
0645 CommuntcatoneInputs 
0646 F92E 21F2ES nO CommunicationeTable — ¿HL -> tabla de control 
D5a7 932 C360rS Se Thputebata ¿Nótese el Uso de IMP. InputSata 
0448 ¿ejecutará el RETorno 
0649 » 
0630 Dumay8Imputa ¿Estado ficticio, siempre vuelye 
0631 F933 3ELA POLA, LA ¿indicando final de Fichero CP/M 





a) 
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REr 


1 
1 
4 
Teletypesdutputs 
LXI MH TeletypesTable ¿NL -> tabla de control 
MP OUtputsData ¿Nótese el uso del JMP. OutputSData 
5 para ejecutar el RETorno 


1 
Terminale0utputs 
EXI H TerminalsTable ¿HL -> tabla de control 
5 que ejecutará el RETorno 
JP OutputsData ¿Nótese el uso del JMP. OutputsData 
5 para ejecutar el RETorno 


Comeunication40utputr 
XI M,CommunicationéTable — ¿HL -> tabla de control 
JMP O OUtput8Data ¿Nótese el uso del JMP. OutputSData 
5 para ejecutar el RETorno 


ñ 
Dummyadutput ¿Salida ficticia, siempre descarta 
Rer 7 el carácter de salida 


En entrada, HL apunta a La tabla de control apropiada 
En salida, el registro C contiene Los datos-para-saLida 


, 
, 
, 
1. Estos son controiadores de bajo nivel de propósito general 
, 
1 
+ 
1 


MPULAStatu: 'Retorno con A = Q0H si no hay datos de entrada, 
: en caso contrario A distinto de cero. 
woY A 'Obtención estado del puerto 
STA InputStatussrort Código automodificable «es 
Da IN tEntrada a A del puerto en estado correcto 
1 
InputéStatusaPorts 
Da 00 ¿S- Fijar anterior 
15x ¿Cambiar ML para que apunte a La máscara de datos de 
1x9 5 entrada 
O] 
ANA 
RT 


¡Máscara con estado de entrada 
, 


, 
DutputeStatuss ¿Retorno con A = UOH si no está preparado para salida, 
¿ en caso contrario A distinto de cero 
woY A ¿Obtención estado del puerto 
STA OutputeStatussPort ¿ver Código automodificable «ee 
Da 1 ¿Entrada a A del puerto en estado correcto 


DutputaStatusPorte 
Da 00 ¿<- Fijar anterior 
A] ¿Cambiar ML para que apunte a La máscara de datos de salida 
A] 
AÑA OM 
RT 


¿Máscara con estado de salida 
A 


InputaDatar ¿Retorno con el siguiente carácter-dato en A 
¿Tiempo de espera para que La rutina de estado 
7 indique datos-de-entrada 
PUSH ¿Almacenar apuntador a tabla de control 
CALL ImputsStatus — ¿Obtención del estado de entrada en el indicador de cero 
POr ¡Recuperar apuntador a tabla de control 
pea InputáData ¿Espera hasta que existan datos de entrada 
E ZHL => puerto de datos 
CA] ¿Obtención puerto de datos 
STA InputsDatasPort ¿rea Código automodificable *** 
DB IN ¿Entrada a A desde el puerto de datos correcto 
InputeDatasPorts 


08 o 
Rer 














<- Fijar antertor 
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0728 
0729 
0730 
0731 
0732 
0733 
0734 
073s 
0736 
0737 
0738 
0739 
0740 
o7a1 
0742 
0743 
0744 
0745 
0748 
0747 
0748 
0749 
0750 
0751 
0752 
0753 
0754 
0755 
0756 
0757 
0758 
0759 
0760 
0761 
076; 

0763 
0768 
0785 
0768 
0767 
0768 
0769 
0770 
0771 
0772 
0773 
0774 
0775 
0776 
9777 
0778 
9779 
0780 
078! 

0782 
0783 
0784 
0785 
0786 
0787 
9788 
0789 
0790 
079 
079, 

0793 
0794 

0795. 
0794 

9797 
0798 
0799 


0801 
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F97O 
F971 
E974 
E975 
E978 
E979 
F97A 
F97D 
F9TE 


E97F 
Fs90 


Es81 
F983 
F989 
F985 
FSeD 
F98F 


F99L 


sera 


td 
42Fn 
SIFA 
CIFA 


sara 


, 
OutputeDatar 


ñ 
OutputsDatasPorti 
o 


As kAPar ame ter sheader 


¡Salida de los caracteres de datos en el registro € 


JEspera para que La rutina de estado indique dispositivo 


7 preparado para aceptar otro carácter 
Puso ¿Almacenamiento apuntador a tabla de control 
CALL OutputéStatus — ¿Obtención estado de salida en marca-cero 

ñ ¿Recuperar apuntador a tabla de control 
ye Outputádata — ¿Espera hasta preparado-para-sal ida 
Ixe ¿HL -> puerto de salida 
moy A ¿Obtención puerto de salida 
STA OUtputsDatasPort pex Código automodificable wr 
mv Ac ¿Obtención carácter de datos para Lanzar a salida 
» Un ¡Salida de datos al puerto correcto 


Fijar lo anterior 





DI 
RET 


Controladores de disquete de alto nivel 
Estos disquetes realizan Las siguientes funciones: 


SELOSK Selecciona el disco especificado y devuelve La dirección 
de la tabla cabecera de parámetros de disco 

SETTRK Fija el número de pista para la próxima Lectura o escritura 

SETSEC Fija el número de sector para La próxima Lectura o escritura 

SETDMA Fija La dirección DMA (Lectura/escritura) para La próxima operación 

SECTRAN Traduce un número de sector Lógico a físico 

Home Fija la pista a cero de forma que la Lectura o escritura siguiente 
se realizará en la pista cero 





En resumen, Los controladores de alto nivel son Los responsables 
de hacer que Los disquetes de 5 1/4" que utilizan sectores de 512 bytes 
aparezcan a CP/N cono si utilizaran sectores de 128 bytes. Realizan esta 
operación utilizando el programa Llamado de bloqueo/desbloqueo descrito 
con mayor detalle en Las páginas siguientes de este Listado, 

Justo antes que el propio prograna. 


Tablas de parámetros de disco 


Cono se mencionó en el capítulo 3, ésta describe Las 
características fisicas de Los controladores de disco. En este 
ejemplo de BIOS hay dos tipos de controladores, los estándar 

de 8” simple cara, simple densidad y Los de 5 1/4" de doble cara, 
doble densidad. 








Los disquetes estándar de 8" no precisan del uso del programa 
de bloqueo/desbloqueo, pero si Los de 5 1/4". Un byte 

adicional ha sido añadido al bloque de parámetros del disco para indicar 
al controlador el tipo físico del disquete Lógico y si necesita 

9 no desbloqueo. 


Tablas de definición del disco 


Consisten en cabeceras de parámetros de disco con una entrada 
por cada unidad Lógica de disco y bloque de parámetros, 

con el mismo bloque de parámetros para varios discos lógicos 
9 uno por disco Lógico. 


¡Descrito en el capítulo 3 





¡Logical Disk Ar (3 1/4" Diskette) 


9,0,0 ¿Reservado para CP/M 
DirectoryiButter 

Floppy8StParametersBlock 

DisksAsHorkar 

DISkSASAI Local ionsVector 





ES 


¡Logical Disk Br (5 1/4% Distetter 
Floppys38s» 


Z 





FloppyeSiSkevtable ¿Tabla de desplazamiento de 5 1/4" 


table ¡Comparte misma tabla de desplaz. que A: 





_— >) 





Figura 6-4. 
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9,0,0 “Reservado para CP/M 
DirectorysButter «Comparte misma memoria con A: 
Floppy9StParameter8Block Igual DPB que A: 
¿Area de trabajo privada 
¿Vector de ubicación privado 


9000000000. 
CIF 
A2FA 
SIFA 
DIFA 


22R2z 


(8" Flopay) 
FloppysStSkeutable ¿Tabla de desplazamiento de 8" 

0,0,0 ¿Reservado para CP/M 

DirectorysButter ¿Comparte misma memoria intermedia que A: 
FlOPpy88%PAar amater sBlock 

Disk8CSHorkas ¿Area de trabajo privada 

Disk8CAAL Local ionsVector ¿Vector de ubicación privado 


Bara 
0000000000 
CIS 
S2FA 
AJFA 
EDFA 


ZRRRER 


¡Logícal Disk Di (8" Floppy) 
FloppyaStSkeutable ¿Comparte misna tabla de desplaz. que A: 
0.0,0 ¿Reservado para CP/M 
DirectorysButter Comparte misna memoria intermedia que A: 
Floppy88%Parameter8Block ¿Igual DPB que €: 

DisksDéMorkarea ¿Area de trabajo privada 
Disk8DéALLOcationm8Vector ¿Vector de ubicación privado 


sera 
0090000000 
cIrS 
S2FA 
BIFA 
CFB 


222222 


irectorysBuffer: 0S 


Tipos de disco 


Floppyes EQU 1 ¿Minidisquete 
Floppy8s EQU 2 ¿disquete de 
Blocking/deblocking indicator 
, 
NeedsDeblocking EQU 1000800008 ¿Tanaño de sector > 128 bytes 


Disk parameter blocks 
5 1/4" mint floppy 


¿Byte extra con prefijo para indicar tipo de disco 
y necesidad de bloqueo 
¡sDeblockino 


«sectores de 128 bytes por pista 

Desplazamiento de bloque 

¿máscara de bloques 

¿máscara de extensión 

Nimero máximo de bloque 

¿Número de entradas al Sirectoráo 1 

¡Mapa de bits para reservar un bloque 
D000N0c00a —— ¿ mor cada direztarto de Ficheros Y. 
qe ¡Cambio de tamaño de área de trabajo en disco 
q ÍNimero de pistas antes del directorio 


Disquete de 8?! normalizado 
¿Byte extra con prefijo al 0P8 
para esta versión de BIOS 
De Floppy! Indica tipo de disco y el hecho 
5 de no necesitar desbloqueo 
FloppysB%Parameter8Block: : 
DH 6 ¿Sectores por pista 
Dr ¿Desplazamiento de bloque 
Máscara de bloques 
¿Máscara de extensión 
242 ¿Numero máximo de bloque 
$3 ¿Número de entradas al directorio - 1 
1100800008 ¿Mapa de bits para reservar dos bloques 
0000800008 ¿por cada directorio de ficheros 
16 ¡Cambio de tamaño de área de trabajo en disco 
2 ¿Número de pistas antes del directorio 

















Figura 6-4. (Continuación.) 


0933 
0934 
0935 
0926 
0937 
0938 
0939 
0940 
0941 
0942 
0943 
0948 
0945 
0946 
0947 
0948 
0949 


0931 
0952 
0989 
0934 





FAS1 
FAB1 
FAAL 
FABI 


Fac 
FAD7 


FAED 
FBOC 


Fo28 
FB2E 
Fear 
Feos 


Feo2 


aos 
FBaS 


Fass 
FB39 
FB3A 
Fe3D 
Fe3c 
Fe3F 
Feao 


FDA 
FBA4 
FBaS 
FBa6 
FBa7 
Feao 
FBa9 
FBAA 
Fea8 
FB4D 
Feso 
FBS1 
FBs3 
Fes6 
FBs7 
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210000 
79 
FE04. 


32EAFO 


2600 


29 
29 
1L81F9, 
19 

ES 


110A00 
19 


23 


ES 
22 

7e 
ESOF. 
3ZFAFS 
7e 
Es8o 
32ESFB 
E 

c9 








Areas de trabajo del disco 











y Son utilizadas por el BDOS para detectar cambios de disquete 
Y no esperados. El 8DOS pondrá automáticamente en estado 
» de sólo Lectura al disquete que ha sido cambiado. 
Di 2 DS 32 rar 
D: 1 DS 32 1 Br 
Di 1 DS 16 0 
Di ES 16 7 Dr 
1 Vectores de ubicación del disco 
7 Son utilizados por el 8DOS para mantener un napa de bits 
Y. de cuáles son Los bloques usados y cuáles no. 
% Se utiliza un byte por cada 8 bloques, de ahí su expresión 
y en la torna (bloques/8)*1. 
1 
DIskSASALlocationeVector — DS 1178/0741 1 Ar 
Disk8B*AllocationtVector — DS 174/83 1 Br 
Ds (242/0941 0] 
Ds (242/8)+1 7 Dr 
NumberSof8Logical8Di ske a 4 
, 
SELDSK: ¿Disco seleccionado en € 
O para unidad A, 1 para B, etc. 
letorno de La dirección de La cabecera 
5 de parámetros del disco en ML, 
¿0 D000H si no existe el disco seleccionado. 
La m0 ¡suposición de error 
moy AC ¿Comprobación de que el disco que se demanda es válido 
CPI Numbersof8LogicalsDisks 
ANC ¿Retorno sí > que el máxino número de discos 
, 
STA SelectedeDisk — ¿Almacenar núnero de disco seleccionado 
ictivación para retorno de dirección DPH 
moy LiA ¿componer valor disco en palabra 
mI O 
¡Calcular el desplazamiento inferior cabecera de tabla 
7 de parámetros de disco multiplicando por la 
¿ Longitud de La cabecera (16 bytes) 
DAD 12 
DAD ss 
DAD Mo er 
DAD Mo sms 
EXI D,DiskSParameterSMeaders ¿Obtención dirección base 
DAD DD ¿DE -> DPH apropiado 
Puso JALnacenar dirección DPH 
¡Acceso al bloque de parámetros de disco 
7 para extracción del byte especial de prefijo 
$ que identifica el tipo y si es 
7 nenesario desbloqueo 
EXI D,1O ¿Obtención del desplazamiento apuntador DPB en DPH 
DAD a ¿DE => dirección DPB en DPH 
moy EM ¿obtención dirección DPB en DE 
IX 
moy DM 
xCHO. ¿DE > 0P8, 
Dx .n ¿DE -> byte prefijo 
moy A ¿Obtención byte prefijo 
ANI OEM ¿AisLar tipo de disco 
STA Disk8Type Almacenamiento para utilizar en controlador de bajo nivel 
A] JObtención de una nueva copia del byte de prefijo 
ANI NeedsDeblocking ¡Aislamiento de La marca de desbloqueo 
STA DeblockingsRequired — ¿Almacenar para utilizar en controlador de bajo nivel 
ee ¡Recuperación apuntador a DPH 
Rer 
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0961 
0962 
0963 
0964 


0970 
0971 
0972 
0973 
0974 
0975 
0976 
0977 
0978 
0979 


0982 





0991 


1001 


1003 
1004 
1005 
1008 
1007 
1008 
1009 
1010 
1011 
1012 
1013 
1014 
1015 
1016 
1017 
1018 
1019 
1020 
1021 
1022 
1023 
1024 
1025 
1026 
1027 
1028 
1029 
1030 
1031 
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SETTRKe 
Fbse 60 mov 
FBS9 69. mov 
FBSA 22€BFB SHLD 
FBSD Co Rer 











FBSE 79 CIA 
FBSF 32EDFB STA SelectedsSector ¡Almacenamiento para controlador de bajo nivel 
FB62 C9 RT 
3 Fijación de dirección de DMA (entrada/salida) para siguiente Lectura/escritura 
, 
FR6a 0000 DMASAddres ss 0 o ¿Dirección DMA 
SETDMA: ¡Dirección en BC en entrada 
moy L,C ¿Puesta en HL para almacenar 
MOV MB 
FB67 226358 SHLD DMAsAddre: ¡Almacenar para controlador de bajo nivel 
FRA C9 REr 
; 
1. Traducción de número de sector Lógico a físico 
1 Tablas de traducción de sectores 
Y. Estas tablas están indexadas utilizando el número de sector lógico, y 
Y. contienen el correspondiente número de sector fisico 
, 
FloppyeSéSkeutabi: ¿Cada sector físico contiene 
¿ 4 sectores de 128 bytes. 
, Físicos 128b Lógicos 1280 
00010203 90,01,02,03 — 100,01,02,03 
1OLLI213 DB 16,17:18,19 — 104,05,08/07 
20212223 DB 32,33,34,35 — 108,09,10,14 
OCODOEOF DB 12, 19,14,13  112,13,18,13 
ACIDIEIF. DB 28,29,30.31 — 116,17.18,19 
FB7F 06090408 DB 0809/10/11 120,21.22,23 
FBS3 18191A18 DB 24,25,26,27 — 124,23,26.27 
FBe7 04050607 DB 04/05,06,07 — 128,29,30.31 
FROB 18151617 DB 20.21,22,23 — 132,33,34,35 
FBSF 24252627 DB 36,37,38,39 — 136,37,38,39 
FB93 34353697 Di 52,53,54,55 — 130,41,42.43 
FB97 44454647 69/70/71 188,85,86,47 
FB98 30313293 49,50,51 — 148,49,50,51 
FBOF 40418243 $4/65,66,67 —— 132,53,54,55 
FBAS 2C2D2E2F DB 44,45,46,47 — 156,57,58,59 
FBA7 3C3D3ESF DB 60,61,62,63 — 160,61/62,63 
FBAB 28292428 DB 40, 41,42,43 — 364,65,66,67 
FBAF 38393438 DB 56,57,58,59 — 168,69,70,71 


FloPpyS0ASkeutables 


0107001319 





OPOFISOZ08 DB 
1 
1218080A1O DB 


1 
SECTRANA 


(Continuación.) 





ma 
143 
SelectedsTrack 




















, 
3. Fijación de pista lógica para la siguiente Lectura o escritura 


¡Pista seleccionada en BC en entrada 


¿Almacenar para controlador de bajo nivel 


¿Sector Lógico en C en entrada 








.02,03,04,05,08,07,08,05, 10 
01,07,13,19,25,03,11,17, 23,03 


11,12,13,14,15,16,17,18,19,20 
09; 15,21,02,08,14,20,26.06,12 


21,22,23,24,25,26 
18,24,04,10,16,22 


Fisicos 512b 


aronuuoso arorvunao 


Sectores 
¿Sectores 


Sectores 
¿Sectores 


Sectores Lógicos 
¿Sectores físicos 


Cabeza 
0 


Cabeza 


¿Controlador de 8" normalizado 


lógicos 
físicos 


lógicos 
físicos 


+Traducción de sector Lógico a físico 


¡En entrada, BC 
1 DE -> tabla de desplazamiento apropiada 





¡úmero de 


sector Lógico 


Zen salida, HL = número de sector físico 
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1033 FBCO 
1034 FBCE 
1033. FBCF 
1038 FBDO 
1037 FRDZ 
1038 
1039 
1040 
1041 
1082 
1043 
1084 
1048 
1046 
1047 
1048. FBDA 
1049. FBDS 
1050 FBD7 
1051. FBDA 
1052 
1053 
1054. FBDD 
1058. FBDF 
1056. FREZ 
1057 
1058 
1059 
1060 
1061 
1082 
1063 
1064 
1068 
1066 
1087 
1088 
1089 
1070 
1071 0800 
1072 0012 
1073. 0004 
1074 0048 
1075. 0003 
1078 0002 
1077 
1078 
1079 
1080 
1081 
1082 
1083 
1084 
1088 
1086 
1087 
1088 0000 
1089 0001 
1090 0002 
1091 
1092 FRE 
1093 
1094 
1098 
1098 
1097 
1098. FBES 
1099 FRES 
1100. FBE7 
1101 
1102. FBES 
1103 
104 FRES 
Mos 
1106 


1107 
1108 





Es 


2600 
c> 


JAESFB 
87 

C2DDFB: 
32ESFB 


oE00 
co 


00 


00 
00 


xcHo. ¡HL -> base de tabla de desplazamiento 
DAD Bb ¿Añadir en núnero de sector Lógico 
moy Lin ¿obtención núnero de sector físico 
mI O ¿componer en un valor de 16 bytes 
RET 
, 
Homes IDevolver el disco Lógico seleccionado a La pista O 
ZAntes de realizar La operación debe comprobarse 
1 que La memoria intermedia de disco físico no tiene 
* Información que se debe escribir. Está indicado por la 
% marca MustSWritesBuffer fijada en el códico de 
3 desbloqueo 
LOA MustslritesBufter ¿Comprobación de sí La menoria intermedia física 
AS 5 debe ser escrita fuera del disco 
JNZ O HOMESNOSUrite 
STA DatasIneDisksBuffer — ¿No, indicación de disco 
5 desocupado 
HomEsNos Writer 
CC ¡Envio a pista O (Lógicamente == 
CALL SETTRK 5 "La operación no ocurre realmente en el disco) 
REr 


Los datos escritos o Leidos en La unidad de disquetes son transferidos 
via una menoría intermedia que es en realidad de 512 bytes (ha sido 
declarada al principio del BIOS y mantiene el programa de inicialización de 
“una=sola=vez" que se utiliza en el proceso de arranque en frío). 








de entrada/salida del disco almacenando en La memoria intermedia física 
el disco, pista y sector fisico residente en curso. 
Si Se da una petición de Lectura de un sector CP/M de 128 bytes que está 


, 

1 

1 

1 El programa de bloqueo/desbloqueo intenta minimizar La cantidad 

, 

Y aún en La memoria intermedia física, no es necesario, en este caso, un acceso al disco. 
1 








E0U 2048 
Eo 18 
CPMSSecAPersPhysical EQU Physical8SectorsSize/128 
CPMeSecaPeraTrack EU Cc SPhysicalmPhysical8SecsPertTrack 
SectorsMask EQU CPM8SeCsPersPnysical-1 
Sector emi tashitt ES +LOG2(CPMeSAcIPersPnysical) 


' 
Ison valores manejados por el BDOS cuando hace una 
Y operación WRITE 
¡La asignación/no asignación indica cuándo el BDOS está 
+ “activado para escribir en un bloque no asignado 
3 (sólo Lo indica para La escritura del priner sector 
y de 128 bytes) o en un bloque que ha sido ya asignado 

a un fichero 

Je 8DOS indica también sí está activado para escribir 
Y el directorio de ficheros 








o 


5 en DiskSBuffer en La memoria 








ttersDiske De o 7 Son cambiadas y comparadas 
Jul farsTracio Du o ; como grupo de forma que 
Ir feraSectort Da o 5 estas Líneas no se alteran 
1 
DatasIn8Disk8But tera De o ¿Cuando es distinto de cero La men. inter. 
7 “del disco contiene datos del disco. 
MustsWritesBut ter: De o ¿pistinto de cero cuando Los datos han sido 
7 escritos en DiskSBuffer pero no han 
5 sido escritos todavia fuera del disco 
SelectedankaTrKsSeci ¡Variables para el disco seleccionado, pista y sector 
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1109 
1110 
1 

112 
113 
1114 
1115 
1116 
1117 
118 
119 
1120 

1121 

1122 

1123 
1124 

1125 
1126 
1127 

1128 
1129 
1130 
1131 

1132 
1133 
1134 
1135 
1136 
1137 
1138 
1139 
1130 
1141 

1192 
1143 
1144 
1145 
1146 
1147 
1148 
1149 
1150 
1151 

1152 
1153 
1154 
1155 
1156 
1157 

1158 
1159 
1160 
1161 

1162 
1163 
1168 
1165 
1166 
1167 
1168 
1169 
1170 
171 

1172 
1173 
1274 
1175 
1176 
1177 
1178 
1179 
1180 
1181 

1162 





1163 FCi2 CasEFC 


FBEA 
FEB 
FBED 


FREE 


FRE 
Faro 


FBFI 
FeFZ 
FeFA 


FOFS. 


FaFe 


FBF7 


Pere 
FeF> 
FBFA 


Fee 
FBFE 
FBFF 


Foz 
FcoS 
ECOS 
FCO7 
FCOA 


FcoD 
FCOF 


Figura 6-4. 


00 
0000 
00 
00 


3 


00 


33 


00 


2AFIFB 
97 
CAS2FD. 


AR 
32FSF 
30 

a2rera 
3257FB 


3502 
32E3Fe 








y (Seleccionadas 





SelectedeDi ske De o 
SelectedsTrack: De o 
SelectedaSector: De o 
SelectedaPhysicalsSector: DB o 
SelectedeDisk8Typer Da o 
SelectedeDisksDeblocke DB o 
Unal locatedsDksTrkssecs 

UnallocatedeDi ski De o 
UnallocatedeTrack: EN o 
UnallocatedsSector: Da o 
UnallocatedsRecordsCount: DB o 
Disk8ErrorsFlags De o 


1Flags used inside the deblocking code 


MustaPrereadiSectors De o 
Reads0perations De 

DebiockingsRequired: Da o 
DiskgTypes DB o 


por SELDSK, SETTRK y SETSEC) 

Son comparadas y cambiadas 
como grupo de forma que 
no se altera el orden 





lector fisico seleccionado deducido del 
sector lógico seleccionado (CP/M), 
desplazándolo a La derecha 

el número de bits especificado 

por SectorsBitSshift 





¡Fijación de SELOSK para indicar sí se 
7_ trata de un disquete de 8' o de 5 1/41 

ijación de SELDSK para indicar cuándo es 
7 necesario desbloqueo 





¿Parámetros para escrítura en un bloque 


E desasignado previamente 
¿ Son cambiados y comparados 

7 como grupo de forma que 

7 no se alteran estas Líneas 


¿Número de "registros" no asignados 
¿en el bloque en curso desasignado 
5 previamente 


¿Distinto de cero para indicar un error 
7 que mo puede ser recuperado por Los 

¿ controladores de disco. El BDOS Lanzará 
7 Un mensaje de "sector dañado" 


¡Distinto de cero sí un sector físico puede 
5 leerse en La memoria intermedia 
3 de diaco bien antes de que tenga 
5 Lugar La escritura de un bloque asignado 
3 o bien para una Lectura de sector normal 
$ CP/M de 128 bytes 
¿Distinto de cera cuando se Lee 
¿ un sector CP/M de 128 bytes 

¿Distinto de cero cuando el disco selec. 

3 precisa desbloqueo (fijado en SELOSK) 
¿Indica sí el disco seleccionado es de 8" 
5 o de S 1/4" (fijado en SELDSK) 


Lectura de un sector CP/M de 128 bytes especificado por Las Llamadas previas para 
seleccionar disco y fijar pista y sector. El sector será Leido en la 


Si se Lee de una unidad de disco que usa sectores mayores que 128 bytes, 
el programa de desbloqueo será utilizado para "desempaquetar” un sector 


1 
1. dirección especificada en la Llamada previa para fijar La dirección de DMA. 
1 


de 128 bytes del sector físico. 








READ: 
LOA DeblockingeRequired ¿Comprobación de sí es preciso desbloqueo 
SRA A ¿Ala marca corres. fue fijada en Llamada a SELOSK) 
5 ReadsNosDeb Lock ¿No, utilización normal no desbloqueada 
¿EL algoritmo de desbloqueo que se utiliza es tal 
3 que una operación de Lectura puede 
3 ser vísta hasta La transferencia de datos 
7 como sí fuese La primera escritura 
5 a un bloque no asignado 
xa A ¡Puesta a cero del contador de regístro para 
STA UnallocatedsRecorasCount; La primera “escritura” 
mA ¿Indicación de lectura real que debe 
STA 3 realizarse forzando una prelectura 
STA ¿ del sector para situarlo en la 
¿_menoria intermedia de disco 
mr ¿Simulación de desbloqueo en respuesta 
STA a sí se trata de La prinera escritura 
¿Sobre un bloque no asignado. 
UP PerformsReadeWrite ¿Utilización del prog. común para ejecutar La lec. 





(Continuación.) 








1202 FCIS 
1203 FCIS 
1204 FC19 


1206 FCIC 
1207 FCID 


1209 FCZ1 
1210 FC24 


1212 FC26 


1219 FC29 
1220 FC2B 


1222 FC2E 
1223 FCSL 
1224 FC3A 


1232 FC97 
1233 FCA 
1294 FCO 


1238 FCOE 
1240 FCOF 


1242 FCAZ 
1243 FEAS 
1244 FC48 
1245 FCAB 


1254. FCAE 
1258 FAR 


1257 FCS1 
1258. FCS3 








3AFSFR 
E 
CAADED. 


AF 
32rera. 
79 
32ESFB 
FE02 


c297FC 


3EL0 
32FSFB 


2LEAFO 
1IFLES 
CD3SFD 


2AFSFD 
7 
CAS6FC 





ALFIFB 
0290 
C26sFC 


TE 
FEse 
DASFFC 
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Escritura de un sector de 128 bytes desde La dirección DMA en curso 
en el disco, pista y sector seleccionados previamente. 


Llegado este punto, el BDOS habrá puesto a uno el registro C para indicar 
que esta operación de escritura es sobre un bloque ya asignado 

(debido a que puede haberse necesitado La prelectura del sector), 

al directorio (caso en que Los datos deben escribirse directamente 

en el disco), o en el priner sector de 128 bytes de Un bloque 
desasignado previamente. 


Unicamente La escritura del directorio tiene Lugar inmediatamente, En 
Los demás casos, Los datos se transterirán desde La dirección DMA a La memoria 
internedia del disco y sólo escritas realmente en el nomento en que Las 
circunstancias fuerzan La transferencia. El número de operaciones con el 
disco físico pueden reducirse considerablemente de esta forme 





DA DeblockingsRequired ¡Comprobación de sí es necesario el desbloqueo 
RA A ¿Cndicador puesto a uno en La Llamada a SELDSK) 
yz ri tesnosDeblock 


xRA A ¡Indicación de que se precisa una operación de 
STA Read80peration 7 escritura Ces decir, NO de Lectura) 
moy AO uardar tipo de escritura del BD0S 
STA MritesTyp 
CPI MritesUnallocated ¡Comprobación de si se trata de una primera 
A Peserítura de un bloque no astanado 
UNZ O Check8UnallocatedaBlock ¿No, comprobación de sí está escribiendo 
5 én un bloque 
Fsi, escritura primero de un bloque 
7 ho asignado -- inicialización 
7 de las variables asociadas 
%_ con escritura desasignada 
MVI O A/AllocationsBlock8Size/128 ¡Obtención del número 
7 de sectores de 128 bytes 
STA UnallocatedsRecordsCount y activación del contador 








LXI M-SelectedeDksTrksSec ¿copia de disco, pista y sector 
EXI D/UnallocatedeDkeTrk8Sec 3 “en variables desastgnadas 
CALL MOvesDk8Trk8Sec 


, 
y Comprobación de si se trata de La primera escritura 
y en un bloque no asignado -- si Lo es, el contador 

Y de registro no asignados ha sido puesto en el número 
Y. de sectores de 128 bytes del bloque. 


Check8Unal Located9Block: 


DA UnallocatediRecordsCount 
RA A 
yz RequestáPreread ¿No, es una escrítura sobre 


5_ún bloque asignado 
FSI, es una escritura sobre 
7 ún bloque no asignado 
















DORA ¿Decrenentar el número de sectores 128 bytes 
$ no escritos en el bloque 
STA UnallocatedsRecordsCount 5 y almacenar el nuevo valor 
XI H,SelectedeDK8TrksSec ¡Comprobación de si el disco, pista y 
LX D;UnallocatedsDkbTrk8Sec; sector seleccionados son (os mismos que 
CALL CompareSDkATrkbSec 5, Los del bloque no asignado 
ÍNZ RequestsPreread No, es necesaria la prelectura 
SÍ, no se precisa prelectura 
Este momento es apropiado para actualizar el 
sector en curso y para mirar si es necesario 
% también actualizar la pista 
, 
¿Por diseño, CompareSDkSTrkSSec 
7 retorna con 
7 DE => UnalLocatedSSector 
xcHo HL > UnalLocatedsSector 
TAR ¿Actualización Unal LocatedSSector. 
MOYA ¿Comprobación de si ahora sector > máximo 
CPI CPMASeCAPersTrack 5 en la pista 
Je NosTrack8Change ¿NO AMO, 


ES] 





Figura 6-4. (Continuación.) 


192 CP/M Manual para programadores 


miooo ¿Puesta a cero del sector 
MD UnallocatedsTrack ¿Aumentar en 1 La pista 
COC] 

SHLD UnallocatedsTrack 


NosTrackSChanges 
¿Indicación de hasta qué código no es 
5 necesaria La prelectura 
AF xa A 
Sar STA MustsPrereadsSector  ¡MustSPrereadSSector=0 
C3REFC IMP PertormiReadirite 


1 
RequestePrerea: 
AF XRA A ¿Indicación de que no se trata de una escritura 
aaeSFO STA UnallocatedsRecordsCount 7 de un bloque no asignado 
2 IRA 
3978 STA MustsPrereadsSector ¿Indicación de que es necesaria la 
7 prelectura del sector físico 


z 
PertormtReadsrites ¿Prograna común para ejecutar Lecturas y 
5 escrituras de sectores de 128 bytes 
ar XA A ¿Suposición de que no habrán 
32r6FO STA DisksErrorsFlag 7 errores de disco 


3AEDFE LOA SelectedsSector ¿Conversión del sector seleccionado de 128 bytes 
1 BAR 5 en sector físico dividiendo por 4 

1 RAR 

ESar ANI 3FM ¿Borrado de Los bits no deseados 

32eeFe STA SelectedsPhysicalsSector 


21ESFa LXI O M,DatasInsDisksBuffer — ¿Comprobación de si La memoria intermedia de 
TE mV AA 7, disco contiene datos 
3601 mI ma (Condición no verdadera índica que la 
5 memoria intermedia contiene datos) 
27 RA A ¿2Es cierto que contiene datos? 
Cane 3 ReadsSectorsintosBuffer ¿No, se Leen datos del sector fisico 
5 “En La memoria intermedia 


¿La menoria intermedia contiene 

+ un sector físico 

7 Notas El disco, pista y sector físico 

+ en La memoria intermedia deben 

3 ser comprobados, de ahí 

7 el uso de La subrutina ComparesDkSTrk 
A1EAFR LXI D.InsBuffersDksTrkeSec ¿Comprobación de sí el sector en La men. int. es 
2IEAFE LXI— H:SelectedsDkSTrkSSec ¿el mismo que el que ha sido seleccionado 
CD24FD CALL ComparesDksTrk -omparación de disco y pista únicamente 
C29cEC ÍNZ SectorsNotsInsBuffer — No, debe ser Leido 


3AEJFS Loa ¡Obtención sector físico en La memoria internedia 
REEF LXI  M-SelectedsPhysical8Sectór 

BE A] ¿Comprobación de si sector físico correcto 
CABIFC 3 SectorsInsButter ¿Si, está todavia en la memoria 


1 
Sector8NotsInéBuf fer: 
¿No, deberá ser Leido en Los contenidos 
áctuales de La menoria intermedia 
LOA MustaWritesButfer ¿Comprobación de si La memoria intermedia contiene 
e ;__datos que deben ser escritos antes 
ENZO MritesPhysical E, escritas 
A 
ReadsSectorsintosBul fer: 
CALL Seta In8BuNfersDksTrkesec ¡Fijación de disco, pista 
y sector en Las variables de La memoria 
intermedia para reflejar cuál es el sector 
actualmente en La menoría intermedia 
LOA MustsPrereadaSector En La práctica el Sector necesita únicamente 
DRA A ser leido fisicamente sí se precisa 
la prelectura 
CNZ O ReadsPhysical Ísi, prelectura del sector 
xRA A ¿Puesta a cero de la marca para reflejar el 
STA MustsWritesButfer 7 contenido de La memoria intermedia 


SectorsIntButters ¿EL sector seleccionado en la pista y disco correctos 
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1336 y está todavia en La menoria intermedia, 
1337 JConversión del sector CP/M (128 bytes) 
1338 3 seleccionado en dirección relativa baja 
1339 3 en La menoria internedia 
1340. FCBI JAEDFS LOA SelectedsSector ¿Obtención número de sector seleccionado 
1341. FCBA ES03 ANI SectoriMiask  iEnmascarar sóLo Los bits menos significativos 
1342 FCB6 6F moy yA 3MOtiolicación por 128 desplazando un valor de 16 bits 
1343. FCB7 2600 mur 7 siete posiciones a La izquierda 
1348 FCB9 29 DAD mM m2 
1345 FCBA 29 DAD má 
1348 FCBR 29 DAD Ps 
1347 FCBC 29 pao Frte 
1348 FCBD 29 DAD Pesa 
1349 FCBE 29 AN] mn 6s 
1390 FCBF 29 DAD ES 
1] ' h 
1382 FOCO 1139F6 LXI O D,DisrsEuffer ¡Obtención dirección base de La memoria intermedia de disco 
1359 FCC3 19 DAD Añadir a núnero de sector * 128 
1354 ¿HL dirección de comienzo del sector de 128 bytes en La 
1355 1 nenoria intermedia de disco 
1356 FCCA ES x0Ho ¿or "S5 sector en La penoria intermedia de disco 
1357 FCCS 2A63FB ÉMLD — DiAsAddress Obtención de La dirección DMA fijada en La Llamada a SETOMA 
1358 FCC8 ER x0no 'Suposición de operación de Lectura; por tanto: 
1359 DE -> dirección DMA 
1380 HL -> sector en La menoria intermedia" de disco 
1361 FOCO 0E1O mr c,120/8 ¿nebido a La rapidez del método utilizado para transferir 
1362 3 “datos dentro y fuera de La memoria intermedia de disco 
1363 (8 bytes transferidos por bucle de iteración) 
1364 el contador necesita ser sólo de un octavo 
13s 3 de Lo normal 
1366 JEn este punto = 
1387 : = contador de Lazos 
1368 ; DE > dirección DMA 
1369 : NL => sectores en La memoria intermedia de disco 
1370 FCCB 3AFSFE LOA ¡SOperation ¡Determinar en qué caso Los datos son transferidos 
1371 FCE 87 SRA A + fuera de La memoria intermedia (Lectura) 
1372. FOCF C207FC ÍNZ— Bufferstiove 3 0.al interior (escritura) 
1373 sEscritura en La memoria intermedia 
1 ¿XA debe ser 0) 
1375 FCD2 90 mo 4 ¿Fijar marca para forzar La escrítura de La 
1378 FCDS 32€9Fb STA MustsWritesBulfer q imocta Tnteraedia de dista 
1377 FCDS EB x0no lacer DE => sector en menoria intermedia de disco 
1378 7 HL —> dirección DMA 
1379 1 
1380 , 
1301 Buttersmoves ¡El bucle de transferencias siguiente transfiere 8 bytes 
1382 3 a la vez de ML a DE, C contiene el contador 
1309 3 de bucle 
1304. FC07 7E moy A ¿Obtención de byte de la fuente 
1305. FCDS 12 STAX — D testa en el destino 
1386 FCO? 13 A] ¿Actualización de apuntadores 
1387 FCDA 23 O] 
1388 FCO 7E mov AM *obtención de byte de la fuente 
1389 FCOC 12 sax D *Puesta en el destino 
1390 FCOD 13 A] +Actualización de apuntadores 
1391 FCDE 23 CC] 
1392 FCO 7E moY A ¿Obtención de byte de la fuente 
1393. FCEO 12 sTaXx  D ¡Puesta en el destino 
1394 FCEL 13 1D vActualización de apuntadore: 
1395. FCE2 23 mom 
1396 FCES 7E moy A + Obtención de byte de La fuente 
1397 FCES 12 STAX  D ¡Puesta en el destino 
1398 FCES 13 IX O TActualización de apuntadores 
1399 FCES 23 100 
1400 FCE? 7E mov A + Obtención de byte de La fuente 
1401 FCES 12 sTax DD 3 Puesta en el destino 
1402 FCE? 13 O] + Actualización de apuntadores 
1403. FCEA 23 A] 
1404. FEB 7E HOYA + obtención de byte de La fuente 
1409. FCEC 12 sTAX  D +Puesta en el destino 
1406 FCED 13 E] Y Actualización de apuntadores 
1407 FCEE 23 mom 
1408. FCE 7E moy A 1Obtención de byte de La fuente 
1409 FCFO 12 STAXx  D +Puesta en el destino 
1410. FCEL 13 mo 0D +Actualización de apuntadores 
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FEO1 
3AFSFE 
co 


87 
co 


AF 
32E9e 
CO9SFD 
DARE 
E 


oE0s 


7e 
12 
13 
23 
00 
ce 
C397FD 


$” 
Am +Obtención byte de La fuente 
D +Puesta en destino 

D + Actualización de apuntadores 
h 


per C ¡Decrenentar contador de bucle 
ÚNZ O Buffersiiove ¡Repetir hasta sector CP/M transferido 


LOA MritesType 151 escritura en directorio, escriba inmediatamente 
WritesDirectory 3 La memoría intermedia 

LDA — DiskSErrorsFlag Obtención marca de error en caso de retraso en lec. 0 esc. 

ENZ ¡Retorno 5 retraso en Lectura o escritura 


p 
ORA ¿Comprobación de sí se han producido errores de disco 
RNZ 3SÍ, abandono de intento de escritura del directorio 

1 
xRA A 'Borrar marca que indica que La menoría intermedia 
STA MusteWritesBuffer ¿debe ser escrita en gisco 
CALL MritesPnysical sEscritura de La memoria intermedia en el sector físico 


LOA DisksErrorsFlas sRetorno de indicador a La rutina que efectuó La Llamada 


Sete InSBUffereDK8TrK8Sec: ¿Indicación de qué disco seleccionado, pista y 
7 sector residen en La memoria intermedia 
LOA SelectedeDisk 
STA InsBuffersDisk 


LHLD SelectedsTrack 
SHO InsBuffersTrack 


LOA SelectedePhysical8Sector 
STA InsBufterssector 


Rer 
ComparesDk8Trks ¡Comparación de disco y pista apuntados 
1 por DE y HL 
mr ca iDisco (1), pista (2) 
UMP O ComparesDkSTrk8Sec8Loop ;ÚtiLización de programa común 


ComparesDk8Trk8Sec: 1Comparación de variables de disco, pista y sector 
3 apuntados por DE y HL 
miro ca 'Disco (1), pista (2) y sector (1) 
ComparesDkSTrK8Sec8Loop: 
LDAX sObtención comparador 
a ;Comparación con comparando 
ANZ 'Abandono de La comparación sí se encuentra desigualdad 
INx *Actualización apuntador comparado 
1Nx ctualización apuntador comparando 
DCR 'Decrementar contador de bucle 
Ri 'Retorno (con indicador de cero a uno) 
UMP O ComparesDkSTrk8SecsLoop 
1 


1 
Move SDK8Trk8Sec1 'ransferencia de Las ve 
Y apuntadas por ML a Las apuntadas 
7 por DE 
mio cs *Disco (1), pista (2) y sector (1 
MoveSDk8Trk8Sec8Loop: 
CA ;Obtención byte fuente 
STAX *Alnacenamiento en destino 
1Nx +Actualización apuntadores 
1NX 
DCR ¡Decrenentar contador de bytes 
Ri ¡Retorno si transferidos todos Los bytes 
JP Moves DK8TrkSSec8Loop 


Existen dos controladores de disco "inteligentes" 
en este sistema, uno para disquetes de 8"! y otro para unidades 
de 5 1/4%. 


Los controladores están “conectados físicamente" al monitor en ciertos Lugares 











1954 
1558 
1356 
1397 
1358 
1359 
1360 
1861 
1362 
1363 





0040 
0041 


0043 


0045 


0046 


EDAD 
FDAF 
Fos2 
FoS4 
FoS7 
FOSA 
FOSO. 
FOSE 
Fo61 


FOSA 
Fosé 


2240FD 


218000 
224550. 
AF 


324250 
BAEAFE. 


ESO1 
3241FD 
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en La menoría para detectar cuándo debe realizarse alguna 
operación de disco. Monitor-controlador de 8"* posición O040M. 
Monitor-controlador de 5 1/4** posición 00454. Son Los 
Llamados bytes de control de disco. Si el bit más significativo 
del byte de control de disco está a 1, el controlador examinará 
La palabra que sigue a Los bytes de control respectivos. 

Esta palabra debe contener La dirección de una tabla de control 
de disco válida que especifique La operación exacta a realizar. 








Una vez que La operación ha terminado, el controlador pone 
su byte de control a 00H, Lo que indica al programa que la tarea 
se ha completado. 


El controlador activa también un código de retorno en el bloque de estado 
de disco -- ambos controladores utilizan para ello La misma posición 0043H. 
Si el primer byte de este bloque de estado es menor que 80H, significa que 
ha ocurrido un error. No hay más detalles relevantes respecto a La fijación 
de estados de este BIOS simple. Nótese que el controlador de disco tiene 
construidos -- en lógica de varios intentos -- Lecturas y escrítura que se 
intentan diez veces antes de que el controlador dé un error. 











La disposición de La tabla de control de disco se muestra a continuación. 
Nótese que Los controladores tienen La capacidad de encadenar tablas de 
control de manera que pueden lanzarse operaciones de disco en cadena. Esta 
característica no se usa en este BIOS. Él controlador precisa, sin embargo, 
que los apuntadores de cadena en La tabla de control de disco sean 
apuntadas por Los bytes de control principal para indicar el final de La 








cadeno. 
DisksContro1a E0U 40H ¡Byte de control de 8" 
CommandeBLockso E0U 41H ¿Apuntador a tabla de control 
DiskaStatursBlock E0U 42H ¡Bloque de estado de 8" y de 5 1/4" 
Diskscontrolas, E0U asa e de control de 5 1/4" 





CommandsBlock8s EQU 46H ¿Apuntador a tabla de control 


Y Flospy Disk Control Tables 











pe o ¿Orden 
EQU 01m 
EQU 02H 
FloppyaUnite 58 o ¿Unidad núnero 0.6 1 
FloppytHead: DB o ¿Cabeza número 0 61 
Floppy8Tracki DB o ¿Número de pista 
Floppy8Sector: De o ¿Número de sector 
y tesCounts De o ¿Número de bytes a Leer/escribir 
De o ¿Dirección de transferencia 
De o ¿Apuntador a bloque de estado siguiente 
5 “si existen órdenes encadenadas. 
Floppy8NextsControl8Location: DH 0 ¿Apuntador a byte de control siguiente 





5 si existen órdenes encadenadas 


, 

1 

1 

Write 8nosDeb1ock1 ¡Escritura del contenido de La meoría intermedia 
7 en el sector correcto 








NVI A/FloPPy8HritesCode 'obtención de código de función de escritura 
JM. COmmon8No8Deblock ¿Ir a programa común. 
ReadeNosDeblocki ¿Lectura previa del sector seleccionado en la 
7 memoria intermedia 
HI. AL FLopPy8ReadaCode ¿Obtención código de función de Lectura 
Common sNo8Deb Lock: 
STA FloppySCommand 1! Activación código de función de orden 
Y Activación tabla de órdenes no desbloqueadas 
LX Maze l Bytes por sector 
SHO Fioppy8BytesCount 
xRA A VEL disquete de 8" tiene únicamente La cabeza 0 
STA FloppySMead 
LOA SelectedeDísk — EL controlador de disquetes de 8" sólo tiene información 
Y en unidades O y 1 de manera que SelectedSDisk 
1 debe convertirse 
ANI 01M Hransfornación a 16 0 
STA FloppysUnit  1Fijar número de unidad 


AAA! 


Figura 6-4. (Continuación.) 





196 CP/M Manual para programadores 


' 
3AEBFO 
3249FD 


SelectageTrack 
FloppyWTrack 

+ 
3AEDFS 
3244FD 


SelectedéSector 
FloppyiSector 
2A63F5 

2247FD 


Diasadari 
Floppy SDMASAdOre: 


1Fijar número de pista 


1Fijar núnero de sector 


'Transterencia directa entre dirección DMA 
3y controlador de 8' 


sEL controlador de disco acepta tablas de control de disco 
Y encadenadas, pero en este caso no se utilizan, de manera 
y que los apuntadores al "siguiente" deben apuntar 

y a Los bytes de control inicial en la página 


7 base 
Mi Disk8StatussBlock 
Floppy WexteStatuseBlock 


H,Disk8Controls8 


Floppysnext8ControlsLocation + 


H, Floppy Command 
CommandsBlockes: 


M.DisksContro1s8 
som 
Mas t8FOrsDisksComplete 


MratesPnysicals 


3502 
cascro 


MUI A/FloppysWritescode 
JM. ComensPhysical 

ReadsPhysicals 

aE01 MUI ALFloppySReadsCode 

1 

CommonsPhysicali 


32a0FD STA FlompysCommana 


DAFAFE 
FEO1 
CAADFD 
3E01 
32FSFR 
co 


LOA 
cer 
Ji 
E 
STA 
RET 

CorrecteDiskaTypes 


DiskeType 


DisksErrorsFlao 


3AEAFR 
ES01 
32eIFD 


LUA— InsBUftersDisk 
ANI A 
STA FloppysUnit 


2AESF 
70 
32earD 


Lao 
mov 
STA 


InsBuffersTrack 
AL 
FloppysTrack 


mur 
LOA 
moy 
cel 
Je 

sul 


bo 
1n8BU! er sSector 
C.A 

a 

Headso 

$ 


moy 
INR 

Headso: 
moy 
STA 
mov 


CA 
E 


13 
FloppysMead 
AC 


6-4. (Continuación.) 


1Apuntar estado siguiente al bloque 

1 de estado principal 

1 

1Apuntar byte de control del siguiente 
al byte de control principal 

' 

YApuntar controlador a tabla de control 


, 
vActivar controlador para realizar 
1 La operación 


¡Escrátura del contenido de la memoria intermedia 
7 en el sector correcto 
¿obtención de código de función de escrítura 
¿Ir a un código común 
Lectura previa del sector seleccionado 
en La menoria intermedia 
¿obtención código de función de Lectura 


¡Activación tabla de órdenes 


¿Obtención tipo de disco (fijado en SELOSK) 
'Confirmación de disquete de 5 1/4" 

si 

ÍNo, inidicar error de disco 





¡Activación tabla de control de disco 


¿convertir núnero de disco a 0.61 
% para controlador de disco 
¡Activar número de pista 

¿Nota: Es un valor de un solo byte 
7 para el controlador 


¿El sector debe convertirse en un número 
de cabeza y un Número de sector. 

Sectores 0 - 8 tienen cabeza 0, 9 = 17 

tienen cabeza 1 

¿suposición de cabeza O 

'Obtención núnero de sector físico 

'Alnacenar copia en caso de ser cabeza 0 

Comprobación de si < 9 

55, <9 

¿No, modificar número de sector anterior 
én el rango 0 a 8 

¿Puesta del sector en B 

¿Fijación a cabeza 1 











¡Fijación número de cabeza 


¡Fijación número de sector 
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Fo0O 
FOOL 


FoDA 
FOD7 


FODA 
FODD 


FoE0 
FDES 
FDES 
FDE9 


FDEC 
FDEF 


FDFZ 
FOFS 


FDE7 
FOFS 
Foro 


FOFC 
EDFF 
FEO 
FEO4 
FEOS 
FE08 


FE09 
FEOD 
FEOE 


FEOF 
FELO 
FELL 
FE1Z 
FELS 
FELA 
FE1S 
FEte 
FELA 


FE1c 
FELD 
FELE 
FELE 
FEZO 
FE2I 
FE23 
FE2S 
FE27 


6-4, 





3244FD 


210002 
224550 


2rars 
224750. 


214300 
2249FD 
214300 
224BFD. 


2140FD. 
224600 


214500 
3680 


7E 
C2F7FO 


3A4300 
FESO. 
DAO9FE 
AF 
2RFSFO 
> 


2601 
32FSFO 
> 


0006 
00FO 
4300 
4500 








mooA * Clos sectores físicos comienzan en 1) 
STA FloepysSector 
: 
LXI O M.PhysicaltSectorsSize ¡Fijar contador de bytes 
SHO FloeeysBytesCount 
EXI MDiskaButter ¡Fijación de dirección de transferencia a 
suLO 3 'nenoria internedia de disco 
¡Si se utiliza únicamente una tabla de control, 
1 se cierra el estado y se hace apuntar 
+ los apuntadores de cadena a Los bytes 
* de control principal 
LXI H,DiokéStatusóBlock AA 
SHLO— FloppyWNext8StatussBlock 
EXI H,DisksControlss 


SHO Florpy8NexisControlsLocation 

















La ¡Activar apuntador a bloque de comandos 
SHLO 
LAI MiDisk8ControlsS ¿Activar controlador de disco de 5 1/4% 
MUI MoB0m 
1 
Mas t8FOr8Disk8COme1e' :spera hasta que el bloque de estado de disco 
indique que se ha completado La operación, 
entonces comprobación de ocurrencia de ertores. 
yn entrada ML => byte de control de disco 
moy AM ¿Obtención byte de control 
RA A, 
UNZ O MaitsForsDisksComplete ¡Operación no realizada todavia 
LOA DiskeStatussBlock ¿Terminada -- comprobar estado ahora 
er 80M 'omprobación de ocurrencia de errores 
Je DisksError $ 
Ya A ino 
STA DiskBErroróFlag ¿Borrado de indicador de error 
RET 
DiskoError 
MIA ijación de indicador de error de disco a 
STA DisksErrorsFlag 5 diatintg=deznero 
RET 


: 
) Imagen de La tabla de control de disco para arranque caliente 
ñ 
» 



















loOtsControlWParts1s 
De 1 ¿Función de Lectura 
De o ¿Número de unidad 
De o ¿Número de cabeza 
De o ¿Número de pista 
De 2 lúmero de sector de comienzo 
oy dus12 ¿Número de bytes a Leer 
E] CCPsEntry ¿Lectura en esta dirección 
Da Disk8StatussBlock ¿Apuntador a bloque de estado siguiente 
E) DisksControles FApuntador a tabla de control siguiente 
BooteControlsPartZr 
De 1 ¿Función de Lectura 
DB o ¿Número de unidad 
De 1 ¿Número de cabeza 
De o ¿Número de pista 
De 1 ¿Número de sector de comienzo 
De 3512 ¿Número de bytes a Leer 
De CCPeENtry + (OmS12) ¿Lectura en esta dirección 
E] Disk8StatussBLock ipuntador a bloque de estado siguiente 
E) DiskaControlss, ¿Apuntador a tabla de control siguiente 
, 
, 
Mot» ¿Entrada de arranque caliente 


¿Cuando se da un arranque caliente, el CCP y el BDOS 
¿ deben recargarse en La memoria. En este BIOS sólo se 
5 utilizarán disquetes de 5 1/4", por Lo que su programa 








(Continuación.) 
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1715 ; es hardware específico del controlador, Se utilizan 
1716 7 dos tablas de control prefabricadas 

1717 FE29 318000 LXE SP,80m 

1718 FEZC 1OFFE EXI D,BootsControlePart1 — ¿Ejecutar La primera Lectura de arranque caliente 
1719 FEZF CDOBFE CALL HarmsBoctéRead ¡Cargar unidad O, pista O, cabeza O, 

1720 7_ sectores 2 a 8 ' 
1721 FE92 111CFE LXI O D,BootsComtrolsPartz Ejecutar segunda Lectura 

1722 FE35 CDIBFE CALL MarmsBootsf ¿Cargar unidad O, pista O, cabeza 1, 

1723 7, sectores 123 

1724 FE38 C3AOFO MP Enterscen ¿Activación de página base y entrada del CCP 
1725 , 

1726 MarmsBo0t Read: ¿En entrada, DE -> imagen de tabla de control 
1727 ¿Esta tabla de control se transfiere a la tabla 
1728 ¿ de control de disco principal y se activa 
1729 5, entonces el controlador 

1730 FESB 2140FD LAI H,FlobpySCommand ¿HL -> tabla de control real 

1731 FESE 224600 SHO CommandsBlockeS ¿Indicar al controlador su dirección 

1782 ¿Transferir La imagen de La tabla de control 
1733 2, a la propia tabla de control 

1734 FEA! OE0D mio cla ZActivar contador de byte 

1735 HarmsB00t Move: 

1736 FEAS 1A LDAX D ¿Obtención de byte imagen 

1737 FEA 77 mo MA “Almacenar en La tabla de control real 

1738 FEAS 23 Pr] ¿Actualización de apuntadores 

1739 FEAS 13 AED 

1740. FE47 0D DR Cc ¿Decrementar contador de bytes 

1741 FEAS Care JNZ MarmsBoot Move ¿Continúe hasta transferencia de todos Los bytes 
1742 

1743. FE4B 214500 XI MiDiskSComtrolaS ¿Activar controlador 

1744 FEAE 3680 CL 

1745 Has t8For8BoolSCompleter 

1746 FESO 7E MOV AM ¿Obtención byte de estado 

1747 FES1 87 RA A ¿Comprobación de completada 

1748 FES2 C250FE UNZ O Malt8For8BootsComplete ¿No 

1749 ¿Si, comprobación de errores 

1750 FESS 34300 LOA Disk8StatussBlock 

1751 FESO FE90. CPI 80m 

17352 FESA DASEFE ye HarmsBootsError ¿Si, ocurrencia de error 

1753. FESD C9 Rer 

1754 1 

1755 HarmsBo0t8Errors 

1736 FESE 2167FE LXT MH, MarmSBootsError8Message 

1737 FE61 CO33FS CALL Display8Message É 

1738 FES4 C929FE JMP BOOT, ¿Iniciar de nuevo arranque caliente 

1759 , 

1780 MarmsBo0t8Error Mes. 

1761 FE67 ODOAS76172 DI CR,LF, “Warm Boot Error — retrying...”,CR,LF.O 

1762 s 

1763 1 

1764 FE? END ¿Final del Listado del BIOS 











Figura 6-4. (Continuación.) 

























Pasos principales 
Construcción del primer sistema 
Utilización del SYSGEN para escribir 
el CP/M en el disco 
Utilización del DDT para construir 
la imagen del CP/M en memoria 
El cargador de autocarga (bootstrap loader) 
del CP/M 
Utilización de MOVCPM para reubicar 
el CCP y el BDOS 
eii del conjunto 











Construcción de un nuevo 
sistema CP/M 







Este capítulo describe cómo construir una versión del CP/M con su 
propio BIOS incorporado. Muestra también cómo poner el CP/M en un 
disco flexible y cómo escribir un cargador para llevar el CP/M a la 
memoria. 

El fabricante de la computadora juega un papel significativo en la 
construcción de un nuevo sistema CP/M. Algunos de los programas de 
utilidad del CP/M pueden modificarse por los fabricantes para adaptarlos a 
los sistemas individuales. Desgraciadamente no todos los fabricantes hacen 
estos programas a medida. Por tanto, debería invertirse algún tiempo en 
estudiar la documentación que se suministra con el sistema, con el fin de ver 
hasta qué punto se ha hecho. También deberán ensamblarse e imprimirse 
listados de todos los ficheros en lenguaje ensamblador de su disquete CP/M. 

Es imposible predecir los detalles de esta personalización y los procedi- 
mientos especiales que los fabricantes pueden instalar en cada sistema 
particular. Por consiguiente, este capítulo describe en primer lugar el 
conjunto del mecanismo de construcción de un sistema CP/M, y en segundo 
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lugar los detalles de la construcción de un sistema CP/M alrededor del 
ejemplo de BIOS mostrado en el capítulo anterior como figura 6-4. 





Pasos principales 





La construcción de un nuevo sistema CP/M consiste, en grandes líneas, 
en los siguientes pasos: 


e Creación de un BIOS nuevo o modificado con los controladores de 
dispositivos adecuados en él. Ensamblar esto de forma que ejecute al 
final de la memoria [mediante el uso de una relación de origen (ORG) 
para fijar el contador de posiciones]. 


Creación de nuevas versiones del CCP y el BDOS con todas las 
direcciones de las instrucciones cambiadas de forma que se sitúen 
correctamente en la memoria inmediatamente bajo el nuevo BIOS, 
Digital Research proporciona una utilidad especial denominada 
MOVCPM para realizar esta tarea. 


e Creación o modificación de un cargador del CP/M que será cargado 
por el firmware que trabaja cuando se conecta por primera vez la 
computadora (o se presiona el botón de RESET). Normalmente, el 
cargador del CP/M se ejecuta en el final de la dirección inferior de la 
memoria. La dirección exacta y los detalles de cualquier inicialización 


de hardware que deba realizar dependerán enteramente de la compu- 
tadora particular. 


e Utilizando los programas de utilidad estándar de Digital Research, 
situar el cargador, el CCP y el BDOS y el BIOS juntos en la parte 
inferior de la memoria. Entonces escribir esta nueva versión de CP/M 
en un disco en los sitios adecuados. De nuevo, dependiendo del diseño 
de la computadora, es posible utilizar el programa de utilidad 
estándar, SYSGEN, para escribir la imagen completa de CP/M en el 
disco. En caso contrario, se debe escribir un programa especial que 
haga esto. 


Cuando el CP/M está funcionando todavía en la computadora y se 
quieren añadir nuevas posibilidades al BIOS, todo lo que se necesita es 
cambiar el BIOS y volver a construir el sistema. El CCP y el BDOS 
necesitarán ser transportados abajo en la memoria si el cambio expande el 
BIOS de manera significativa. Si esto ocurre, habrá que hacer cambios 
menores en el cargador, de forma que lea la nueva imagen del CP/M en la 
memoria en una dirección más baja y transfiera el control al sitio correcto 
(la primera instrucción del vector de saltos del BIOS). 
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Construcción del primer sistema 








La primera vez que se implemente el CP/M, una buena idea es no 
realizar ningún cambio en el BIOS. Simplemente ensamblar el código 
fuente del BIOS y proceder a construir el sistema. Entonces, si el nuevo 
sistema no funciona, se sabe que existe algún fallo en el procedimiento que 
se está usando antes de que se hayan introducido nuevas prestaciones O 
modificaciones del código fuente del BIOS. Los cambios en el BIOS pueden 
oscurecer fácilmente cualquier problema que surja en el propio procedi- 
miento de construcción. 


Los ingredientes 


Para construir el CP/M se necesitarán los siguientes ficheros y progra- 
mas de utilidad: 


e El código fuente en lenguaje ensamblador del BIOS. Habrá que 
buscar en el disquete CP/M un fichero con un nombre como 
CBIOS.ASM (Sistema de entrada/salida básico personalizado). Algu- 
nos fabricantes no suministran el código fuente de sus BIOS; lo 
venden separadamente o simplemente no lo modifican. Si no se puede 
tener el código fuente, el único camino a seguir para poder añadir 
nuevas caracteristicas al BIOS es escribiendo enteramente el BIOS 
desde el principio. 


e El código fuente para el cargador del CP/M. Este también deberá 
encontrarse en el disquete o disponible separadamente en el fabrican- 
te de la computadora. 


e El ensamblador de Digital Research, que convierte el código fuente en 
un lenguaje máquina de forma hexadecimal. Este programa, denomi- 
nado ASM.COM, se hallará en el disquete CP/M. Los ensambladores 
equivalentes, tales como los macro-ensambladores MAC y RMAC de 
Digital Research o el Microsoft M80, también pueden ser utilizados. 


e La utilidad de Digital Research denominada MOVCPM, que prepara 
una imagen en memoria del CCP y el BDOS con todas las direcciones 
ajustadas a los valores exactos. 


e Los programas de depuración de Digital Research, denominados 
DDT (Dynamic Debugging Tool), o la versión mejorada para el chip 
CPU Z30, ZSID (Z80 Symbolic Interactive Debugger). El DDT se 
utiliza para leer en los distintos ficheros de programas y formar una 
imagen en memoria del sistema CP/M. 


La finalidad última 


Figura 7-1. 
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e El programa de utilidad de Digital Research SYSGEN. Este escribe la 
imagen de memoria compuesta por el cargador, CCP, BDOS y BIOS 
en el disco. SYSGEN se diseñó para trabajar en sistemas de disoo 
flexible. Si la computadora utiliza un disco rígido, puede tenerse un 
programa con un nombre tal como PUTCPM o WRITECPM que 
realiza la misma función. 


En la figura 6-4, líneas 0044 a 0065, se pueden ver las equivalencias que 
definen las direcciones de base para el CCP, el BDOS y el BIOS. La figu- 
ra 7-1 muestra cómo aparecerá el principio de la memoria cuando esta 
versión del CP/M se ha cargado en memoria. 

Todo sería más fácil si se pudiera construir esta imagen en memoria en 
las direcciones mostradas y escribir la imagen fuera en el disco. La 
construcción de esta imagen, sin embargo, probablemente escribirá sobre la 
versión del CP/M con que se está operando porque éste también se 
encuentra al principio de la memoria. Por consiguiente, la finalidad es crear 
una réplica de esta imagen más abajo en la memoria, pero con todas las 
direcciones de instrucción fijas para ser ejecutadas en las direcciones que 
muestra la figura 7-1. 


OFFFFH (Principio de la RAM de 64K) 








Distribución de la memoria del CP/M, 
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Utilización del SYSGEN para escribir el CP/M en el disco 





La utilidad SYSGEN escribe una imagen de memoria en un disco lógico 
especifico. Puede usar una imagen de memoria que se prepara para que esté 
en la memoria antes de invocar a SYSGEN, o se puede dirigir el SYSGEN 
para que lea en un fichero de disco que contiene la imagen. También se 
puede usar SYSGEN para transportar un sistema CP/M existente desde un 
disquete a otro dirigiéndolo para que cargue la imagen del CP/M desde un 
disquete en la memoria y escribir entonces esa imagen en otro disquete. 

Lea detenidamente la documentación suministrada por el fabricante de 
la computadora para asegurarse de que puede utilizarse SYSGEN en el 
sistema. El SYSGEN, como se edita por Digital Research, está construido 
para funcionar con disquetes de 8 pulgadas, una sola cara y simple 
densidad. Si el sistema no utiliza estos disquetes estándar, SYSGEN deberá 
ser adaptado al sistema de disco que se utilice. 

Cuando SYSGEN carga una imagen del CP/M en la memoria, colocará 
el cargador, el CCP, el BDOS y el BIOS en las direcciones previamente 
determinadas que se muestran en la figura 7-2, sin tener en cuenta dónde se 
ha originado este CP/M. 

Como puede verse, la colocación relativa entre los componentes no ha 
cambiado; la imagen total simplemente se ha desplazado hacia abajo en la 
memoria, por debajo de la versión del CP/M en curso de ejecución. El 
arranque ha añadido al cuadro exactamente debajo del CCP. 

La utilidad SYSGEN escribe esta imagen en un disquete empezando en 
el sector 1 de la pista O y continuando hasta el sector 26 de la pista 1. 
Consúltese la figura 2-2 para ver la distribución del CP/M en un disquete 
normalizado de 8 pulgadas, una sola cara y simple densidad. 

Si se requiere al SYSGEN para que lea la imagen de memoria desde un 
fichero (lo que se realiza llamando el SYSGEN con el nombre de fichero en 
la misma línea que la llamada al SYSGEN), entonces SYSGEN supone que 
se ha creado previamente en la memoria la imagen correcta y se la ha 
salvado (con la orden SAVE). SYSGEN omite entonces los 16 primeros 
sectores del fichero, como si evitara escribir sobre sí mismo. 

A continuación hay un ejemplo de cómo usar SYSGEN para transferir 
la imagen del CP/M de un disquete a otro: 

ADSYSGENSCR> 

SYSGEN VER 2.0 

SOURCE DRIVE NAME COR RETURN TO SKIP) A 
SOURCE ON A:, THEN TYPE RETURN <cr> 

FUNCTION COMPLETE 

DESTINATION DRIVE NAME (OR RETURN TO REBOOT) B| 
DESTINATION ON B: THEN TYPE RETURN <cr> 
FUNCTION COMPLETE 


DESTINATION DRIVE NAME (OR RETURN TO REBOOT) <cr> 
AS 
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——— OFFFFH (Principio de la RAM) 







Versión 


















de ejecución 
del CP/M 
en curso 
OEA400H (aproximado) 
BIOS=2.304 (900H) bytes 
(variarán de versión 
<—— 28808 en versión) 
BIOS 
«—— 1F80H BDOS=3.584 (OE00H) bytes 
ADOS CCP=2.048 (00H) bytes 
[<—— 11804 
Cargador=128 (80H) bytes 
cor ii pe 
<——— 09804 
Cargador 
<—— 0900 
SYSGEN=xxx (xxxH) bytes 
SYSGEN 
-<—— 0100H 
———— 0000H 








Figura 7-2. Distribución de la memoria del SYSGEN. 
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Como puede verse, SYSGEN da la oportunidad de especificar el nombre 
de la unidad fuente o mecanografiar CARRIAGE RETURN. Si se introduce un 
CARRIAGE RETURN, SYSGEN supone que la imagen del CP/M ya está en 
memoria. Obsérvese que se necesita llamar al SYSGEN sólo una vez para 
escribir la misma imagen del CP/M en más de un disco. 

Un BIOS mayor que el estándar puede producir dificultades al usar 
SYSGEN. El formato SYSGEN estándar sólo permite contener el BIOS 
en seis sectores de 128 bytes, por lo que si éste es mayor de 768 (300H) 
bytes, será un problema. La imagen del CP/M no se ajusta a las dos 
primeras pistas de un disquete estándar de 8 pulgadas. 

Actualmente es difícil encontrar un sistema de disquetes donde haya que 
cargar el CP/M desde un disquete de una sola cara y simple densidad. La 
mayoría de los sistemas utilizan ahora disquetes de doble cara y doble 
densidad como formato normal, pero pueden cambiar a disquetes de una 
cara y simple densidad para intercambiar información con otras computa- 
doras. 

Como no hay ningún formato “estándar” para disquetes de 8 pul- 
gadas, doble cara y doble densidad, probablemente no se podrán leer los 
escritos en sistemas de una marca o un modelo distintos. Por consiguiente, 
es necesario únicamente estar enterados de la forma de usar una distribu- 
ción de disco que conserve los discos compatibles con otras máquinas que 
sean exactamente las mismas que las que se poseen. 

Esto también es verdad si se tienen disquetes de 5 1/4 pulgadas. No 
existe un estándar industrial para éstos, por lo que la consideración 
principal será colocar el directorio de ficheros en el mismo lugar en que 
estará en los escritos por otros usuarios del mismo modelo de computadora. 
También hay que asegurarse de usar el mismo entrelazamiento de sectores. 
En caso contrario, se obtendrá una versión deformada siempre que se 
intente leer ficheros originarios de otros sistemas. 

Con los disquetes de mayor capacidad, se puede reservar más espacio 
para conservar la imagen del CP/M en el disquete, Por ejemplo, en el caso 
del BIOS que se muestra en la figura 6-4, la imagen del CP/M se escribe en 
uno de 5 1/4 pulgadas, de doble cara y doble densidad, utilizando sectores de 
512 bytes. La figura 7-3 muestra la distribución de este disquete. Obsérvese 
que el cargador está situado en un sector de 512 bytes por sí mismo. Lo que 
hace mucho más simple el programa de autocarga y de arranque caliente 
del BIOS. 

La imagen de memoria deberá alterarse para reflejar el hecho de que el 
cargador ocupa ahora un sector completo de 512 bytes. Mejor que cambiar 
todas las direcciones, el cargador se carga en la memoria 384 (180H) bytes 
más abajo, de forma que acaba en la misma dirección que antes. La figu- 
ra 7-4 muestra la imagen de memoria revisada. 
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Pista 0 Sector 
Cabeza 1 2 3 4 5 6 7 8 9 
0 
1 
Sector 
Pista 1 Sector 


1 


2 3 4 5 6 7 8 $ 
Cabeza 
A Directorio de ficheros Bloques 














Figura 7-3. Distribución de disco para ejemplificar el BIOS en disquetes de 5 1/4 pulgadas. 


Escritura de una uti 





lad PUTCPM 


Como el sistema del ejemplo usa disquetes de 5 1/4 pulgadas con 
sectores de 512 bytes, la versión estándar de SYSGEN no puede ser 
utilizada para escribir la imagen del CP/M en un disquete. Habrá de usarse 
un reemplazamiento funcional suministrado por el fabricante de la compu- 
tadora o desarrollar un pequeño programa de utilidad para hacer este 
trabajo. 

La figura 7-5 muestra un ejemplo de tal programa. Está escrito con un 
propósito general, de forma que se pueda utilizar para cualquier sistema 
cambiando las equivalencias del principio del programa de forma que 
reflejen las especificaciones de las unidades de disco. 

Obsérvese que existen dos problemas para resolver. Primero, el área del 
disco en el cual reside la imagen del CP/M no es accesible para el BDOS, 
porque se encuentra fuera del área del sistema de ficheros del disco. 
Segundo, es raro escribir la imagen del CP/M en el disco sin ninguna clase 
de entrelazamiento entre sectores, ya que al hacerlo así se retrasaría el 
proceso de carga. En algún caso, el entrelazamiento sería redundante, 
porque el cargador no está realizando ningún proceso distinto al de lectura 
del disco y, por tanto, puede leer éste sin entrelazamiento. 
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OFFFFH (Principio de la RAM) 


Versión 
de ejecución 
del CP/M 
en curso 


0E400H (aproximadamente) 


BIOS=2.304 (900H) bytes 
(variarán de versión 
en versión) 


BDOS=3.584 (0E00H) bytes 


CCP=2.048 (800H) bytes 


Cargador=512 (200H) bytes 





Cargador 





Figura 7-4. Direcciones para ejemplificación de la imagen del BIOS. 





Utilización del DDT para construir la imagen del CP/M 
en memoria 











El DDT, programa de depuración de Digital Research, se utiliza para 
leer ficheros del tipo “.COM” y “.HEX” en la memoria. Entender la 
estructura interna de estos tipos de fichero es importante, tanto en lo que se 
refiere a lo que el DDT puede hacer, como en lo que se refiere a la forma en 
que MOVCPM puede cambiar efectivamente un fichero en código máquina 
de forma que pueda ser ejecutado en una nueva dirección de la memoria. 
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Este programa escríbe en un disco flexible el cargador, 
el CCP, el 8DOS y el BIOS, Corre bajo CP/M como 
un programa normal. 

EOU “01” — ¡Equivalencias utilizadas en el mensaje 
de "funcionando" 


Eu “o7s 
EQU +24s 
EQU rear 


EL verdadero programa PUTCPMFS consiste en este programa, 
más Los BOOTFS.HEX, CCP, BDOS y BIOS. 


Cuando se ejecuta este programa, La memoria inagen 


Dirección base 

1500m 
11004 
0980H 
0780m 


Los programas se presentan como sigue: 


Por ensamblar el código fuente 

Desde un fichero CPMan.COM por MOVCPA 
y almacenado en disco 

Por ensamblaje del código fuente 


Los componentes se sitúan juntos utilizando DOT con Las 
siguientes órdenes: 


DOY CPMnn.COM 
IPUTCPMES. MEX 

R (Lee en este programa) 

IBOOTES. MEX 

Rego (Lee en BOOT en 07804) 

IBIOS. MEX 

R2980. (Lee en BIOS 1F80H) 

50 (Salida de DDT) 

SAVE 40 PUTCPMFS.COM — (Creación del fichero definitivo .Com 


La distribución real en el disquete es cono sigue: 


Sector 


Equivalencias para definir el tamaño de La memoria y La dirección base y 
La Longitud ce Los componentes del sistema 


MOry8Size EQU 64 ¿Número de Kbytes de RAM 


La Longitud del BIOS debe coincidir con La declarada en el BIOS 
, 
BIOSSLENgth EQU 
BootélLength EQU 
CCPSLength E0u 
EQU 0E00H ¿Constante 


LengtnsInsBytes EQU CCPeLength + BDOSSLength + BIOSALength 
¡Dirección de La imagen CP/M 











Figura 7-5. Ejemplo de PUTCPM. 





0001 
0012 


0200. 


9001 


0001 
0011 


38 


“0100. 


0100 


9000 
000n 


0103 
0119 
0118 
0123 
0125 
0128 
0128 
0129 
0128 
or2c 
012€ 


0045 
0086 
0043 





Figura 7-5. 
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Características del disco 











, 
, Estas equivalencias definen Las características físicas 
; del disquete de manera que el programa pueda ir de un sector 
; al siguiente actualizando La pista y poniendo a cero 
; el sector cuando sea necesario. 
úl 
. FirstsSectorsonsTrack EQU 1 
- LastsSectorsonsTrack EQU 18 
. LasteSectorsonsHeadsO EQU 9 
- SectorsSize EQU 512 
, 
; Características del controlador 
; En esta computadora el controlador puede escribir 
; varios sectores con una sola orden. Sin embargo, 
; para dar un mejor ejemplo, se muestra sólo 
1 la Lectura de Un sector cada vez. 
s Sel rahirite EQU a 
; 
; Cold boot characteristics 
- StarteTrack Eu 0 'Valores iniciales de La imagen CP/M 
StartaSector Ema P 
- SectorssTomrite EQU + SectorsSize — 1) / SectorsSize 
- BOPRINTS Eu 9 ¿Impresión de cadena terminada por $ 
= BDOS EU Ss ¿Punto de entrada al BDOS 
; 
, 
ORO 100% 
Putscen: 
caarO1 AMP MainsCode entrada del cuerpo del programa principal 
ara claridad del programa, las estructuras 
de datos se muestran antes del código 
ejecutable 
- or E0u 00H tetorno de carro 
- LE EU Om ¿Salto de Linea 
ODOASO7574 De CR,LE, “Put CP/M on Diskett 
ODOA, De CR,LF 
5665727369 De ¿Version - 
3031 E] version 
20 De e. 
3097 Du Month 
2 De .p* 
3204 De Day 
> De 04% 
3892 De Year 
0DOAZA Da AS 
, Disk control tables 
- DisksComtrol83_ EQU ASH ¿Byte de control 5 1/4" 
. CommandeBlock83 EQU 46M ;Apuntador a tabla de control 
= Disk8Status EQU 43H ¿Terminación del estado 


A 


1 
1 
, 
, 
, 
d 





La pista de tablas de órdenes y La DMASAddress pueden utilizarse 
como menor 





de trabajo y actualizadas cuando continúa el 


:so de carga. El sector en la tabla de órdenes no puede 
utilizarse directamente cono Lo necesita el controlador de 
disco, debe ser el núnero de sector sobre La cabeza especificada 
€ =-"9) y más que el núnero de sector en la pista. Debe usarse, 
por tanto, una variable separada. 








(Continuación.) 
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0131 01 Startasector 
0132 02 3 02H ¿Orden =- escritura 
0133 00 De o ¿Unidad 0 61 
0134 00 o ¿Número de cabeza 0 ó 1 
0135 00 Tracks StartaTrack  ¿Utilizada como variable de tri 
0136 00 Sectorsonshead: DB o ¿Convertido a controlador de bajo nivel 
0137 0002 Byte8Countr DA SectorsSize mn SectorssPersurite 
0139 8007 DiMASADIress! DH StartiImage 
0138 4300 MentáStatuss DM DiskaStatus Juntador a bloque de estado siguiente 
si las órdenes están encadenadas 
0130 4300 NMextaControls 04 DiskSContro1s5 ¿Apuntador al siguiente byte de control 
si Las órdenes están encadenadas 
MainsCoder | 
310001 LIT SP,Putscen ¿La pila crece hacía abajo debajo del programa 
110301 LXI D/SignontMessage funcionando | 
0509 mI  BOPRINTS. ¿Imprimir cadena hasta $ 
c00500. CALL BDOS 
213201 LxI  M,CommandeTable Apuntar el controlador de disco 
224600 SHO CommandeBlockes '¿U Bloque ¡dé 'conardós 
Em MI C/SectorseTotrite ijar contador de sectores 
HrátesLoop: 
071 CALL PUtsCPMeWrite ¡Escritura de datos en el disquete 
0D »or— Cc ecrementar contador 
CA000o ye o irranque caliente 
213101 XI M,Sector ictualización número de sector 
3€01 FUI A¡Sectors8PertWrite añadiendo el número de sectores 
es ADD Mm 5 al controlador 
77, moy MA ¿Guardar resultado 
EL MVT A¡Last8SectorSOneTrack + 1 ¿Comprobación de final de pista 
BE em 
0163 C26F01 ÍNZ O NotsEndeTrack 
0166 3601 MVI_ M.First8SectorsOneTrack ¿SÍ, puesta al comienzo 
0168 243501 EMO Track ¿Actualización número de pista 
0168 23 IN 
O16C 223501 SHO Track 
Not8EndSTracki 
OL6F 2A3901 LMLD— DMABAdAresa ¿Actualización dirección de DMA 
0172 110002 LAT D,Sector$Size m SectorssPersWrite 
0175 19 DAD Dd 
0176 223901 SHLD DMASAddre 
0179 C35201 UM? MritesLoop ¡Escritura del bloque siguiente 
1 
PUR ACP Les ;En este punto La descripción de La operación 
7 que se requiere está en Las variables contenidas 
5 en La tabla de órdenes a Lo Largo 
5 de la variable de sector 
0170 cs PusH a ¿Guardar contador de sector en € 
Cambiar esta rutina para coincidir con el controlador de disco utilizado == 
0170 0800 mur ¿suposición de cabeza O 
O17F 3AD1O1 Loa tención de sector requerido 
0182 AF moy CA tención de copía de él 
0183 FEOA CPI LastaSectorsonsMeads0+1 ¿Comprobación de cabeza 1 
0183 DASCO1 Je Meadso. lo 
0188 D609 SUI LastaSectorsonsHeadsO — ¡Para cabeza 1 
OIBA AF mov CA EGuardar copi 
0188 04 IR jActivar cabeza 1 
Meadsor 
o1ec 78. moy AB ¿Obtención cabeza 
O18D 323401 STA Head 
5190 79 moy Ac ¿Obtención sector 
0191 329601 STA SectorsOnsHe: 





Mes 


Figura 7-5. (Continuación.) 
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0194 214500 XI HiDisk8ComtroleS ¿Activación del controlador 
0197 3680 MY m80n 

MaitsForSBoot8Comp 1eter 
0199 7E moy AM ¿Obtención byte de estado 


OLA 87 Comprobación de completo 
OL9B C29901 No 


¿Si, comprobación de errores 





RA A 
ÚNZ O MaftsFOr8BootaComplete 





019€ 344300 LOA 
OLAL FEGO cel 
DIAS DAASO! Je ¿Si, ha ocurrido Un error 











OLAS CL Por ¿Recuperar contador de sectores en € 
OLA7 C9 RT 
PutscemsErtore 
OLAS 118301 XI D,PULSCPMSErrorSMessage 
OLA 0809 MYI C/BSPRINTS ¿Impresión de cadena hasta $ 
OLAD CDOS00 CALL BDOS ¿Salida de mensaje de error 
D1BO CS3FO1 JAPO MainsCode ¿Reinicializar cargador 
PULSCPMeEr Tor ame: 
OIBA ODOAA57272 DE a Error in writing CP/M — retrying.+-"+CR,LE, 087 
010 END PULSCOM 





Figura 7-5. (Continuación) 


Estructura de ficheros “.COM”" 


Un fichero COM es una imagen de memoria. Es una réplica de las 
configuraciones de bits que se van a crear cuando el fichero es cargado en la 
memoria. Los ficheros COM se diseñan normalmente para cargar a partir 
de la situación 100H. Ninguna estructura interna del fichero lo requiere; por 
tanto, si se conocen los contenidos, no hay nada que impida cargarlo en la 
memoria empezando en alguna dirección distinta de 100H. 

Como puede observarse en la descripción del CP/M en el capítulo 4, la 
orden SAVE construida en el CCP permite crear un fichero COM especifi- 
cando el número de “páginas” de memoria de 256 bytes y el nombre del 
mismo. El CCP escribirá una imagen exacta de la memoria a partir de la 
situación 100H. 


Estructura de ficheros “.HEX"”" 


Los ficheros HEX son generados por el ensamblador. Contienen una 
representación de carácter ASCII de valores hexadecimales. Por ejemplo, 
los contenidos de un solo byte de memoria con el valor binario 10101111 
estarian representados por dos caracteres ASCII, A F, en un fichero HEX. 

El fichero HEX posee un nivel estructural más alto que una serie de 
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caracteres ASCII. Cada linea de caracteres ASCII se acaba por 
CARRIAGE RETURN/LINE FEED. La estructura completa se muestra en 
figura 7-6. 

El aspecto más importante de un fichero HEX es que cada línea contie 
la dirección en la cual se cargan los bytes de datos. Cada linea se pr 
independientemente, por lo que las direcciones de carga de líneas sucesiv 
no necesitan estar en orden. 

El DDT puede leer en un fichero HEX en una dirección diferente de 
aquella en que el programa ha de estar preparado para llevar a cabo la 
ejecución. Por ejemplo, se puede leer el fichero HEX del BIOS en el sitio 
correspondiente a la imagen de memoria (mostrada en la figura 7-4). Hay 
dos formas de utilizar el DDT para leer en un fichero COM o HEX. $e 
puede especificar el nombre del fichero en la misma linea de orden condl 
DDT. Por ejemplo: 





A>DDT B:XYZ.HEX<cr> <- Llamada al DDT con nombre 
DDT VERS 2.0 <- de fichero 
NEXT PC 
0180 0100 <- ... y visualiza el siguiente 
byte Libre y dirección del punto de entrada 
<- ... y demanda una orden 


La ventaja de este método de cargar un fichero es que se puede 
especificar el disco lógico en que hay que buscar el fichero. El segundo 
modo de utilizar el DDT es cargar primero éste y entonces, cuando ya ha 
lanzado su mensaje, especificar el nombre de fichero y solicitar que el DDT 
lo cargue en la forma siguiente: 


—Ifilename. typ<cr> <- Entrar nombre y tipo de fichero 
RA <- Lectura en el fichero 


La orden “IT” inicializa el bloque de control del fichero por defecto en la 
página base (en la situación 005CH) con el nombre y el tipo de fichero; no 
fija el disco lógico. Si se necesita esto último, primero hay que fijar 
manualmente el primer byte del FCB por defecto en la siguiente forma: 








Lename .typ<cr> <- Especificación del nombre de fichero 
<- "S" (SET) fijar posición 5C 

005c 00 02<cr> <- Era 00, se entra 02<cr> 

0050 41 .<er> <- Entrada de "." para terminar 

=R<cr> <- Lectura en el fichero 


La posición 005CH deberá ponerse a 01H para la unidad A, a 02H para 
B, etc. 

La orden “R” leerá en los ficheros HEX para las direcciones de ejecución 
especificadas en cada linea de fichero HEX, por lo que habrá de tener 
precaución —si se olvida poner una sentencia ORG (origen) al principio del 
código fuente en lenguaje ensamblador, leyendo en el fichero HEX resultan- 
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3 04 0158 00 64 00 01 80 BE 


Nota: Los ficheros HEX no contienen blancos: en el ejemplo anterior se han dejado 
espacios vacios únicamente por claridad. 






¡0 Comprobación por suma. se forma sumando todos los valores 04, 
01, 58, 00, 64, 00, 01 y 80 y restando de 00H 


Bytes de datos a cargar en la dirección especificada 
Tipo de registro (linea), normalmente 00 

Dirección de carga de los bytes de datos de esta linea 
Número de bytes de datos en esta línea (ASM utiliza 10H bytes) 
Comienzo con marca de principio (dos puntos) 








Figura 7-6. Ejemplo de línea de fichero HEX, 


te se sobrepasará la situación 0000H, destruyendo los contenidos de la 
página base—. De forma similar, si se intentase leer en el fichero HEX para 
un BIOS, existe una gran probabilidad de escribir destructivamente sobre el 
sistema CP/M actualmente en ejecución. 

El DDT toma el tipo de fichero que se introduce como parte del 
nombre. Para tipos de fichero distintos de HEX, el DDT carga el fichero 
empezando en la situación 0100H. 

La orden “R” puede utilizarse también para leer ficheros en memoria en 
diferentes direcciones. Esto se lleva a cabo mecanografiando un número 
hexadecimal inmediatamente después de R, sin ninguna puntuación. Para 
los ficheros HEX, el número que se introduce se añade a la dirección en 
cada línea del fichero HEX y la suma se utiliza como dirección en la cual se 
cargan los bytes de datos. Los bytes de datos no cambian sino sólo la 
dirección de carga. 

Para ficheros COM, el número que se introduce se añade a 0100H y la 
suma se utiliza como dirección de inicio para cargar el fichero. 

La suma se realiza como aritmética de 16 bits sin signo, ignorando 
cualquier acarreo, de forma que se puede cargar un fichero HEX del BIOS 
en la memoria inferior utilizando la orden “R”, con lo que se denomina 
“valor de desplazamiento”. 

Si un fichero HEX se ha ensamblado para ejecutarlo en la dirección 
“ejec.”, y se necesita usar el DDT para leer en este fichero en la dirección 
“carga”, es preciso resolver la siguiente ecuación: 





Desplazamiento =carga—ejec. 
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La orden “H” del DDT configura la aritmética hexadecimal. Calcula 
presenta la suma y la diferencia entre dos valores hexadecimales. 
ejemplo, el BIOS de la figura 6-4 ha sido ensamblado para ejecutarse e 
posición OF600H, pero necesita ser cargado en la memoria en la posi 
1F80H. A continuación se indica la forma de calcular el desplazami 
correcto para la orden “R”: 


-H1F80,FÓDO<cr> <- Utilizar orden H 
1580, 2980 <- Suma, diferencia 





Así pues, para leer en el fichero HEX del BIOS denominado FI! 
4.HEX en la posición 1F80H, habría que introducir las siguientes órde 
en el DDT: 


-1FIG6-4.HEX<cr> <- Especifica nombre y tipo de fichero 
-R2980<cr> <- Carga en OF600H + 2980H (= 1F80H)> 


De esta forma, utilizando el DDT, se puede leer en los ficheros HEX 
tanto para el BIOS como para el cargador. 





[el cargador de autocarga (bootstrap loader) del CP/M 












El cargador es llevado a la memoria por el firmware basado en una 
PROM en la computadora. Carga el CCP, BDOS y BIOS y transfiere 
entonces el control al punto de entrada del arranque en frio del BIOS —a 
primera instrucción de salto del vector de saltos del BIOS. 

El cargador es un programa aislado; no puede hacer uso de las funciones 
del CP/M porque ninguna de éstas se encuentra en memoria cuando $ 
necesita el cargador. Este firmware en la PROM que ha cargado el cargador 
puede contener algunas subrutinas que pueden utilizarse por el propio 
cargador, pero esto variará de un sistema a otro. 

La figura 7-7 muestra el programa del cargador para el BIOS ejemplifi- 
cado (de la figura 6-4). Este programa se ha escrito de forma general para 
poder adaptarlo a cualquier sistema. El controlador de disco del sistema del 
ejemplo, de hecho, puede leer en múltiples sectores del disco, pero 
generalmente el código que se muestra lee únicamente un sector al tiempo, 
lo que aumenta considerablemente el tiempo requerido para cargar el 
CP/M, pero hace más general el cargador. 

Obsérvese que casi lo primero que hace el cargador es enviar a la consola 
un mensaje de conexión. Esto confirma no sólo el número de versión, sino 
que demuestra que el cargador se ha cargado satisfactoriamente, 

El código residente en PROM se ha diseñado para cargar el cargador del 
CP/M en la posición 100H, permitiendo que el programa sea depurado 
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310 
3730 
2432 
238 


0040. 


0900 
0800 
000 
1F00 


E000. 


E906 
Fsoo 


0001 
0012 
0009 
0200 
































s Ejemplo de cargador CP/M 
: Este programa está escrito desde La pista O, cabeza O, sector 1 
, por el programa PUTCPMFS. 
, Es cargado en La menoría a partir de La posición 1004 por el mecanisno 
, de carga basado en PROM que obtiene el control del procesador 
1 al conectarlo o en una puesta a cero del sistema. 
Version E0u “01% — ¡Equivalencias usadas en el mensaje de "funcionand: 
Month EQU 077 
Day EQU 124 
Year EQU 2 
Debuo Eu o ¿Fijar a distinto de cero para depurar cono un 
7 programa transitorio normal 
A 
1 La verdadera disposición del disquete es La siguiente : 
1 Pista O Sector 
1 
, 
, 
, 
; Sector 
; Equivalencias para defínir tanaño de memoria, dirección base 
; y Longitud de Los componentes del sistema. 
MemoryéSize EQU 64 ¿Número de Kbytes de RAM 
; 
1 La Longitud del BIOS debe coincidir con La declarada en el BIOS. 
1 
EQU 0900H 
EU 0800m ¿Constante 
EQU 0E00H ¿Constante 
EQU t(CCPSLength + BDOStLength + BIOSSLength) / 1024) + 1 
LenginsInsBytes EQU CCPsLength + BDOSSLength + BIOSSLenoth 
14 NOT Debug 
CCPeEntry EQU (Memory8Size — LenginsIn8K) » 1024 
ENDIF 
1 Debug ] 
CCPeEntry EQU 39e0m ¡Lectura en La dirección inferior 
JEsta dirección se escoge de manera que esté antes 
7 del área en La que inicialmente carga el DDT y 9804 
7 compone Las direcciones de forma similar a Los 
7 valores SYSGEN de manera que La imagen de memoria 
$ puede ser comprobada con DOT 
ENDIF 
BDOSHENtry EQU CCPSEntry + CCPoLengIh + 6 
BIOSSENtry EQU CCPSEntry + CCPSLengIh + BDOSSLength 





FirstsSectortonsTrack EQU 1 
LastsSectortontTrack EQU 18 
LastsSectortontMeadso EQU 9 





Características del disco 
Estas equivalencias describen Las caracteristicas fisicas 
del disquete de manera que el prograna pueda ir de un sector 


al siguiente actualizando La pista y poniendo el sector a cero 
cuando sea necesario. 


EU 512 


Características del controlador 
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En esta computadora el controlador puede escribir 
varios sectores con una sola orden. Sin embargo, 
para dar un mejor ejemplo, se muestra sólo 

la Lectura de Un sector cada vez. 


' 
1 
1 
SectorssPertñead eo 
; 


Cold boot characteristics 
3 
StarteTrack E0u ¡Valores iniciales de La imagen CP/M 
StartaSector E0u o 

Tos! EQU (LengtnslnsBytes + SectorsSize — 1) / SectorsSite 


ORG 10m 
ColdsBoo! 8Loader+ 
UMP O MainsCode ¡Entrada del cuerpo del programa principal 
¿Para claridad del programa, las estructuras 
7 de datos se muestran antés 
5 del código ejecutable 
00m ¿Retorno de carro 
DAM ¿salto de Línea 


CR,LE, “CP/M Bootstrap Loader” 
Debug 
(Debue)” 


on0A 
5665727269 
3031 

20 

3097 

Ed 

3294 


CRL 
Version 
Version 


Month 


Ed 
3832 
000A0O. 


De 
1é 
De 
ENDIF 
De 
De 
De 
De 
E 
De 
De 
De 
os 
De 


43H ¡Byte de control 5 1/4 
ASH ¿Apuntador a tabla de control 


La pista de tablas de órdenes y La DMASAddress pueden utilizarse 
como menoria de trabajo y actualizadas cuando continúa el 
proceso de carga. El sector en la tabla de órdenes no puede 
utilizarse directamente cono Lo necesita el controlador de 
disco, debe ser el número de sector sobre La cabeza especificada 
(1 =-'9) y más que el número de sector en La pista. Debe usarse, 
por tanto, una variable separada. 


Sector: StartéSector 

CommandsTable: 7) 

Unite o 

Head: o iNúmero de cabeza 0 6 1 

Tracks StarteTrack — ¡Utilizada como variable de trabajo 

Sector tonshead: o 'Convertido a controlador de bajo nivel 

y LesCountr SectorsSize a SectorssPersRead 

DMASAdGre: CCPsEMtry 

Nextastatuss DiskeStatus — rAguntador a bloque de estado siguiente 
3 si Las órdenes están encadenadas 

NextsControle DisksComtrol85 Apuntador al siguiente byte de control 
+ "si Las órdenes están encadenadas 


hainsCode: 
La 'La pila crece hacía abajo debajo del prograna 








Figura 7-7, (Continuación.) 
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0143 210301 La 


¿Funcionando 































CoD901 CALL 
OLA? 213901 LXI M/CommandsTabI ¿Apuntar el controlador de disco 
D1AC 224600 SHO CommandeBlocksS 5 “al bloque de comandos 
OLAF 0E10. MUI CySectorssTosRead ¡Fijar contador de sectores 
Load8Loop: 
0151 C07BO1 CALL ColdsBootéRead ¡Escritura de datos en La memoria 
0154 0D NS ¿Decrenentar contador 
1 NOT Debug 
0158 CADOFS. y BIOSEMtr y ¿Entrada del BIOS cuando termine La carga 
ENDIF 
15 Debug 
y o ¿Arranque caliente 
ENDIF 
0158 213201 Lar ms ¿Actualización número de sector 
OLSB 301 MI ASS 7 añadiendo el número de 
0150 86 ADO mM ; sectores al controlador 
OLSE 77 moy MA ¿Guardar resultado 
OLSF 3E13 MYI— A:LasteSectorsOnsTrack + 1 ¿Comprobación de final de pista 
0161 BE eo 
0162 C26E01 ÚNZ O NotsEndsTrack 
0165 2601 MV M.FirstsSectorsOnsTrack ¿Sí, puesta al comienzo 
0167 2A3601 LM Track FActualización número de pista 
DLSA 23 CO] 
0168 223601 SHO Track 
NotsEndeTracks 
OLGE 2A3A01 LMLD DiASAddress ¿Actualización dirección de DMA 
0171 110002 EXI D,SectoriSize » SectorstPersñead 
0174 19 DAD DD 
0173 223401 SHO DMASAddress 
0178 C35101 ÍNP O LoadéLoop ¡Lectura del bloque siguiente 
ColdsBo0tsRead: En este punto La descripción de La opera 
que se requiere está en Las variables 
5 contenidas en la tabla de órdenes a lo 
5 Largo de la variable de sector 
0178 CS Pus a ¿Guardar contador de sector en C 
Cambiar esta rutina para coincidir con el controlador de disco utilizado = 
O17C 0600, mr Bo ¿suposición de cabeza 0 
OLE 343201 DA Sector ¿Obtención de sector requerido 
0181 AF mov tención de copia de él 
0182 FEOA cer 'omprobación de cabeza 1 
0184 DABBOL Je ¿No 
0187 D609 SUL LasteSectorsonteadsO — ¡Para cabeza 1 
0189 Ar moy C,A ¿Guardar copia 
OLGA 04 PS FActivar cabeza 1 
0188 78 mov AB ¡Obtención cabeza 
O18C 323501 STA Mead 
o18F 79 moy ASC ¡Obtención sector 
0190 323701 STA SectorsOnsHead 
0193 214500 XI MiDisk8CONtrol8S ¿Activación del controlador 
0196 3680 MUI m80n 
Hal t8For8Bo0t8CompLetes 
0198 7E CA] ¡Obtención byte de estado 
0199 B7 OS ¿Comprobación de completo 
DI9A 029801 ÍNZ Mak taFOrsBootsComplete ¿No 
$, comprobación de errores 
0190 344300 LOA DiskbStatus 
OLMO FESO cer 80m 
OLAZ DAA7OL Je ColdsBo0tsError ¿SÍ, ha ocurrido un error 
Final de La rutina de Lectura - 











Figura 7-7. (Continuación.) 
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OJAS CL Poe a ¿Recuperar contador de sectores en € 
OlAS C9 Rer 
1 
ColdsBO0tsErrors 
OA7 218001 LXI M,Cold8Bo0t8ErroréMessage 
OLAA CDD901 CALL Disp ¿Salida de mensaje de error 
OJAD C34001 e ¿ReiniciaLizar cargador 
ColdsBoo! 
O1BO ODOAA26FSF CR,LF, “Bootstrap Loader Error = retrying...".CR,LF,O 
1 
: Equates for Terminal Output 
9001 = EU 01m 
0002 = EU 02 
9001 = Terminals0utputiReady EQU 0000900018 
Displaytesrages ¿Visualiza en la consola el mensaje especificado 
de bytes a Lanzar 
Termina el mensaje un byte 004 
0109 7E moy Am biención byte siguiente del mensaje 
OIDA 87 ORA A, ¿Comprobación de terminal 
0108 Ce RZ ¿S1, retorno a rutina de Llamada 
O1DC AF moy CA ¿Prepare para salida 
DutputeNotsReadys E 
O1DD DBO1 1N ¿Comprobación de preparado para salida 
O1DF ES01 ANI 
O1E1 CADDO! yz No, esperar 
OIEA 79 moy Obtención de carácter de datos 
LES 0302 our ¿Salida a pantalla 
17 23 10% ransferir el byte siguiente del mensaje 
O1ES C30901 e Bucle hasta salida del mensaje completada 
¿El cargador basado en PROM comprueba 
5. que Los caracteres "CP/M" estén en el sector 
3 de autocarga del disquete antes de transferir 
7 el control a éste 
0280 ORO 2E0m 
O2E0 43502F4D DB 2Cpmo 
02E4 END ColdeBoot8Loader 





Figura 7-7. (Continuación.) 


como si se tratase de un programa transitorio normal, aunque con menos 
cambios en la dirección en la que carga la imagen del CP/M del disco. 
Naturalmente, este mecanismo no es de gran ayuda si el CP/M se introduce 
por primera vez en un sistema de cálculo. Sin embargo, resulta muy útil si 
se necesita modificar el cargador o añadir la capacidad de arrancar el 
sistema desde un nuevo tipo de unidad de disco. 

En este caso, el código del cargador deberá cargarse en la posición 
0780H, no en la normal 0980H, porque el cargador toma un sector 
completo de 512 bytes (200H). El mismo principio se aplica para determi- 
nar el valor del desplazamiento que se ha de utilizar con la orden “R” del 
DDT a fin de leer el fichero de autocarga HEX, es decir: 


Desplazamiento=dirección de carga—dirección de ejecución 
En este caso, los valores son los siguientes: 
0680H=0780H —0100H 
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Utilización de MOVCPM para reubicar el CCP y el BDOS 








MOVCPM construye una imagen en memoria del CP/M en los lugares 
correctos para SYSGEN, pero con las instrucciones modificadas para 
ejecutar en una dirección específica. Dentro de MOVCPM existe no sólo 
una réplica completa del CP/M, sino también suficiente información para 
comunicar a MOVCPM qué bytes de qué instrucciones necesitan cambiarse 
cada vez que la dirección de ejecución de la imagen necesita ser transpor- 
tada. 

MOVCPM, como lo edita Digital Research, contiene cargador y el BIOS 
para una computadora Intel MDS-800 además del CCP y el BDOS 
genéricos. A no ser que se posea un MDS-800, todo lo que se utiliza es el 
CCP y el BDOS. Algunos fabricantes han modificado MOVCPM para que 
contenga el cargador y el BIOS correctos para sus propias computadoras; 
para comprobar si se adaptan a una computadora determinada, se aconseja 
consultar la documentación correspondiente. 

Cuando se llama a MOVCPM, se tienen las siguientes opciones: 


e MOVCPM<cr> 
MOVCPM volverá a colocar su copia interna del CP/M al principio 
de la memoria disponible y entonces transferirá el control a esta 
nueva imagen del CP/M. A menos que el fabricante haya incluido el 
BIOS correcto en el MOVCPM. Utilizando esta opción se puede 
originar un estropicio inmediato del sistema. 


e MOVCPM nn<cr> 
Similar a la opción anterior, excepto que MOVCPM supone que hay 
disponibles nnK bytes de memoria y volverá a colocar la imagen del 
CP/M al principio de ella antes de transferir el control. También aquí 
caerá el sistema a menos que se halle instalado el BIOS correcto en 
MOVCPM. 


e MOVCPM « «*<cr> 
MOVCPM ajustará todas las direcciones interrias dentro de la imagen 
de CP/M de forma que esta imagen pueda ejecutarse al principio de la 
memoria disponible, pero en lugar de poner dicha imagen verdadera- 
mente al principio de la memoria, MOVCPM la dejará en la memoria 
inferior, en el sitio correcto para que SYSGEN la escriba en un disco. 
La orden SAVE puede también guardar la imagen en un disco. 


e MOVCPM mn *<cr> 
MOVCPM procede como en el caso anterior para la opción “* +” 
excepto que la imagen del CP/M se modifica para ser ejecutada al 
principio de nnK. 
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MOVCPM tiene un problema fundamental. El valor nn indica que 
principio de la memoria disponible está calculado, suponiendo que el BI 
es pequeño —menos de 890 (380H) bytes—. Si el BIOS es mayor (como 
el caso con el ejemplo de la figura 6-4), entonces habrá que reducir el 
de “nn” artificialmente. 

La figura 7-8 muestra la relación existente entre el tamaño del BIOS y 
valor de “nn” para utilizar con el MOVCPM. Muestra también, 
diferentes longitudes del BIOS, la dirección base de éste, el valor 
desplazamiento que ha de usarse en el DDT para leer en el BIOS en h 
situación 1F80H (preparatoria para utilizar SYSGEN o PUTCPM 
escribirlo), y también las direcciones base para el CCP y el BDOS, la 
dirección base de este último indica la cantidad de memoria disponible par. 
cargar programas transitorios, porque el CCP puede ser reescrito destructi- 
vamente si es necesario. 

Los números de la figura 7-8 están basados en la suposición de que se 
tengan 64K de memoria en la computadora. Si no es este el caso, e. 
procederá de la forma siguiente: 





1. Convertir el total de memoria del sistema a hex. Recuérdese que 1K 
es 1.024 bytes. 


. Determinar la longitud del BIOS en hex. 





BIOS BIOS DDT MOVCPM cer BDOS 
Longitud Base Desplazamiento “an 





8980 8000 





Aparte del valor “nn' de MOVCPM, todos los demás valores son hexadecimales 


Direcciones del CP/M para diferentes longitudes de BIOS. 
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3. Localizar la linea de la figura 7-8, que muestra una longitud de BIOS 
igual o mayor que la longitud del BIOS que se utilice. 


4. Utilizando la orden “H” del DDT, calcular la dirección base del 
BIOS utilizando la fórmula: 
Memoria del sistema—longitud del BIOS de la figura 7-8 

5. Hallar la línea en la figura 7-8 que muestra la misma dirección base 
del BIOS que el resultado del cálculo anterior. Utilizar esta línea 
para derivar los otros números relevantes. 


Es de gran ayuda utilizar el DDT para examinar la imagen del CP/M en 





memoria a fin de comprobar que todos los componentes están correcta- 
mente situados y, en el caso del CCP y del BDOS, correctamente reubi- 


cados. 


La figura 7-9 muestra un ejemplo de diálogo de consola en el cual el 
DDT se utiliza en primer lugar para examinar la imagen en memoria 
producida por MOVCPM y en segundo lugar para examinar la imagen 


construida en la utilidad PÚTCPMF que se muestra en la figura 7-5. 





Llamada a MOVCPM pidiendo un sistema '6XK' y 
suprimiendo La imagen de La memoria. 

A>Hoysem 63 micrz 

CONSTRUCTINO 3k CP/M vers 2.2 

READY FOR “SYSOEN" OR 

"SAVE 34 CPM63.COm" 


Almacenar La inagen a partir de La posición 1004. Por 
convenio el nombre del fichero es CPMan,COM, de 
manera que en este caso será CPM63.COM. 

ArSave 34 cpmód.comterz 


Llamada a DDT y petición de que Lea en CPM63.COM. 
Adgdt cpmés.comier> 

DOT VERS 2.2 

NEXT PC 

2300 0100 





Visualizar La menoria para mostrar Los primeros bytes 
del CCP. Nótense Las dos instrucciones IMP (C3H) 
seguidas por 7FH, 00H, 204's y La infornación del 
Copyright de Digital Research. Esto identifica al 
programa como el CCP. Nótese que La prinera 
instrucción JMP es a La posición 35CH en el CCP =- de 
donde se infiere La dirección base del CCP --. En este 
caso el JMP es a La posición E3SC, puesto que esta 
versión del CCP se ha configurado con base de 
ejecución en EDO0H. 

4980, SEfesrz 

oseo La Sc ES Ca 38 EX 7F 00 20 20 20 20 20 20 20 e 

0990 20 20 20 20 20 20 20 20 43 4F 50 59 52 49 47 COPYRIGH. 

09AD 54 20 28 43 29 20 31 39 37 239 2C 20 44 49 47 49 1 (C) 1979, DIGI 

0980 54 41 4C 20 52 45 53 45 41 52 43 48 20 20 00 00 TAL RESEARCH .. 

09co 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 








ds 








Visualizar Los primeros bytes del BDOS. Nótese La 
instrucción JMP a La posición 1186. Es La instrucción 
a la que se transfiere el control desde el JMP en la 
posición 5. 

91180, 118Fcerz 

1180 06 16 08 00 09 85 CI 11 ES 99 ES AS ES AB ES Bl .. 








Figura 7-9. Utilización del DDT para comprobar imágenes del CP/M. 


= 
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de forma no ambigua 
error ASCII. 


existen algunos mensajes de 


Te1230,12és 
1230 ES 21 
1240 72 72 
1250 $3 74 
1260 20 52 


ES ES C3 00 00 42 64 6F 732045. Bdos E 
20 20 3A 20 24 42 61 64 20 53 65 rr On : SBad Se 
353 $5 SC 65 63 74 24 46 69 60 £S clortSelectaFile 
ES CD C9 E9 3A 42 EB C6 41 32 06 R/08....0B..A2, 


Visualizar Los primeros bytes del BIOS. 

Nótese el vector de saltos del BIOS -- una serie de 

instrucciones C3M ==, Normalmente La primera instrucción 

del vector se utiliza para deducir La dirección base 
FSOOM. Pero no existe una 

regla fija que diga que el programa de arranque en 

frío debe estar cerca del vector de saltos del BIOS 

esto es sólo una guia aproximada. 

















grosos 
1F80 C3 BS FS C3 C3 FS C3 él F7 CA 64 F7 CA GA F7 Ca 
1FSO 6D F7 C3 72 F7 C3 73 F7 C3 78 F7 Cd 7D F7 CI Ay 
AFAO FJ C3 AC F7 CO BB F7 CO Cl F7 CI CA FI CI JO F7 
1FBO C3 BI F7 82 FS 00 00 00 00 00 00 SE F8 73 Fe 0D 
AFCO F9 EE FS 82 FS 00 00 00 00 00 00 6E FS 73 F6 20 
1FDO F9 1D F9 82 F6 00 00 00 00 00 00 6E FS 73 FS 65 
AFEO F9 4C F9 82 FS 00 00 00 00 00 00 SE FO 73 FS 9A 
AFFO F> 78 F9 1A 00 03 07 00 F2 00 3F 00 CO 00 10 00 
2000 02 00 01 07 0D 13 19 03 08 11 17 03.09 OF 18.02 
2010 08 0E 14 1A 06 0C 12 18.04 DA 10 16 0D OA 0A 3%. LadiS 
2020 33 $B 20 43 50 2F 4D 20 76 63 72 72.20.22 2£ 32 0k CPI vers 2.2 
2030 0D OA 00 31 00 01 21 9C FS CD D3 F7 AF 32 04 00 colo ctociccns:. 





Como contraste, cargar DDT y realizar petición de 
carga del programa PUTCPMFS.COM. 





Visualizar el cargador especial que comienza en la 
posición 07804 (compárese con el cargador MDS-800 que 
está en 09804). Nótese el mensaje de 





9780, 7at<er> 
0780 $3 40 ÓL 00 0A 43 50 2F 4D 20 42 6F 6F 74 7374 .8 
0790 72 61 70 20 AC éF él 64 65 72 0D 0A 56 637273 ra 
O7AD 69 6F 6E 20 30 31 20 30 37 2F 32 34 2F 28 32 0D ion 01 07/24/82. 


CP/M Bootst 
Loader. Ver 





Confirmar que el CCP se ha cargado en el Lugar 
correcto, Comprobación de La dirección de La prinera 
instrucción JHP (OESSCH) . 

9980, IoLicrz 

10980 €3 50 ES C3 58 ES 7F 00 20 20 20 20 20 20 20 20 . A. 

0990 20 20 20 20 20 20 20 20 43 AF 50 59 52 49 47 48 COPYRIOM 

O9A0 54 20 28 43 29 20 31 39 37 39 20 20 44 49 47 49 T (C) 1979, DIGI 

09B0 54 41 4C 20 52 45 53 45 41 52 43 48 20 20 00 00 TAL RESEARCH. 


Confirmar que el BDOS está también en su Lugar. 








741180, 1181<erz 

1180 06 16 00 00 09 85 C3 11 ES 99 ES AS ES AB ES Bl . 

Contirmar que el BIOS se ha cargado en el Lugar 

correcto. Comprobación del primer JMP para tener una 

idea de la dirección base del BIOS, Nótese el mensaje 
funcionando", 








FE C3 62 FS C3 78 Fa Ca 86 Fe c3 
C3 CS FS C3 BS FB C3 OE FB C3 al 
FB C3 48 FB C3 DE FB C3 FS FB C3 94 FS 
ED 06 00 00 00 42 6E 25 DF 01 B6 DE 02 
43 50 2F 4D 20 32 2€ 32 2£ 30 30 20 20 8..CP/M 2.2.0 0 
35 2F 38 32 0D OA DA 53 69 £D 70 6C 65 7/15/82...Simple 
AF 53 0D OA OA 44 69 73 68 20 43 6F SE BIOS...Disk Con 
75 72 61 74 69 6F SE 20 3A 0D 0A 0A 20 figuration E... 

20 41 3A 20 30 2€ 33 35 20 4D 6279 74 A: 0.35 Moyt 
22 20 46 $C SF 70 70 79 0D 0A 20 20 20 e 5" Floppy. 

3A 20 30 2£ 33 35 20 4D é2 79 74 65 20 Br 0.25 Mbyte 

AS $C 6F 70 70 79 0D 0A DA 20 20 20 20 5" Floppy... 














Figura 7-9. (Continuación.) 
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Colocación del conjunto 








La figura 7-10 muestra un diálogo de consola, anotado, para la 
generación completa de un nuevo sistema CP/M. Obsérvese que los 
nombres de fichero siguiente aparecen en el diálogo: 


BIOS1.ASM Figura 6-4. 
PUTCPMFS.ASM Figura 7-5. 
BOOTFS.ASM Figura 7-7. 





Ensamblaje del cargador con el código 
fuente y fichero HEX en La Unidad C: no 
Listado de salida, 


Co0nn eoti Sucesso 

CRADLE ER 2.0 

saca 

0%aN use racron 

Ett 
Ensamblaje del prograna PUTCPNS (que 
ESiriDe 28/M en eLCaieto) con el código 
Fuente y Hlchero MEN en la imitado 
(tado de sat. 





Chasm putcpmí5. cozterz 

CP/M ASSEMBLER — VER 2. 

0108 

003H USE FACTOR 

END OF ASSEMBLY 
Ensamblaje del BIOS con el código 
fuente y fichero MEX en La unidad C: no 
Listado de salida. 

Chasm biosl.cerserz 

P/N ASSEMBLER — VER 2.0 

FESC 

O1IM USE FACTOR 

END OF ASSEMBLY 





Montado de La inagen de CP/M, Carga de 
DOT y petición de Lectura del fichero 





Coddt cemód.comterz 
DOT VERS 2.2 

NEXT PC 

2300 0100 


Indicar nombre de fichero PUTCPMFS.MEX 
y leerlo sin ningún desplazamiento (se 
cargará en La posición 1004 debido al 
ORG 100H que contiene). = 
iputcpmfS.hex<cr>. 










Indicar nombre de fichero BOOTFS.HEX y 
Leerlo con desplazamiento 680H para que 
se cargue a partir de 780M (contiene un 
ORG 100N también). 


Tibootis.hexcero. 
CTA 
NEXT PC 
2900 0100 








Figura 7-10. Diálogo de consola para construcción de sistema. 







224  CP/M Manual para programadores 






Indicar nombre de fichero de BIOS.HEX y 
Leerlo con un desplazamiento de 2980 de 
manera que se cargará en 1F804 

(contiene un ORG OFSOOM) - 





salida desde DDT yendo a La posición 
SO00H y ejecutando un arranque 
caliente. 















Guardar en el disco La imagen completa 
de CP/M. Guardando 40 páginas de 256 
bytes desde La posición 100H hasta 





Crave 40 putcemt5,comcer2 
Cargar y ejecutar el programa PUTCPMFS.. 


Coeutepmt5 


PUTCPMFS "funcionando" 
Put CP/M on Diskette 
Version 01 07/24/82 
y escribe La imagen de CP/M en el 


disco. 
0 


Figura 7-10. (Continuación.) 
















Mejoras del BIOS 
Entrada/salida de caracteres 
Estructuras de datos 
Entrada/salida de disco 

Añadidos normales para el CP/M 
Un BIOS mejorado 


Escritura de un BIOS 
mejorado 


Este capítulo describe las formas en que puede mejorarse el BIOS para 
hacer más fácil, más rápido y más versátil el uso del CP/M. 

Colóquese un BIOS estándar a trabajar en la computadora y entonces 
instálense las modificaciones adicionales. Aunque se puede escribir un BIOS 
mejorado desde el principio, llevará mucho más tiempo conseguir que 
funcione correctamente. 

Al final de este capítulo se incluye una lista completa de las mejoras del 
BIOS. Es bastante larga: aproximadamente 4.500 líneas de código fuente, 
con comentarios extensos y nombres de longitud variable para hacerla más 
clara. 

Las secciones siguientes describen los conceptos principales involucrados 
en la lista de mejoras del BIOS. 
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Mejoras del BIOS 








Las mejoras del BIOS se dividen en dos clases: las que añaden nuevas 
capacidades y las que extienden características ya existentes. 

Algunas mejoras van acompañadas normalmente de programas de 
utilidad que permiten seleccionar la opción mejorada desde la consola. Por 
ejemplo, cuando el BIOS se ha mejorado para que contenga un reloj de 
tiempo real, se necesita un programa de utilidad para poner el reloj en hora. 
Otras mejoras no requieren el soporte de utilidades. Por ejemplo, si los 
controladores del disco se han mejorado para leer y escribir datos más 
rápidamente, la mejora es “transparente”. Como usuario, uno se beneficia 
de los resultados de la mejora sin ser consciente de ella, 

Enfocado de la forma más simple, el BIOS se enfrenta con dos amplias 
clases de entrada/salida: 













Entrada/salida de caracteres 
Incluye la consola, los auxiliares y los dispositivos de listado. 


Entrada/salida de disco 
Esta puede acomodar varios tipos de discos flexibles y rígidos. 


Las mejoras de estas áreas no cambian fundamentalmente la forma en 
que el BDOS y el CCP interaccionan con estos dispositivos. Por el 
contrario, las mejoras favorecen la forma en que los controladores de los 
dispositivos se enfrentan con éstos. Pueden mejorar la velocidad de manipu- 
lación de datos, la forma de tratar los dispositivos externos o el control del 
usuario sobre el comportamiento del sistema. 

El BIOS mejorado del ejemplo posee capacidades que no se encuentran 


en los sistemas CP/M estándar. Estos pueden agruparse en varias catego- 
rías principales: 


Entrada/salida de caracteres 
Esta área es probablemente la que más se beneficia de las mejoras. 
Esto se debe parcialmente a que una amplia cantidad de dispositivos 
periféricos necesitan ser soportados y en parte a que esta es el área 
más visible de interacción entre el programador y su computadora. 
Cualquier mejora que se realice aquí repercutirá inmediata y 
obviamente en el usuario. 


Manejo de errores 
El manejo de errores del CP/M es alarmante por su propia simplici- 
dad. El manejo de errores mejorado proporciona más información 
acerca de la naturaleza del fallo y entonces proporciona las opciones 
de reintentar la operación ignorando el error o abortar el programa. 
Este tópico se trata detalladamente en el capítulo 9. 
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Sistematización de fecha y hora 

Esta es la propiedad de mantener un reloj en hora y la fecha actual. 
Esto permite a los programas fijar y acceder a fecha y hora. Además, 
el sistema puede reaccionar al paso del tiempo y se pueden trasladar 
ciertas operaciones en el terreno del tiempo. Por ejemplo, se pueden 
fijar límites máximos en el número de segundos o milésimas de 
segundos que deberá ocupar cada operación y preparar medidas de 
emergencia si la operación requiere un tiempo demasiado largo. 


Asignación de dispositivos lógicos a fisicos 
La asignación de dispositivos lógicos a fisicos del CP/M es muy 
sencilla. Con las mejoras se puede utilizar cualquier dispositivo de 
entrada/salida de caracteres como la consola del sistema y enviar 
datos a varios dispositivos al mismo tiempo. 


Entrada/salida de disco 

El CP/M conoce sólo el sector de 128 bytes. Incluso con las rutinas 
de desbloqueo mostradas en la figura 6-4, el rendimiento total del 
disco puede ser lento. Las prestaciones pueden mejorarse de forma 
impresionante por medio de la “memoria intermedia de pista” (en la 
cual se leen pistas enteras y se escriben al mismo tiempo) o 
utilizando una memoria de disco (es decir, utilizando amplias áreas 
de RAM como si fuera un disco). Esto supone un coste en la medida 
en que supone aumento de memoria. 


Ficheros públicos 
El sistema de número de usuario del CP/M necesita progresar para 
funcionar correctamente en conjunción con grandes discos rigidos. 


Preservación de las opciones fijables por el usuario 


Un producto secundario de la adición de caracteristicas al BIOS es que 
muchas de ellas poseen opciones que pueden alterarse bien desde la consola 
utilizando un programa de utilidad o desde uno de los programas. 

Cada una de estas opciones, una vez fijadas según se prefieran o según 
los requerimientos del hardware, no cambian normalmente de un día a 
otro. Por consiguiente, el BIOS deberá ser diseñado de forma que las 
opciones fijadas por el usuario puedan “congelarse” o preservarse en el 
disco utilizando el programa de utilidad FREEZE. Todas las variables que 
recojan estas opciones están reunidas en una sola área y después esta área se 
escribe en el disco. 

Esta área se denomina bloque de configuración. En la práctica existen 
dos bloques de configuración: uno a corto plazo y otro a largo. El bloque a 
corto plazo no es preservable —se pueden fijar opciones en él, pero no 
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pueden preservarse después de desconectar la computadora—. La fecha di 
sistema, por ejemplo, se fija normalmente cada vez que se conecta la 
computadora y, por consiguiente, se conserva en el bloque a corto plazo. Bl 
número de baudio de la impresora, por el contrario, se conserva en dl 
bloque a largo plazo, por lo que puede guardarse de forma permanente. 

Un punto de entrada extra del BIOS, la dirección CB$Get$, se ha 
construido en el BIOS mejorado de forma que un programa de utilidad 
pueda situar variables en ambos bloques de configuración. Por ejemplo, 
cuando una utilidad necesita saber dónde se encuentra la fecha en ka 
memoria, llama a la dirección CB$Get$ utilizando un número de código 
(específico para la fecha) en un registro. La dirección CB$Get$ devuelve la 
fecha a la memoria. Si se produce una nueva versión del BIOS con la fecha 
en un lugar diferente, la dirección CB$Get$ proporcionará la dirección 
correcta, aunque diferente, devolviéndola al programa de utilidad. 

Otras dos variables a las que puede acceder la dirección CBSGeS 
pertenecen al propio bloque de configuración. Una es la dirección relativa 
de inicio del bloque de configuración a largo plazo. La otra es la longitud 
del bloque a largo plazo. Estas son utilizadas por la utilidad FREEZE 
cuando se necesita preservar el bloque a largo plazo en un disco. FREEZE 
deberá: (1) leer en los sectores que contienen el bloque a largo plazo del 
disco, desde la imagen del BIOS del CP/M en el área reservada del disco, (2) 
copiar la versión residente en RAM del bloque a largo plazo sobre la 
versión imagen del disco y, entonces, (3) escribir los sectores en el disco. 

La figura 8-1 muestra cómo aparece el bloque a largo plazo en el disco y 
en la memoria. El tamaño del CCP y del BDOS no cambia aun cuando lo 
haga el BIOS, Por consiguiente, el sector que contiene el comienzo del BIOS 
no cambiará. La fórmula (utilizando números decimales) es la siguiente: 


































Sector de comienzo del BIOS+INT(dirección relativa del LTB / 128) 


da, por tanto, el número de comienzo del sector que se ha de leer. El 
número de sectores que se han de leer se calcula como sigue: 


(Longitud del bloque a largo plazo+127) / 128 


La dirección relativa y la longitud pueden utilizarse para situar el bloque a 
largo plazo en el BIOS que se ejecuta en RAM. 





Entrada/salida de caracteres 





Los controladores de entrada/salida de caracteres, mostrados en el BIOS 
del ejemplo de la figura 8-10, se han mejorado para que posean las 
siguientes características: 
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e Un solo juego de subrutinas controla todos los dispositivos de 
procesamiento de caracteres. 
e Preservación de las opciones-estables. 


e Redireccionamiento flexible de entrada/salida entre dispositivos lógi- 
cos y fisicos. 


e Controladores de entrada con control de interrupción para obtener la 
capacidad de que el usuario pueda ““mecanografiar en avance”. 





Bloque de configuración a largo plazo Límites del sector 





cer BDOS BIOS 
A 
Imagen 
del CP/M 
en el disco 
SS 





Dirección relativa en bloque —————— 
a largo plazo desde 
el principio del BIOS 





Longitud del bloque de configuración 
Memoria 


Comienzo del BIOS 








BDOS 
8 Copia de la versión residente en RAM 
ccP 
Disco Disco 
O Escritura 
en el disco 





nd 


Bloque 


y Memoria intermedia de servicios FREEZE 
de configuración 











Figura 8-1. Almacenamiento del bloque de configuración a largo plazo. 
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Juego único de subrutinas de control 


e Soporte de varios protocolos distintos para evitar la pérdida de dat 
durante la salida a alta velocidad a las impresoras o otras 0] 
ciones. 


e Entrada forzada de caracteres en el flujo de entrada de la cons 
permitiendo órdenes automáticas. 


e Conversión de las teclas de función del terminal en hileras de 
caracteres útiles, 


e Habilidad para reconocer la salida de “secuencias de escape” a 
consola y para tomar acciones especiales como resultado de ello. 


e Habilidad para leer la hora y fecha actuales como si estuvi 
mecanografiadas en la consola. 


e “Límite de tiempo” señalando cuando la impresora está ocupada 
durante demasiado tiempo. 


Cada una de estas características se trata en las secciones siguientes, 
como introducción al ejemplo de programa. 





En los siguientes ejemplos se utiliza un conjunto único de subrutinas 
para procesar la entrada y salida de todos los dispositivos físicos del 
sistema. 

Esto se ha hecho posible mediante la agrupación de las caracteristicas de 
cada dispositivo individual en una tabla denominada tabla de dispositivos. 
Por ejemplo, para obtener un carácter del dispositivo de consola en curso, 
la dirección de esta tabla de dispositivos se enviará a las subrutinas. Estas, a 
su vez, utilizarán los valores adecuados de la tabla de dispositivos cuando 
necesiten acceder a un número de puerto o a un único atributo de dicho 
dispositivo. 

En nuestro ejemplo, los controladores suponen que todos los dispositi- 
vos fisicos utilizan entrada/salida serie. Para soportar un dispositivo con 
entrada/salida paralelo, se necesitaría extender la tabla de dispositivos para 
incluir un campo que hiciera capaces a los controladores de detectar si están 
operando en un dispositivo serie o paralelo. Probablemente también habria 
que añadir rutinas diferentes de inicialización de dispositivo y de entrada/ 
salida, más adecuadas a los problemas de tratar con puertos paralelos. 
La estructura de la tabla de dispositivos consiste en una serie de 
instrucciones de equivalencia (EQU). Estas definen el desplazamiento 
relativo de cada campo de la tabla. Todas las definiciones están expresadas 
refiriéndose al campo precedente de forma que se pueden insertar campos 
adicionales sin revisar las definiciones para todos los demás campos. 
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Casos individuales de tablas de dispositivos están definidas como una 
serie de líneas de definición de bytes (DB) y de definición de palabra (DW). 
Los controladores reciben la dirección base de la tabla de dispositivos 
siempre que necesiten hacer algo con un dispositivo. Añadiendo la dirección 
base a la dirección relativa (definida por la equivalencia), los controladores 
pueden determinar la dirección real de memoria que contiene el valor 
requerido. Los contenidos detallados de la tabla de dispositivos se describen 
más adelante en este capitulo. 


Opciones permanentes 


Las únicas opciones que necesitan ser preservadas en el bloque de 
configuración a largo plazo son los valores utilizados para inicializar los 
chips de hardware. Las demás opciones pueden fijarse durante la ejecución 
automática del fichero de órdenes cuando el CP/M se carga por primera 
vez. 


Redireccionamiento de entrada/salida entre dispositivos 


Como se recordará, el BDOS sólo “está enterado” de los dispositivos 
lógicos, consola, lectora, perforadora y de listado. Utilizando el IOBYTE en 
la posición 0003H en conjunción con la utilidad STAT, se puede volver a 
dirigir el BDOS para asignar los dispositivos lógicos a mecanismos físicos 
específicos. Sin embargo, el redireccionamiento proporcionado por CP/M 
es más bien primitivo. Permite únicamente cuatro dispositivos físicos por 
dispositivo lógico. La entrada y la salida de un dispositivo lógico siempre 
deberán provenir del mismo dispositivo físico. Los datos de salida sólo 
pueden ser enviados a un único destino, o (utilizando el CONTROL-P) a la 
consola y al mecanismo de listado. 

El sistema de la figura 8-10 soporta hasta 16 dispositivos físicos. Cada 
uno de ellos puede actuar como consola, lectora, perforadora o dispositivo 
de listado. La entrada puede venir de cualquier dispositivo individual. La 
salida puede ser enviada a cualquiera de los dispositivos o a todos ellos. La 
entrada y salida de cada uno de los dispositivos lógicos están reparadas —es 
decir, la entrada de consola puede venir del dispositivo físico X, mientras 
que la salida puede ser enviada a los Y y Z. 

El redireccionamiento de los dispositivos puede darse de forma dinámi- 
ca, tanto desde el interior de un programa como utilizando un programa de 
utilidad del sistema. Por ejemplo, si se tiene algún dispositivo de entrada 
especial, el programa puede conectarse momentáneamente para leer entra- 
das de este dispositivo como si fuera la consola, y entonces volver atrás para 
leer datos de la consola “real”. 
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Controladores de entrada con control de interrupción 


Este esquema de redireccionamiento se completa definiendo una palal 
de 16 bits, denominada palabra de redirección, del bloque de configuracióna 
largo plazo para cada uno de los siguientes dispositivos lógicos: 


e Entrada de consola. 

Salida de consola. 

Entrada auxiliar (lectora/perforadora). 

Salida auxiliar (lectora/perforadora). 

Entrada de listado (la impresora necesita también enviar datos). 
Salida de listado. 


Cada bit de una palabra de redirección dada está asignado a un 
dispositivo físico. Para la entrada, los controladores utilizan el mecanismo 
correspondiente al primer bit 1 que encuentran en la palabra de nueva 
dirección. Para la salida, los controladores envían el carácter para que sa 
sacado a todos los dispositivos para los que se ha fijado a uno el bil 
correspondiente. 

El programa de ejemplo no selecciona un controlador diferente para 
cada bit fijado a uno —selecciona una tabla de dispositivos especifica y 
entonces transfiere la dirección base de esta tabla al controlador común 
utilizado para todas las operaciones de caracteres. 


Con un BIOS de CP/M estándar, los datos carácter se leen desde los 
chips de hardware sólo cuando el control se transfiere a las subrutinas 
CONIN o READER. Si estos datos carácter llegan más de prisa de lo queel 
BIOS puede manejar, ocurre una circulación excesiva de caracteres y se 
pierden caracteres de entrada. 

Usando interrupciones, el hardware puede transferir el control a la 
rutina de interrupción adecuada siempre que llegue un carácter de entrada. 
Esta rutina lee el carácter dato y lo sitúa en un área de memoria intermedia 
para esperar la próxima llamada CONIN o READER, que obtendrá el 
carácter de esta memoria y lo introducirá en el flujo de datos de entrada. 

Los programas de usuarios y el CCP “no piensan” en este proceso, 
percibiendo sólo que existen caracteres de datos disponibles. Sin embargo, 
los usuarios serán conscientes del proceso; tendrán la posibilidad de 
introducir caracteres de datos desde el teclado antes de que el programa esté 
dispuesto para ello. Esto da a esta técnica otro nombre: ““mecanografiado 
en avance”. Aunque esta técnica no altera la velocidad de ejecución de 
cualquier programa que funcione con CP/M, crea la ilusión de mayor 
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velocidad, porque las pausas se desvanecen completamente cuando un 
programa acepta datos. El usuario puede introducir datos a la velocidad 
que marca el trabajo o el pensamiento sin tener en cuenta la velocidad a la 
que el programa puede aceptarlos. 

El ejemplo contiene el programa necesario para manejar los caracteres 
que llegan bajo control de interrupciones. Para que sea de aplicación 
general, el programa supone una estructura de interrupción “plana”: es 
decir, todas las interrupciones de entrada de caracteres originan que el 
control se transfiera a la misma dirección de la memoria. La dirección está 
determinada por la arquitectura de interrupción del hardware. 

Los esquemas de interrupción más simples utilizan las instrucciones de 
recomienzo (restart, RST) construidas en el chip CPU 8080. En el esquema 
RST, el hardware externo interrumpe lo que el chip de CPU está haciendo y 
fuerza una de las ocho instrucciones del RST dentro del procesador. Cada 
instrucción RST produce que el procesador ejecute lo que, de hecho, es una 
instrucción CALL a una dirección previamente determinada de la memoria. 

En sistemas más complicados se utilizará un chip de control de 
interrupción específico (tal como el Intel 8259A). Además, para procurar 
niveles de prioridad a las interrupciones de manera muy sofisticada (y 
complicada), el controlador de interrupciones puede transferir el control a 
direcciones diferentes, dependiendo del dispositivo fisico que causa la 
interrupción. Realiza esto forzando a la CPU a que ejecute una instrucción 
CALL a una dirección diferente para cada dispositivo. 

En ambas arquitecturas, es responsabilidad del autor del BIOS iniciali- 
zar todos los chips del hardware, de forma que la interrupción ocurra en las 
circunstancias correctas. El programador del BIOS también deberá situar 
las instrucciones en los sitios correctos de la memoria para recibir el control 
de una instrucción RST o de la instrucción CALL inventada que emite el 
controlador de interrupciones. 

Algún hardware requiere que la subrutina de servicio de interrupciones 
le informe tan pronto como la interrupción ha sido atendida y se ha 
introducido el carácter. El controlador del ejemplo realiza esta tarea, 

Esta sección trata el uso de las interrupciones para los controladores de 
entrada, no para los de salida. Hoy en día las microcomputadoras pueden 
enviar datos mucho más rápidamente que los elementos periféricos pueden 
manejarlos. Después de algunos minutos de salida, la computadora habrá 
llenado cualquier memoria intermedia de tamaño razonable —y desde este 
punto de vista no existe ninguna ventaja en tener un sistema de salida con 
memoria—. La computadora deberá frenar también la velocidad de los 
datos hacia los periféricos para cada carácter, aunque ahora esté esperando 
a poner el carácter en la memoria de salida más que en el periférico. 

Una excepción es cuando se tiene una gran cantidad de memoria 
“sobrante” y una impresora “lenta” (lo que son la mayoría). Un número 
cada vez mayor de sistemas tienen más de 64K de RAM. El 8080 o el Z80 
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no pueden direccionar más de esto, pero un sistema de memoria “especial 
(“bank switched”) puede conmutar bloques de memoria dentro y fuera 
este espacio de 64K direcciones. 

Usando este truco se puede acceder a memoria “desconocida” para dl 
CP/M, almacenar algunos caracteres en ella, conectar de nuevo a la 
memoria normal de 64K y devolver el control al llamador de la rutina de 
salida del BIOS. Cuando el mecanismo físico está dispuesto a aceptar otro 
carácter de datos de salida del procesador, generará una interrupción, La 
rutina de servicio de interrupciones accederá entonces a la memoria 
“secreta”, enviando los caracteres al dispositivo y volviendo a conectar ala 
memoria normal. 

Por ejemplo, si se tiene una impresora que imprime a 80 caracteres por 
segundo y se puede procurar utilizar 64K del banco de memoria conectado, 
se pueden ahorrar 13 minutos de impresión —o más, si se diseña un 
esquema para comprimir los espacios en blanco, almacenándolos en la 
memoria oculta como una secuencia de control especial. 

Desde el punto de vista del software, los controladores de entrada con 
control de interrupción se dividen en dos grandes grupos: la rutina de 
servicio de interrupciones que lee los caracteres y los acumula en una 
memoria intermedia, y las rutinas de no interrupción que obtienen los 
caracteres de ésta y manejan las otras funciones del BIOS tales como el 
retorno a modo de consola. 

La memoria de entrada de caracteres sirve como mecanismo de 
transferencia entre los dos grupos de subrutinas, aunque la tabla de 
dispositivos juega también un papel importante. 

El programa del ejemplo utiliza una memoria intermedia circular, como 
se muestra en la figura 8-2. 

Los controladores empiezan situando datos al principio de la memoria. 
Cuando se ha alcanzado el último carácter de ésta, vuelven a situarse al 
principio y reinician el proceso. Este, por supuesto, considera que los 
controladores de no interrupción han estado obteniendo datos de la parte 
anterior de la memoria intermedia, creando espacio para datos de entrada 
adicionales. 

Cada tabla de dispositivos contiene la dirección de la memoria interme- 
dia de entrada, un apuntador de “colocar” (PUT) (para la rutina de servicio 
de interrupción) y un apuntador de “obtener” (GET) (para la rutina de 
servicio de no interrupción). Contiene también dos contadores de caracte- 
res: el número total de éstos y el número de caracteres de control en la 
memoria de entrada. Puede verse cómo los apuntadores de colocar y 
obtener operan de forma asincrona. El apuntador de colocar se utiliza cada 
vez que un carácter que entra genera una interrupción. El apuntador de 
obtener se utiliza para cada llamada CONIN. 

Los apuntadores de obtener y colocar son únicamente valores de un solo 
byte y se describen con mayor detalle como “desplazamientos relativos”. Es 
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Figura 8-2. Memoria intermedia circular para mecanografiado en avance. 


decir, contienen un valor que, cuando se convierte en una palabra y se 
añade a la dirección base de la memoria intermedia, indicará directamente 
la posición adecuada dentro de la misma. 

Haciendo que la memoria intermedia tenga un número binario de 
caracteres —32 caracteres, por ejemplo— puede realizarse un truco de 
programación para que aparezca como si fuera circular. Las tablas de 
dispositivos contienen un valor enmascarado formado por la longitud del 
compensador menos uno (longitud—1). Siempre que los apuntadores de 
obtener y colocar se incrementen en uno (para apuntar a la posición del 
próximo carácter), se efectúa una operación lógica AND entre el valor 
actualizado y la máscara (longitud—1). En este ejemplo, si el valor de 
obtener va desde 31 (la dirección relativa del último carácter de la memoria 
intermedia) hasta 32 (que sería “fuera del final”), la operación de enmasca- 
ramiento volverá a ponerlo a cero (la dirección relativa del primer carácter 
de la memoria intermedia). Esto evita el tener que comparar los apuntado- 
res para saber cuándo hay que ponerlos a cero. 

También es más fácil utilizar la cuenta del número de caracteres de la 
memoria intermedia, mejor que comparar los apuntadores de obtener y 
colocar, para distinguir entre una memoria intermedia llena y otra vacía. 
Para soportar distintos protocolos serie, el controlador debe ser capaz de 
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Soporte de protocolos 








reaccionar cuando la memoria intermedia se encuentra cinco caracter 
antes de llenarse y cuando está medio vacía. Estas dos condiciones son 
mucho más fáciles de detectar utilizando una simple cuenta que $: 
incrementa cuando un carácter se coloca en la memoria intermedia y €: 
decrementa cuando un carácter se retira de ella. 

La cuenta de caracteres de control se utiliza para tratar con una clase de 
programas que incesantemente “traga” caracteres, haciendo inútil con ello 
cualquier continuación de mecanografiado. Un ejemplo es el intérprete 
BASIC de Microsoft. Cuando está interpretando un programa, se puede 
introducir un CONTROL-C desde el teclado y el intérprete se parará 
debidamente. Ello se debe a que se hacen llamadas constantes a CONST 
(estado de la consola). Si detecta algún carácter de entrada, realiza una 
llamada a CONIN para introducir el carácter. Un carácter que no sa 
CONTROL-C se descarta sin más. Por consiguiente, cualquier carácter que se 
introduzca se “consume” y se destruye el efecto de continuación de 
mecanografiado. 

Para tratar este problema, la rutina CONST mostrada en el ejemplo 
puede “mentir” acerca del estado de la consola. De esta forma, CONST 
indicará solamente que los caracteres están esperando en la memoria 
intermedia de entrada si se recibe un carácter de control. Utiliza la cuenta 
de caracteres de control para determinar si existen caracteres de control en 
la memoria intermedia; esta cuenta es incrementada por la rutina de 
servicio de interrupciones cuando detecta uno, y se decrementa por la rutina 
CONIN cuando obtiene un carácter de control de la memoria intermedia. 






















En este contexto, un protocolo es un esquema para evitar la pérdida de 
datos que de otra forma podría ocurrir si un dispositivo envía datos más 
rápidamente de lo que puede aceptar el dispositivo de recepción. Por 
ejemplo, los protocolos se utilizan para prevenir que la CPU envie datos a 
una impresora más rápidamente de lo que ésta puede imprimir los 
caracteres y mover el papel. Los controladores soportan también los 
protocolos de entrada, indicando al dispositivo de transmisión cuándo está 
a punto de llenarse la memoria intermedia de entrada. 

Se utilizan dos métodos básicos para implementar protocolos. El 
primero utiliza las líneas de control que se encuentran en los cables 
normales de la interfase serie RS-232C. Para datos que salgan de la 
computadora, se utiliza la señal de terminal de datos (DTR) preparado y 
para entrada de datos la petición de señal de envío (RTS). Estas señales se 
adaptan a los estándar eléctricos para la interfase RS-232C; se consideran 
verdaderos cuando están en algún voltaje positivo entre +3 y +12 voltios, 
y falsos cuando se encuentran entre —3 y —12 voltios. 
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El segundo método utiliza caracteres de control ASCII en lugar de 
señales de control. Dos protocolos separados están soportados por este 
método. Uno utiliza los caracteres ASCII XON y XOFF. Antes de que el 
dispositivo de envío (la computadora o algún dispositivo periférico) envíe 
un carácter de datos, comprueba si se ha recibido un carácter XOFF. Si es 
así, el emisor esperará un carácter XON. El dispositivo de recepción enviará 
un XON solamente cuando esté preparado para recibir más datos. 

El segundo protocolo utiliza los caracteres ETX (final de transmisión) y 
ACK (agradecimiento). Este método se usa normalmente sólo cuando se 
transmiten datos desde la computadora a una impresora con memoria. Está 
definida la longitud del mensaje (generalmente la mitad del tamaño de la 
memoria interna de la impresora). Cuando ha salido este número de 
caracteres, la computadora enviará un carácter ETX. No ocurrirá ninguna 
otra salida hasta que la computadora reciba un carácter ACK de la 
impresora. 

Los controladores del ejemplo soportan los protocolos alto-para-enviar, 
DTR, XON/XOFF y ETX/ACK para datos de salida. Para entrada, soporta 
alto-para-recibir, RTS y el XON/XOFF. 

Los protocolos de entrada se invocan cuando a la memoria interna de 
entrada le faltan cinco caracteres para llenarse. Entonces los controladores 
envían un carácter XOFF o la señal de bajo voltaje del RTS, o ambas cosas. 
Solamente cuando la memoria intermedia de entrada se ha vaciado en el 
50%, de su capacidad, los controladores enviarán un XON O elevan la 
tensión de la línea de RTS, o ambas cosas. 

Como medida de emergencia, si la memoria intermedia de entrada se 
llena por completo, a pesar de los protocolos, los controladores enviarán un 
carácter determinado previamente (definido en la tabla de dispositivos) 
cada vez que descarte un carácter de entrada. Esta señal es normalmente el 
carácter BELL del ASCII (timbre). Cuando se mecanografía demasiado “en 
avance”, el terminal comienza a zumbar para indicar que los datos son 
rechazados. 






Entrada forzada en el flujo de la consola 


Todos los lenguajes de aplicación proporcionan un medio de leer datos 
desde el teclado de la consola. Esto hace del flujo de entrada a la consola 
una puerta útil para el sistema. Una simple mejora de las rutinas CONIN/ 
CONST hace fácil “embaucar” al sistema haciendo como si los datos 
fueran introducidos desde el teclado cuando de hecho vienen de una cadena 
de caracteres de la memoria. 

En el BIOS mejorado tanto CONIN como CONST se han ampliado 
para comprobar un apuntador en el bloque de configuración a largo plazo, 
como se muestra en la figura 8-3. 
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Figura 8-3. CONIN utiliza los datos de la entrada forzada si el apuntador señala un byte distinto 
de cero. 


Si este apuntador señala un byte distinto de cero, entonces este byte se 
devuelve como si hubiera venido desde el teclado de la consola. El 
apuntador de entrada forzada se desplaza entonces un byte en la memoria. 
El proceso de entrada forzada continúa hasta que se encuentra un byte cero. 
La entrada forzada sirve para varios propósitos. Puede utilizarse para 
forzar una o varias órdenes en el sistema cuando éste se pone en marcha por 
primera vez. En conjunción con un programa de utilidad, puede permitir al 
usuario que introduzca algunas órdenes de CP/M en una sola línea de 
mando, inyectando los caracteres según se van realizando las órdenes. 
También hace posibles las prestaciones que se describen en las dos secciones 
siguientes. 


Soporte de teclas de función en el terminal 


Muchos terminales de los que existen actualmente en el mercado tienen 
teclas de funciones especiales en sus teclados. Cuando se pulsa una de éstas, 
el terminal emitirá varios caracteres, el primero de los cuales es normalmen- 
te el carácter ASCII ESC (escape). Los restantes uno o dos caracteres 
identifican la tecla de la función específica que se ha pulsado. 

Para que estas teclas de función tengan algún uso práctico, un programa 
de aplicación deberá detectar la secuencia de entrada de escapes y realizar 
las acciones adecuadas. El problema es que no todos los fabricantes de 
terminales soportan las secuencias de escape estándar ANSI. 
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Los controladores del ejemplo evitan este problema proporcionando un 
método de propósito general, que se muestra en la figura 8-4, de detección 
de secuencias de escape y de sustitución de una cadena de caracteres 
definida por el usuario, que se inyecta en la corriente de entrada de la 
consola como si hubiera entrado del teclado. 

Este esquema permite que las teclas función sean utilizadas con mucha 
flexibilidad, incluso para programas que no han sido diseñados especifica- 
mente para aceptar entradas de teclas de funciones. 

Sin embargo, existe un bloque de tropiezos. Cuando se recibe un 
carácter ESCAPE, el programa debe detectar si es el principio de una 
secuencia de teclas de función o si el usuario está pulsando la tecla de escape 
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Figura 8-4. CONIN descodifica las teclas de función del terminal. 
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Procesamiento de secuencias de escape de salida 


en el teclado del terminal. En el primer caso, el controlador debe esperar 
para determinar si una cadena de teclas de función debe ser sustituida porl 
secuencia de escape. En el último caso, el controlador deberá introducir dl 
carácter de ESCAPE como lo haría con otros caracteres de datos entrantes. 

Este reconocimiento sólo puede realizarse trasladándose en el dominio 
del tiempo. Cuando la rutina CONIN (rutina de no interrupción) obtiene 
un carácter ESCAPE de una memoria intermedia de entradas, deja pasar 
aproximadamente 90 milésimas de segundo, tiempo suficiente para que 
llegue una secuencia de caracteres generada en el terminal. CONIN controla 
entonces la memoria intermedia de entradas para ver si contiene por lo 
menos dos caracteres. Si los hay, el controlador los compara en la tabla de 
teclas de función en el bloque de configuración a largo plazo. Si los 
caracteres son semejantes a una tecla de función definida, entonces la 
cadena asociada con ella será inyectada en la corriente de la consola 
haciendo que el apuntador de entrada forzada le apunte. Si los caracteres no 
se asemejan a los de la tabla de teclas de función, entonces los caracteres de 
ESCAPE y subsiguientes se tratarán como caracteres de datos normales. 

Si después de 90 milésimas de segundo de retraso no han llegado más 
caracteres, el carácter ESCAPE se trata como un carácter normal, sobre la 
base de que ha sido un carácter de escape introducido manualmente más 
que parte de una secuencia generada por el terminal. 

Los controladores del ejemplo muestran el programa necesario y las 
tablas para las teclas de función que emiten tres caracteres. Se pueden 
modificar fácilmente para secuencias de dos caracteres, o, si se tiene la 
suerte de poseer un teclado que utilice los ocho bits de un byte, para 
reconocer los caracteres de entrada individualmente. 





























El lado de salida del controlador de consola, la rutina CONOUT, 
también puede mejorarse para reconocer secuencias de escape. Utiliza una 
instrucción de JMP vectorizada para mantener la pista al estado actual de 
los asuntos. El controlador CONOUT obtiene la dirección del vector y le 
transfiere el control. Normalmente este vector está fijado para el control 
directo de la rutina de salida de un byte. Sin embargo, si se detecta un 
carácter de ESCAPE en la corriente de salida, el vector se cambia para 
transferir el control a una rutina que reconozca el carácter que sigue al 
ESCAPE. Si el reconocimiento no ocurre, el controlador enviará un ESCAPE 
seguido del carácter que llegó detrás de él. 

Si el segundo carácter es reconocido, entonces el controlador puede 
transferir el control al procesador correcto de secuencias de escape. Este 
procesador puede realizar entonces cualquier acción adecuada. También 
deberá asegurarse de que, cuando se haya acabado todo el proceso, el vector 
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de salida de consola vuelva de nuevo a procesar los caracteres normales de 
salida. 

Esta técnica se describe de forma más práctica en la sección siguiente, 
donde se utiliza para fijar y leer la fecha y la hora. Se pueden extender 
fácilmente tablas de reconocimiento del bloque de configuración a largo 
plazo para realizar cualquier proceso especial que se necesite, recorriendo 
desde la alteración de las palabras de redireccionamiento de entrada/salida 
hasta cambiar cualquier otra variable del sistema o programando hardware 
especial en la computadora. 

Hay que tener cuidado de no incluir ningún valor binario puro en la 
secuencia de caracteres que sale de la rutina CONOUT. Si se intenta enviar 
un valor 09H (carácter TAB) por medio del BDOS, éste lo expandirá 
gratuitamente en varios espacios. Si se necesita enviar cierta configuración 
de bits, tal como la palabra de redireccionamiento de entrada/salida, se 
dividirá en una serie de valores de 7 bits de longitud. Entonces se envía en 
un byte que tenga el bit más significativo a 1. Un valor 09H se convertirá 
entonces en 89H, previniéndose así la expansión del BDOS a espacios 
vacíos. 


Lectura de fecha y hora desde la consola 


Por el momento, dejaremos de lado la cuestión de cómo se introducen 
en el sistema la fecha y la hora. Como la fecha y la hora están almacenadas 
en el bloque de configuración a corto plazo (ya que no hay necesidad de 
salvarlos de una sesión de trabajo a la siguiente), todo lo que necesita el 
BIOS es ser capaz de reconocer la petición de un programa de aplicaciones 
que haya de leer la fecha o la hora y entonces fijar el apuntador de entrada 
forzada a la cadena adecuada de la memoria. Ambas cadenas de fecha y 
hora están acabadas por un LINE FEED seguido de un byte 00. 

Esta secuencia de acontecimientos se muestra en la figura 8-5. 

Como puede verse, la salida de caracteres “ESC d'” a CONOUT hace que 
señale el apuntador de entrada forzada en la fecha de la memoria. Las 
llamadas subsiguientes a CONIN aportan los caracteres de la fecha en el 
programa como si hubieran sido introducidos en el teclado. 


Centinela límite de tiempo en impresora 


No existe previsión en el CP/M para tratar con un dispositivo de 
hardware que por una u otra razón no esté disponible permanentemente. 
A menos que se tomen medidas especiales en los controladores, el sistema 
se detendrá en un bucle, leyendo el estado y comprobando que los 
dispositivos periféricos estén preparados. 
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Figura 8-5, Secuencias de escape enviadas a CONOUT permiten que CONIN lea la fecha. 





El programa mejorado del ejemplo muestra un esquema utilizando un 
reloj de tiempo real, que pueds detectar cuándo un dispositivo tal como una 
impresora deja de estar disponible durante más de 30 segundos. Al detectar 
esta situación, el programa envía un mensaje a todos los dispositivos de la 
consola que no están siendo utilizados también como impresora. Este tipo 
de salida se necesita para evitar “lazos destructivos” cuando una impresora 
que no está disponible genere un mensaje que no pueda enviarse por no 
estar dispuesta la impresora. 

El programa que realiza la función de tiempo se conoce con el nombre 
de cronometrador centinela. Cada vez que el reloj de tiempo real hace “tic- 
tac”, la rutina de servicio de interrupción controla el valor del centinela. Si 
este valor es distinto de cero, se decrementa. Si el cronometrador de 
centinela alcanza el cero, superando el tiempo permitido, los controladores 
compondrán un mensaje en la consola indicando que la impresora ha 
estado ocupada durante demasiado tiempo. El usuario tiene entonces la 
opción de preparar la impresora e intentar de nuevo enviar datos, ignoran- 
do el error y arrastrándolo, o abortar el programa realizando una puesta a 
cero del sistema con el BDOS (función 0). 

Aunque el envio de un mensaje de error a la consola parece sencillo, 
resulta complicado si la salida de la consola se dirige hacia la propia 
impresora ofensora. Los controladores intentan resolver este problema 
enviando el mensaje sólo a aquellos dispositivos que se utilizan como 
consolas y no como impresoras. Si todas las consolas se utilizan como 
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dispositivos de impresión, el controlador enviará el mensaje al dispositivo 0 
—normalmente la consola principal. 


Conservación de hora y fecha 


El CP/M no está previsto para conservar la hora y la fecha actuales en el 
sistema. El ejemplo mejorado muestra cómo mantener la hora y el día y la 
fecha actual en el bloque de configuración a corto plazo utilizando 
secuencias de escape enviadas a la consola: (1) para fijarlo en los valores 
correctos, y (2) para “leerlos” desde el flujo de entrada de la consola. 

El ejemplo presupone que el sistema tiene un chip de hardware que 
puede ser programado para generar una interrupción cada 1/60 de segundo 
(16.666 milésimas de segundo), lo que significa tener un contador de 
divisiones para medir los segundos transcurridos. Desde luego, si la 
computadora tiene un reloj de tiempo real que se pueda leer y del cual se 
puedan obtener las horas, minutos y segundos actuales, el programa será 
muy sencillo. Sin embargo, se necesitará tener el reloj generando interrup- 
ciones periódicas, con el fin de utilizar el dispositivo centinela para 
cronometrar las operaciones de la impresora y del disco. 

El tiempo se conserva en caracteres ASCII, utilizando otra tabla de 
control ASCII para determinar cuándo hay “acarreo y puesta a cero”. 
Cambiando dos bytes de esta tabla, se mantendrá el tiempo en formato de 
12 ó 24 horas. 

La fecha se almacena simplemente en una cadena. El programa del 
ejemplo no intenta asegurar que la fecha sea válida, ni actualizarla después 
de la medianoche. Esto podría hacerse fácilmente por medio del BIOS, 
pero consumiría una gran cantidad de programa. 


Cronometrador centinela 


Al tener una fuente periódica de interrupciones, se abre también la 
puerta a la construcción de un cronometrador centinela para emergencias. 
Esto consiste nada más que en un contador de 16 bits. Cada vez que se 
interrumpe el reloj de tiempo real, o hace tic-tac, la rutina de servicio de 
interrupciones controla el valor del centinela. Si ya está a cero, no ocurre 
nada más —el centinela no está en uso—. Si no es cero, la rutina decremen- 
ta el valor en uno. Si resulta un valor cero, la rutina de servicio de 
interrupciones llama a una dirección previamente determinada. Esta será la 
dirección de alguna rutina de servicio de interrupciones de emergencia que 
puede entonces tomar una acción especial, tal como investigar la causa del 
tiempo excedido. 

La rutina de centinela posee una subrutina de nivel de no interrupción 
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asociada a ella. Llamando a esta subrutina de fijación de centinela 
consigue un medio de fijar el contador a un número determinado previa: 
mente de “tic-tacs” de reloj de tiempo real y la dirección a la que 
transferiría el control si la cuenta alcanza el cero. 

Habiendo llamado la subrutina de fijación del centinela, el controla 
podrá situarse en modo bucle, con posibilidad de interrupciones, esperando 
que ocurra algún acontecimiento. Si éste ocurre antes de que la cuenta del 
centinela sea cero, el controlador deberá llamar a la rutina de fijación de 
centinela de nuevo para fijar la cuenta atrás hasta cero, y con ello 
desconectar el centinela. 

El cronometrador de centinela puede utilizarse para detectar impresoras 
que están ocupadas durante demasiado tiempo o controladores de disco que 
tardan demasiado en completar una acción, bien porque tienen un fallo de 
hardware o porque el usuario no ha cargado el disco en la unidad, 





Estructuras de datos 








Como ya se ha establecido, cada dispositivo de entrada/salida de 
caracteres tiene su propia tabla de dispositivo que describe todas sus 
caracteristicas particulares. 

La otra estructura mayor de datos son los bloques de configuración —a 
corto y a largo plazo. 

Esta sección describe cada campo de estas estructuras de datos. 


Tabla de dispositivos 


La figura 8-6 muestra los contenidos de una tabla de dispositivos. Más 
adecuadamente, muestra una serie de equivalencias que definen los despla- 
zamientos de cada campo en la tabla de dispositivos. Los controladores 
reciben la dirección base de una tabla de dispositivos especifica. Acceden 
entonces a cada campo mediante la adición del desplazamiento requerido 4 
esta dirección base. 

La primera parte de la tabla de dispositivos está dedicada al aspecto 
físico del dispositivo, definiendo qué números de puerto han de ser 
utilizados para comunicarse con él. Los controladores necesitan saber los 
distintos números de puerto porque cada uno se utiliza para una función 
particular. Dependiendo del hardware, cada número de puerto podría ser 
diferente; sin embargo, con chips estándar Intel o Zilog, se encuentra 
frecuentemente que el mismo número de puerto se utiliza para varias 
funciones. Los controladores necesitan también saber qué configuraciones 
de bits son de esperar cuando se leen algunos puertos y qué valores enviara 
los mismos para obtener resultados particulares. 
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de dispositivo. 


DT8StatussPort 























0000 = 
0 DisDatasPort 

0002 = DTs0utputaReady 

0003 DTsInputsReady 

0004 = DTSDTRAReaoy 

0008 = DTSResetsIntsrort 
0006 = DTSResetsIntivalue 
0007 = DTsDetectaErrorsrort 
0008 = DTSDetectaErroravalue 
0009 = DTsResetsErrorsPort 
0004 + DTáResetsErrorsvalue 
0008 + DTSRTSSCOmtrolsPort 
000 DTSDropaRTSIVatue 
0000 + DTSRaisesRTSIValue 
000% + DraStatus 

0001 DTS0utputsSuspena 
0002 + DTSinputsSuspená 
0004 = DTSOUtpUts0TR 

2008 = Disoutputaxor 

010 + DIO tata 

020 + DIsoutputeTimeout 
cono = DTSIMPULIRTS 

080 DISInputsion 

000+ DrsStatussz 

000 DTsPaleSIypeaneac 
000 brsEtuacount 

cor = 

0014 = Drstutfersiase 

001s = DTSPULAOt fet 

007. DISCE1S0ffset 

os = DTSDut fer sLengtniMask 





Los controladores utilizan una tabla de dispositivo para cada uno 


de Los dispositivos físicos a Los que sirven. Las equivalencias 
Que siguen se utilizan para acceso a Los distintos campos de La tabla 


Número de puerto y bits de estado 











E ¿Número puerto estado dispositivo 
EQU DTestatuisrortel 
¿Número de puerto dispositivo de datos 
EQU DTSDataPórtel 
¿Máscara de estado salida disponible 
EQU DTSOuteutsReadi +1 
Máscara de estado entrada disponible 
EQU DTSInputáReady+1 
IR disponible para envío de máscara 
EQU DTRDTRSREady+1 
¿Número de puerto utilizado para puesta a cero 
5 de una interrupción 
EQU DTsResetdlntaror tol 
Valor Lanzado para puesta a cero de interrupción 
EQU DTsResetslntaValues! 
¿Número de puerto para detección de error 
EQU DIsDetecisErroraror tol 
¡Máscara para detección de errores (paridad, etc.) 
EQU DTsDetecisErroriValuest 
¡Salida al puerto para desactivar error 
EQU DTsResetáErrorsrortel 
¿Valor Lanzado para desactivar error 
EQU DTeResetáErroraValuer? 
¿Puerto de control para disminuir RTS 
EQU DTSRTSSCÓNt alaPoriri 
¿Valor, en salida, para bajar RTS 
EQU DTROropañTSEValues1 


¡Valor, en salida, para aunentar RTS 


Estado lógico del dispositivo (incluido protocolos) 


EQU 














E0U o 0000sV00IE — ¿Salida suspendida pendiente de La acción 
¿_ del protocolo 
EQU GOGUSWUIOR ¿Entrada suspendida hasta que se vacie 
7 La memoria intermedia 
EQU 0000s01008 ¿La salida utiliza DTR alto-para-enviar 
EQU O000$1000E ¿La salida utiliza Xon/Xoff 
EBU 0001s00008 ¿La salida utiliza Etx/Ack 
EQU 0010$0000B ¿La salida utiliza Limite de tiempo 
EQU 0100$0000B ¿La entrada utiliza RTS alto-para-recibir 
EQU 1OUÓS0000É ¿La entrada utiliza Xon/Xoff 
EQU DTsStatussl ¿Byte de astado secundario 
EQU 00008G00IB ¿Petición a InputSStatus para que devuelva 
7 "Dato preparado" cuando Los 
F caracteres de control están en la 
menoria intermedia de entrada 
EQU DTaStatusszel 
¿Número de caracteres enviados en protocolo ETX 
Eo DTREtSStcumte 


¿Longitud del mensaje especificado 
Valores de La memoria intermedia de entrada 








EQU DTAELy AMES sageSLengin+Z 
¿Dirección de La memoria intermedia de entrada 
EQU DTsEutferstase+2 
¡Desplaz. para puesta de caracteres en la mem. ínt. 
Eo DTaPutsOftsetsl 
¡Desplaz. para obtención de carac. de La mem. int. 
Eo OTAGetRÓNIsetel 


¡Longitud de La nenoria intermedia - 1 
iNota: La Longitud de La memoria intermedia debe ser 
?_ siempre un número binario: 32, 64 6 128 

sEsta máscara se vuelve entonces: 
TO] 

54 > 53 COOL 

128 => 127 (OMISInLIeO 








Figura 8-6. Equivalencias de tabla de dispositivos. 
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¡Después de que el desplazamiento de la 
7 obtención/puesta se ha incrementado es operado 
7 CAND) con la máscara para ponerlo a cero cuando 
7 se alcanza el final de La mem. int. 
0019 = DIsCharactersCount EQU DTSEUfferSLengthemasi +1 

;Contador del núnero de caracteres en curso 

5 en la memoria intermedia 
0014 = DTSStopsImputsCount EQU DTsCharácterscount+I 

¡Parada de La entrada cuando el contador 

7 alcanza este valor 
0018 = DTsñesumesInput$Count EQU DTSStopeInputsCount+1 

Reanudar La entrada cuando el contador 

5 alcanza este valor 
001 DTsControl8Count EQU DTsResumesIneutsCount+1 

¿Cuenta del _núnero de caracteres de control 














en la menoria intermedia 
eEscountal 
Número de pulsos de reloj de retraso para Llegada 
5 de todos Los caracteres después de pulsar 
Fla tecla de función 
001 DIsInitializesStream EQU DTsFunciacnstelay»l 

¿Dirección del flujo de datos necesario para 

5 inicializar este dispositivo 


0010 > DTsFunctionéDelay EQU DTscom 





Figura 8-6. (Continuación.) 


La distribución de la tabla de dispositivos y la forma en que se declaran 
las equivalencias están diseñados para hacer fácil el cambio de contenidos 
de la tabla para atender cualquier requerimiento especial. Los campos dela: 
primera sección de la tabla de dispositivos se tratan en la sección siguiente, 


DTsStatus$Port El controlador lee este puerto para determinar si el chip de 
hardware tiene datos de entrada disponibles para ser introducidos en la 
computadora o si el chip es capaz de aceptar otros caracteres de datos para 
salida al dispositivo físico. 


DT$Data$Port El controlador lee desde este puerto para acceder al próximo 
carácter de datos desde el dispositivo físico. El controlador escribe también 
en este puerto para enviar el próximo carácter de datos al dispositivo. 

Si el hardware de la computadora requiere que el puerto de entrada de 
datos tenga un número diferente del puerto de salida de datos, habrá que 
alterar la programación en las equivalencias de la tabla de dispositivos, así 
como hacer los cambios necesarios en las subrutinas de entrada y salida del 
cuerpo del programa. 








DT$Output$Ready Esta es la máscara de bits que con el controlador hará la 
operación AND con el estado del dispositivo en curso (obtenido leyendo el 
DT8Status$Port) para ver si el dispositivo está preparado para aceptar otro 
carácter de salida. Supone que el dispositivo está dispuesto si el resultado de 
la instrucción AND es distinto de cero. Puede ocurrir que haya que cambiar 
alguna instrucción JNZ (salto si es distinto de cero) por la instrucción JZ 
(salto si es cero) si el dispositivo hardware utiliza lógica invertida, con bits 
en el byte de estado puestos a O para indicar que el dispositivo puede 
aceptar otro carácter para salida. 
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Obsérvese que la comprobación del estado se refiere sólo al chip de 
salida —completamente separado de la cuestión de si los elementos 
periféricos están a su vez dispuestos a aceptar datos. 


DTsInput$Ready Esta es la máscara de bits con la que el controlador realizará la 


operación AND con el estado del dispositivo en curso para ver si existe 
algún carácter de datos de entrada. Los controladores suponen de nuevo 
que si el resultado del AND es distinto de cero, un carácter de datos de 
entrada está esperando para ser leído desde el puerto de datos. Se necesitará 
realizar cambios similares a los de las rutinas de salida descritas en la 
sección anterior si el hardware utiliza lógica invertida (bit a O significa datos 
de entrada). 


DT$DTR$Ready DTR representa el terminal de datos preparado. Se refiere a una de 


las líneas de control conectadas desde el dispositivo periférico al chip de 
entrada/salida (por medio de otros varios circuitos integrados). Los 
controladores, como opción, sólo enviarán datos al dispositivo cuando la 
señal DTR esté a tensión positiva. Si el periférico, para parar el flujo de 
caracteres de datos que se le envían, disminuye la señal DTR a una tensión 
negativa, los controladores esperarán. Una vez el DTR se ha hecho de 
nuevo positivo, los controladores reanudarán el envío de datos. Muchos 
dispositivos de copia dura utilizan este esquema para permitirse a si mismos 
imprimir los datos recibidos de la computadora. Tendrán que poner el DTR 
a su valor bajo durante algunos segundos; por ejemplo, mientras realizan el 
movimiento del papel. 

El valor en este campo es una máscara de bits que los controladores 
utilizan en el estado de dispositivo para determinar el estado de la señal de 
control de terminal de datos preparado. 


DTsReset$Int$Port Como el lado de entrada de los controladores utiliza interrup- 


ciones, cuando un carácter de entrada está preparado para ser introducido 
por la CPU, el hardware genera una señal de interrupción y el control se 
transfiere a la rutina del servicio de interrupción. Esta rutina “atiende” la 
interrupción leyendo el carácter de datos de entrada, salvándolo en la 
memoria, y transfiriendo entonces el control de nuevo a lo que estaba 
siendo ejecutado cuando ocurrió la interrupción. 

Los chips controladores de interrupciones más complicados (tales como 
el Intel 8259A) deben ser avisados apenas se ha atendido una interrupción 
dada, de forma que puedan permitir atender a cualquier interrupción que 
tenga prioridad más baja que pueda estar esperando. 

Este campo contiene el número de puerto que será utilizado para “poner 
a cero” la interrupción, o más correctamente, para indicar el final de 
atención a la interrupción previa. 
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DT5$ResetSintsValue Este es el valor que será enviado al DTSResetSIntSPort 
decir al hardware que la atención a la interrupción previa ha si 
completada. 


DT$DetectSError$Port Antes de que el controlador intente leer cualquier dato 
entrada del DTSDataSPort, comprueba si ha ocurrido cualquier error 
hardware. Lo efectúa leyendo el estado de este puerto. 


DT$DetectSError$Value El byte de estado que se introduce desde el DT$Det 
Error$Port realiza el AND con este valor. Si el resultado es distinto a cer, 
el controlador considera que ha ocurrido un error. 


DTSResetSError$Port Si ha ocurrido un error, el controlador envía un valor de 
puesta a cero del error a este número de puerto. 


DTSResetSError$Value Este es el valor que será enviado al DTSResetSErrorSPort 
para poner a cero un error. 


DTSRTSSControl$Port Los controladores utilizan este número de puerto para: 
controlar la línea de petición de envío si se selecciona la opción de 
protocolo RTS. 


DTS$Drop$RTS$Value Este valor se envía al puerto de control del RTS par 
disminuir la tensión en la línea del RTS de forma que los dispositivos 
externos dejen de enviar datos a la computadora. 


DTSRaise$RTS$Valué Este valor se envía para crear la línea de RTS de forma que 
el dispositivo externo reanude el envío de datos a la computadora. 


DT5$Status Este es el primero de los dos bytes de estado. Contiene bits que están 
Puestos a | para indicar las siguientes condiciones: 


DT$0utpui$Suspend 


Como figura en el protocolo, el dispositivo suspende la recepción de 
cualquier carácter de salida. 


DT8Input$Suspend 
Como figura en el protocolo, el dispositivo ha sido solicitado para 
que no envie más caracteres de entrada. 

DT$0uput$DTR 
El controlador mantendrá el protocolo DTR alto-para-enviar para 
los datos de salida. 

DT$0utput$Xon 
El controlador mantendrá el protocolo XON/XOFF para datos de 
salida. 
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DT$O0utpuiSEtx 
El controlador mantendrá el protocolo ETX/ACK para datos de 
salida. 

DTSInpui$RTS 
El controlador mantendrá el protocolo RTS alto-para-recibir para 
datos de entrada. 


DTS Inpui$Xon 
El controlador mantendrá el protocolo XON/XOFF para datos de 
entrada. 


DTs$Status$2 Este es otro byte de estado, con el siguiente significado de sus bits: 


DT$FakeSTypeahead 
CONST “mentirá” acerca de la disponibilidad de los caracteres de 
entrada en la consola. Indicará solamente que hay datos esperando 
si son caracteres de control distintos a CARRIAGE RETURN, LINE 
FEED o TAB en la memoria de entrada. 


DTSEtx$Count Este valor se utiliza sólo por el protocolo ETX/ACK. Es el valor del 
número de caracteres enviados en el mensaje. Cuando este total alcanza la 
longitud del mensaje definida, entonces el controlador enviará un carácter 
ETX y suspenderá cualquier otra salida. 


DT$EtxSMessagesLength Este valor es la longitud de mensaje definida para el 
protocolo ETX/ACK. Se utiliza para poner a cero el DTSEtx$Count. 


DT$Buffer$Base Esta es la dirección del primer byte de la memoria intermedia del 
dispositivo de entrada. 


DTSPutsOffset Este byte contiene el desplazamiento relativo indicando cuándo se 
“pone” el siguiente carácter de entrada en la memoria intermedia. El byte 
debe convertirse en un valor y sumado a la dirección DTS$BufferSBase para 
obtener la posición absoluta en memoria. 


DTSGet$Offset Este byte contiene el desplazamiento relativo indicando cuándo se 
“obtendrá” el próximo carácter en la memoria intermedia de entrada. 





DTSBuffersLength$Mask Este byte contiene la longitud de la memoria intermedia 
menos uno. La longitud de ésta deberá ser siempre un número binario (8, 
16, 32, 64...). Por consiguiente, uno menos que la longitud forma un valor 
máscara. Tanto el desplazamiento para obtener como para colocar, después 
de ser incrementados, están enmascarados con este valor. Cuando el 
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desplazamiento alcanza el final de la memoria intermedia, esta operación 
enmascaramiento lo pone a cero automáticamente. 


DTSCharacter$Count Este es el valor del número total de caracteres en 
memoria intermedia. Se incrementa por la rutina del servicio de inte: 
ciones cada vez que se sitúa un carácter en la memoria intermedia, 
se decrementa por la rutina CONIN cada vez que obtiene un carácter, 

CONST utiliza este valor para determinar si todos los caracteres est 
disponibles para entrada. 


DTSStop$Input$Count Cuando las rutinas del servicio de interrupción detectan: 
que el DT$Character$Count es igual a este valor (normalmente la longi 

de la memoria intermedia menos cinco), los controladores invocarán al 
protocolo de entrada seleccionado, rebajando el RTS o enviando XOFF, 
para cerrar el flujo de datos de entrada. 


DT$Resume$input$Count Cuando la rutina CONIN detecta que DTSCharacter- 
$Count se ha hecho igual a este valor, los controladores invocarán de nuevo 
al protocolo de entrada seleccionado, creando un RTS o enviando X0», para 
reanudar la recepción de datos de entrada. 


DTS$Control$Count Este es el valor del número de caracteres de control en la 
memoria intermedia de entrada. Los caracteres CARRIAGE RETURN, LINE 
FEED y TAB no están incluidos en este valor. Se incrementa por la rutina del 
servicio de interrupción y se decrementa por CONIN. CONST utiliza el 
valor cuando el modo DT$Fake$Typeahead está activo; indicará solamente 
que los caracteres están esperando en la memoria de entrada si el valor de 
control es distinto a cero. 


DTSFunction$Delay Este es el número de tic-tacs de reloj que estaría permitido 
que transcurriera después de que se ha detectado el primer carácter de una 
secuencia de escape entrante. Permite que haya tiempo para que lleguen los 
restantes caracteres de la secuencia de escape, suponiendo que éstos son 
emitidos por un terminal a la máxima velocidad. Normalmente, ésta 
corresponde a un retraso de aproximadamente 90 milésimas de segundo. 





lize$Stream Esta es la dirección del primer byte de una cadena. Esta 
cadena tiene el siguiente formato: 


DB ppH Número de puerto 
DB anH Número de bytes que se han de enviar 
DB vH,vH... — Bytes de inicialización a enviar al número de puerto especificado 


Esta secuencia puede repetirse tantas veces como sea necesario, con un 
número de “puerto” 00H actuando como terminal. 
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Entrada/salida de disco 








Los controladores del ejemplo muestran las tres principales mejoras de 
entrada/salida del disco: 


e Memorización de pista completa. 
e Utilización de la memoria como disco ultrarrápido. 


e Manejo de errores mejorado. 


Memoria intermedia de pista completa 


Los disquetes de 5 1/4 pulgadas utilizados en el sistema ejemplificado 
son de dos caras. Cada cara tiene una cabeza de lectura/escritura separada 
en la unidad de disco. El controlador físico del disco es lo suficientemente 
rápido para, si se le ordena, poder leer el contenido completo de una pista 
de datos de una cara del disquete en una sola revolución de éste. 

Los controladores han sido modificados para hacer precisamente esto. 
La memoria intermedia principal de disco ha sido alargada enormemente 
para acomodar nueve sectores de 512 bytes. 

En el BIOS estándar primitivo, el CP/M estaba configurado para pistas 
de 18 sectores de 512 bytes. Los datos de cada cabeza en una pista dada 
estaban colocados “de final a final” con el fin de crear la ilusión de una sola 
superficie con el doble de datos en ella. Para la memorización de pista, las 
prestaciones se reducirían si cada lectura requiriese dos revoluciones del 
disquete, y por ello se ha cambiado en estos BIOS las tablas y el controla- 
dor lógico de bajo nivel. Cada superficie está separada, con numeración par 
de las pistas en la cabeza 0 e impar en la cabeza 1. 

El número de pista dado a los controladores de bajo nivel sirve para dos 
propósitos. El bit menos significativo identifica el número de cabeza. 
Cuando el número de pista se desplaza un bit a la derecha, el resultado es el 
número de pista física en la cual debe situarse la cabeza. 

El algoritmo de desbloqueo se ha modificado también borrando las 
referencias a los sectores. El programa se refiere ahora únicamente a si el 
disco y la pista correctos están en la memoria intermedia. 

El programa de desbloqueo ya no toma nota cuando el BDOS indica 
que está escribiendo en un bloque no asignado que utilizó para desviar un 
sector leido previamente del BIOS estándar. El tamaño de la pista en este 
BIOS mejorado es mucho mayor que un bloque, por lo que la cuestión es 
intrascendente; la pista completa debe ser leida previamente para escribir 
un sector único exclusivamente. 

Esta mejora descuella realmente cuando el BDOS está realizando 
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Utilización de la memoria como disco ultrarrápido 





operaciones de directorio, que incluyen siempre una serie de lecti 
secuenciales. El directorio completo puede llevarse a la memoria, actuali 
do, y reescribirse únicamente en dos revoluciones de disco. 

Un punto a observar es lo que se conoce como “escritura diferida”, 
Imagínese un programa instruido para escribir en un sector en la pista M. 
Los controladores leerán en la pista 20, copiarán los contenidos del 
designado en la memoria de pista, y volverán al programa sin escril 
realmente los datos. El programa puede “escribir” en todos los sectores 
esta pista sin escribir realmente en el disco. Durante todo este tiempo, estos! 
datos existirán únicamente en memoria y no en el disco, por lo que sí 
ocurre una caida de tensión, se perderán varios miles de bytes de datos. La 
escritura en el directorio es una excepción. Los controladores escriben 
siempre fisicamente cuando el BDOS indica que está escribiendo en wn. 
sector de directorio. 

En realidad, el aumento de riesgo es pequeño. La mayoría de los. 
programas están constantemente leyendo y escribiendo ficheros, de forma 
que la memoria de pista escribirá frecuentemente para leer en otra pista. 
Cuando los programas terminan, cierran los ficheros de salida. Esto dispara 
a su vez escrituras del directorio que fuerzan pistas de datos en el disco. 

Si la alta seguridad es un requerimiento de la computadora, se puede 
extender la rutina de centinela para añadir otro temporizador separado. $e 
puede fijar previamente este cronómetro para, por ejemplo, un retraso de 
diez segundos cada vez que se escribe en la memoria intermedia de pista, 
pero no se escribe la memoria en el disco. Cuando la cuenta expira, 
presentará un indicador que podrá ser comprobado por todos los puntos de 
entrada del BIOS. Si está a uno, iniciarán una escritura de la memoria de 
pista en el disco. 


Como puede verse en la sección precedente, la mejora de rendimiento 
tiende a estar asociada con el aumento de los requerimientos de memoria. 
Esto es verdaderamente cierto con un “disco de memoria”, denominado 
normalmente disco RAM o disco M. De hecho, para tener un disco M con 
capacidad de almacenamiento razonable, la computadora deberá tener por 
lo menos 128K bytes de memoria adicional. 

Como el 8080 o el Z80 sólo pueden direccionar 64K de memoria al 
mismo tiempo, para tener acceso a esta memoria adicional, alguna parte de 
la memoria “normal” de la computadora deberá trasladarse desde el 
espacio de dirección 64K y se deberá conectar la memoria adicional. Esto se 
conoce como banco de memoria comentada. 

La figura 8-7 muestra la organización de memoria que está soportada 
por los controladores del disco M en el ejemplo. 
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Figura 8-7. Organización de memoria para disco M. 


Como puede verse el sistema tiene un total de 256K bytes de RAM, 
organizados con los 16K superiores, desde el 64K hasta el 48K, que son 
“comunes” —es decir, están conectados en el espacio de direcciones todo el 
tiempo—. Los 48K inferiores pueden seleccionarse de los cinco bancos, 
numerados del 0 al 4. El banco 0 se conecta para las operaciones normales 
del CP/M. 

Los bloques de parámetros del disco M describen un disco con ocho 
“pistas”, numeradas del O al 7. El bit menos significativo del número de 
pista determina si la dirección básica de la pista será 0000H o 6000H. 
Desplazando el número de pista un bit a la derecha da el número de banco. 
Cada pista consiste en 192 sectores. Para obtener la dirección relativa de un 
sector dentro de su “pista”, hay que desplazar el número de sector ocho bits 
a la izquierda y multiplicar entonces por 128. 

El disco M está referenciado por el disco lógico M. Se requieren algunas 
instrucciones para casos especiales para devolver la cabeza de parámetros 
del disco M especial del SELDSK. 

Un problema, afortunadamente de fácil solución, es que la dirección 
DMA del usuario coexiste en el espacio de direcciones con la imagen del 
disco M. No existe ninguna forma directa de trasladar datos entre el banco 
0 y cualquier otro banco. El disco M utiliza una memoria intermedia, de la 
parte de memoria común (sobre 48K), que mueve datos en su interior, 
conmuta bancos y traslada los datos de nuevo. La figura 8-8 muestra un 
ejemplo de esta secuencia, que se usa cuando se lee del disco M. 

Durante la inicialización de arranque en frio, el controlador del disco M 
comprueba la primerísima dirección de entrada (en el banco 1) para ver si 
corresponde a una falsa entrada de un fichero denominado “M$Disk”. Si 
esta entrada está presente, el disco M se supone que contiene información 
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Figura 8-8. Lectura de un sector desde la imagen de un disco M. 


válida. Si la entrada está ausente, el programa de inicialización hace esta 
entrada especial del directorio y llena el resto del directorio con 0ESH, 
haciéndole aparecer vacio. La entrada falseada hace aparecer que el fichero 
“MSDisk” está en el usuario 15, marcado en modo sistema y sólo lectura, 
todo lo cual está pensado para prevenir su borrado accidental. 





[ Añadidos normales para el CP/M 





Dos caracteristicas mostradas en el BIOS mejorado, una en el CCP y 
otra en el BDOS, requieren cambios en el propio CP/M. Estas característi- 
cas se implementan modificando el CCP y el BDOS para transferir el 
control al BIOS en puntos específicos, ejecutar algunas instrucciones en el 
BIOS y volver después al CP/M. Los añadidos pueden hacerse modificando 
el programa MOVCPM para instalar los cambios de forma permanente. La 
versión variada del MOVCPM, sin embargo, deberá utilizarse con una 
versión especifica del BIOS. Por consiguiente, los añadidos al CP/M “al 
vuelo” aseguran que no habrá problemas entre el BIOS y el resto del CP/M. 

Ambos añadidos se han producido con asistencia de Digital Research. 


Ficheros del usuario O, públicos 


El primer cambio permite que los ficheros creados en el área del usua- 
rio O sean accesibles desde todos los otros números de usuario. Funciona 
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únicamente con sistemas de disco rigido. En un disco rígido, los números de 
usuario pueden dividir el disco, pero los programas de utilidad usados 
frecuentemente han de ser entonces duplicados en cada área de usuario. 
Permitir que los ficheros en el área de usuario 0 sean públicos, significa que 
éstos serán accesibles desde todos los otros números de usuario y, por tanto, 
no necesitan ser copiados en cada área de usuario. 

El dispositivo de ficheros públicos altera la forma en que el BDOS 
realiza la función de búsqueda del próximo, permitiendo el acceso a ficheros 
declarados en el área de usuario O incluso cuando el número real del usuario 
no sea 0. Sin embargo, el dispositivo es un arma de dos filos —los ficheros 
del usuario O pueden borrarse accidentalmente o dañarse de igual forma 
que se puede acceder a ellos—. Por consiguiente, los ficheros de usuario 0 
deberían ser declarados en modo sistema y de sólo lectura con el fin de 
protegerlos. Como precaución adicional, los ficheros públicos pueden 
desconectarse por medio de una señal de control en el bloque de configura- 
ción a largo plazo. Esta señal se pone en un estado inicial que inutiliza los 
ficheros públicos. 


Indicación de usuario modificado 


Esta modificación hace que el CCP exhiba el número de usuario actual, 
así como el disco por defecto. Por ejemplo, 


38> 


indica que actualmente se está en el número de usuario 3, con el disco B: 
como disco por defecto. Además, si se han hecho públicos los ficheros, la 
indicación estará precedida de la letra “P”” para que sirva de recordatorio: 


P38> 





Un BIOS mejorado 





El resto de este capítulo es el código fuente en lenguaje ensamblador 
para el BIOS mejorado que se describe. Esta lista resulta más bien 
desanimadora, pero vale la pena estudiarla. Los numerosos comentarios se 
han escrito para hacer más fácil este estudio y se ha recalcado por qué y qué 
es lo que hay que hacer. 

Como para el BIOS estándar, cada línea se ha numerado de forma que 
se pueda utilizar el índice funcional de la figura 8-9 para encontrar áreas de 
interés en el listado. Obsérvese que los números de líneas no son contiguos. 
Saltan unos cientos al principio de cada sección mayor o subrutina. Esto 
facilita un número menor de cambios en el listado sin rev 
funcional. La lista completa se muestra en la figura 8-10. 
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Línea de comienzo 


00200 


Componentes funcionales o rutinas 


Comentarios introductorios y equivalencias 

Tabla de saltos del BIOS con entradas privadas adicionales 

Bloque de configuración a largo plazo 

Vector de interrupción 

Números de puerto de dispositivos y otras equivalencias 

Subrutina DisplaySMessage 

Puesta a EnterSCPM 

Equivalencias de tabla de dispositivos 

Declaraciones de tabla de dispositivos 

Inicialización de dispositivos generales 

Inicialización de dispositivos especificos 

Flujo de bytes de salida 

Rutina CONST 

Rutina CONIN con proceso de teclas de función 

Salida de consola 

Rutina CONOUT con proceso de secuencias de escape 
AUXIST—Rutina de estado de entrada auxiliar 

AUXOST—Rutina de estado de salida auxiliar 

AUXIN—Rutina de entrada auxiliar 

AUXOUT —Rutina de salida auxiliar 

LISTST—Rutina de estado de listado 

LIST—Rutina de salida de listado 

Elección de usuario requerido—Acción requerida después de error 
Salida de mensaje de error 

Obtención de estado compuesto desde los dispositivos de salida seleccionados 
Salida múltiple de byte a todos los mecanismos de salida 

Control del dispositivo de salida preparado lógicamente (protocolo) 
Protocolo de proceso ETX/ACK 

Tabla de selección de dispositivos desde mapa de bits de 
redireccionamiento entrada/salida 

Obtención de carácter de entrada desde la memoria intermedia de entrada 
Comentarios introductorios para los controladores con control de interrupción 
Rutina de servicio de interrupción de caracteres 

Mecanismo de servicio— Introducción de caracteres en la memoria intermedia 
de entrada 

Obtención de dirección de carácter en memoria intermedia de entrada 
Comprobación del carácter de control (no CR, LF, TAB) 

Byte de datos de salida 

Rutina de estado de entrada 

Activación de rutina de temporizador centinela 

Rutina de servicio de interrupción de reloj de tiempo real 

Rutina de desplazamiento de un bit a la derecha HL 

Comentarios introductorios para los controladores de disco de alto nivel 
Cabezas de parámetro de disco 

Bloques de parámetro de disco 

SELDSK—Rutina de selección de disco 

SETTRK—Rutina de fijación de pista 

SETSEC—Rutina de fijación de sector 





Figura 8-9. Indice funcional para listado de la figura 8-10. 
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07200 
07300 
07400 
07500 
07600 
07800 
07900 
08000 
08300 
08500 
08700 
08900 
09100 
09200 
09400 
09700 
09800 
10000 
10100 
10300 
10400 
10500 
10700 
10800 





SETDMA—Rutina de fijación del DMA 

Tablas de desplazamiento para traslación de sector 
SECTRAN—Rutina de traducción de sector 

HOME — Regreso del disco a la pista y al sector 0 

Equivalencias para el disco físico y las variables de desbloqueo 
READ—Rutina de lectura de sector 

WRITE—Rutina de escritura de sector 

Código de lectura/escritura normales con algoritmo de desbloqueo 
Rutina MoveS8-—Transfiere la memoria en bloques de 8 bytes 
Comentarios introductorios para controladores físicos de disco 
Lectura y escritura sin desbloqueo 

Controlador de disco M 

Rutina de selección de banco de memoria 

Lectura/escritura físicas en los discos desbloqueados 

Rutinas para manejar errores de disco 

Tablas de control de disco para arranque caliente 
WBOOT—Rutina de arranque caliente 

Servicio de interrupción fantasma 

Añadido al CP/M para ficheros públicos y cambios de programa 
Obtención de direcciones de bloque de configuración 

Direcciones de objetos en bloques de configuración 

Bloque de configuración a corto plazo 

Nota acerca de por qué los compensadores no inicializados están al final del BIOS 
Inicialización de arranque en frio escondida en la memoria intermedia de 
disco seguida por todas las memorias intermedias no inicializadas 











Figura 8-9. (Continuación.) 


Figura 8-10. 


sor 
30 
0001 
00012 
00013 
00014 
00015 
o001s 
90017 
90018 
00019 
00020 
00021 
00022 
90023 
00024 
00025 
00026 
00027 
00028 
00025 
00030 
00031 
00032 
00033 
00034 
00035 
00036. 
00037 
90038 
90039 





Este es un ejemplo esquemático de un BIOS mejorado, 
incluye subrayados fragmentos de BIOS estándar 
mostrados en la figura 6-á para evitar confusiones 
entre la subestructura de soporte y Las mejoras. 
Muchos de Los comentarios originales han sido 
abreviados o borrados enteramente. 


NOTA: — Los núneros de Línea a La izquierda se han incluido 
para proporcionar una referencia entre el programa y 
el texto. Existen discontinuidades del iberadas en Los 
números para permitir espacios para expansión. 


Eu 00 ¿Equivalencias utilizadas en el mensaje de 


Cal e ¿ de "funcionando" 
Eo 26 
Eou $ 


Este BIOS es para un sistema de cálculo con la siguiente 
configuración harduare : 
—- CPU 8080 
— 64K bytes de RAM 
—- Controlador de teclado/CRT que transfiere datos como 
“si fuera un puerto serie Cpero sin necesitar un generador 
de impulsos para control de velocidad de transmisión (baud rate 
generator) o programación de La USAR] 
-- Un puerto serie, usado por la impresora o por Los dispositivos 
de Listado, Lectura o cinta perforada. Este chip es un 
INTEL 8251Á con un generador de control-de-velocidad 8253. 
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caian 


—— Dos unidades de discos flexibles de 5 1/4", doble ca 
doble densidad. Estos dispositivos utilizan 
sectores de 512 bytes que son utilizados 
como discos Légicos A: y 8: 
-- Dos unidades de disco estándar de B" (sectores 
de 128 bytes) que se usarán como discos lógicos C: y D 


Se utilizan dos controladores de disco inteligentes, 
uno para cada tipo de disquete. Estos controladores. 

acceden directamente a La menoria para Leer Los detalles 
de Las operaciones que deben realizar y para Leer y escribir 
datos desde o en los disquetes. 


Equivalencias para caracteres en el conjunto de caracteres ASCII 


EDU 1 
EQU 1 

EQU 03m in de transmisión 
EQU 06H ¿Contestación 

“EQU 00m letorno de carro 
EQU UAM ¿Salto de Linea 

EQU 09H ¿tabulador horizontal 
EQU 07H ¿Sonido de campana 


Las equivalencias para definir el tanaño de memoria, La dirección base 
y la Longitud de Los componentes del sistema son: 


lemory8Size EQU 6 ¡Número de Kbytes de RAM 


La Longitud del BIOS puede determinarse por inspección. 

Cambiando el primer carácter de La Línea ORG BIOSSEntry, más abajo, por 
un punto y cona se pondrá ésta como Línea de comentario. (Esto hará que 
el ensamblador comience el BIOS en La posición D.) Ensamblar el BIOS y 

marcar en la posición próxima a 100H La dirección que se visualiza en la 
consola al final del ensamblaje. 


LOSBLenOth EQU 25009 - Puesto a un valor aproximado 


para reflejar Las mejoras 


EQU u8GoM ¡Constante 
CEVOH ¿Constante 


(CCPALENStN + BDOSSLength + BIOSSLen9th + 1023) / 1024 


(Menory3Size - Overall8Length) » 1024 
CCPSEMtry + CCPeLength + 6 


BIOSSENtry CCPeEMtry + CCPSLEngth + BDOSSLengtn 


B00s 


0005H — ¡Punto de entrada al BDOS (para realizar peticiones 
7 de puesta a cero del sistema) 

ORO BIOSSENtry ¡Código de ensamblaje en La dirección del BIOS 

BIOS jump vector 


umP BOOT ¿Arranque en frio -- entrado desde el cargador de CP/M 


HarmsBo0tsEntrys Etiquetado de forma que el programa de inicialización 


(Continuación.) 


pueda situar La dirección de entrada de arranque caliente 
en La posición 0001H y 0002H de La página base 

amp WBOOT ¿Arranque caliente -- entrado saltando a La posición 00004 
Recarga el CCP que puede haber sido reescrito 

destructivamente por el programa anterior en el área 

;_ de programas transitorios 

¿Estado de consola -- devuelve A = OFFM sí existe un carácter 

;_ esperando en la consola 

¿Entrada de consola —- devuelve en A el siguiente carácter 

7 del teclado de La consol 

ida de consola -- Lanza al dispositivo de consola 

el carácter que está en C 

¿salida de impresora -- Lanza al dispositivo de impresión 

7 el carácter que está en € 

¿Salida de perforadora -- Lanza al dispositivo lógico de 

5 perforación el carácter que está en € 


























0013 C3A104 


0018 C3160m 
0018 36209 


O01E 39809 
0021 C3A109 
0024 C3AB0> 


0027 C3370A 
002A C3ABOA. 
0020 30704 


0030 C3LOGA 


0033 CASO 
0036 C39B04 


0039 CaFAO2 


do3c casDos 





00% C3acor 


0042 00 


00223 
00224 
00225 
00226 
00227 
00228 
00229 
00230 
00231 
00232 
00233 
00234 
00238 
00236 
00237 
00238 
00230 
00240 
00241 
00242 
00243 
00244, 
00243 
00246 
00247 
00248 
00249 
00230 
00251 
00252 
00253 
00234 
00255 
00256 
00257 


00259 
00400 

00801 
00402 
00403 
00404 
00405. 
00406 
90407. 
00408 
00409 
00410. 
00411 
00412 
00413 
00414 
00413 
00416 





0043 SISSA24D4900417 






00418 
00419 
00420. 
00421 
00422 
00423 
00424 
00425 
00426 
00427 
00428 
00429 
00430 
00431 
00432 
00433 
00434 
00435 
00426 
100437 
00438 
00439 
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JP AUXINO sEntrada de Lectora -- sitúa en A el siguiente carácter de 
+ entrada del dispositivo de Lectura 
ÓMP O HOME ¡situa en la pista O al disco seleccionado en curso 
JP SELDSK ¿Selecciona La unidad de disco especiricada en Ly devuelve 
7 “La dirección de los parámetros cabecera del disco 
UM SETTAK 3fsja, a partir del par de registro 8C, La pista del disco 
para La próxima operación de Lectura o escritura 
IMP SETSEC sfija, a partir del registro As el sector del disco para La 
3 aróxima operación de Lecturá 0 escritura 
AMP SETDMA iria, a partir del par de registro DE, La dirección 
de memoria de acceso directo para La próxima operación 
de lectura o escritura 
JP READ Lee sobre la dirección de DMA La pista y sector del disco 
+ seleccionado especificado previamente 
MP URITE Escribe en el disco seleccionado La pista y sector 
3 especificados en el disco setec. desde La dirección de DMA 
ue ISTST ioetuelye Az O ES el dispositivo de Tnprenión puede 
Y aceptar otro carácter de salida 
IP SECTRAN ¿Traduce un sector lógico en ino Físico 
: Puntos de entrada al BIOS "privados" adicionales 
: 
ne AUXIST ¡Devuelve A = OFFH si existe un dato de entrada por el 


1 dispositivo Lógico auxiliar 
AUXOST ¡Devuelve A = OFFH sí el Clos) dispositivo auxiliar está 
3 preparado Lógicamente para aceptar un nuevo byte de salida 
SP SpecificRCiORInitialization 
JInicializa el dispositivo de caracteres cuyo número de 
+ dispositivo está en el registro A 


AMP SetsMatehaoo 
vActiva el temporizador centinela para Llamar a La dirección 
3 especificada en ML después de que transurran BC impulsos 
AMP CBRGetaAdareSs 


¡Dirección de obtención del bloque de configuración 
3 Devuelve en HL La dirección de Los datos cuyo núnero 
Y de código se especifica en € 


Bloque de configuración a Largo plazo 


, 
LongsTermsces 


Ficheros públicos (ficheros en el nivel de usuario O accesibles 
para todos Los núneros de usuario) disponibles cuando 
este indicador es distinto de cero. 


CBePublicsFiles: De o ¿Defecto inhibido 


El apuntador de entrada forzado es inicializado para apuntar 
a la siguiente cadena de Éaracteres. Estos son inyectados en el flujo 
de entrada de la consola cuando se levanta el sistema. 


BeStartups »e SUBMIT STARTUP ,LF,0,0,0,0,0,0 


Redireccionamiento de dispositivos lógicos a físicos 


de 16 bits. Cada uno de Los bits de La palabra se asigna 
a un dispositivo físico específico. Para entrada Únicamente 
uno de Los bits puede ponerse a 1 =- La entrada se leerá 
del dispositivo físico correspondiente --. La salida puede 
dirigirse a más de un dispositivo, de manera que más de 

Un bit puede estar a uno. 





Las siguientes equivalencias se usan para indicar dispositivos 


+ 

a 

, Cada dispositivo lógico tiene asociado a él una palabra 
: 

; fisicos específicos. 


suas , 
5432 1098 7654 3210 ):- Número de dispositivo 
EQU D00UR COCOS IOCOS00 1 








EQU 0000 0000s0000s0010B 
EQU 00008000080000801008 
; Las palabras siguientes son comprobadas por el controlador 


de dispositivos lógicos para transferir el control al controlador 


Figura 8-10. (Continuación. 
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+ de dispositivo físico correspondiente 


CesConsolesInout: De 
CBsCOnsolesdutauti 1) 


CBsAuxil1ary8Imputs DM 
CBsAuAil1arysOutpute DA 


CEsListsImputs Du 
Cesta stsouteuta 1) 


: La tabla siguiente rela 


Deyaceso 
Deviceso 


Devices! 
Devacesi 


Devices2 
Devices2 


tona bits específicos en Las palabras 


: de redireccionamiento con Las tablas de dispositivo físico 
especifico usadas por Los controladores físicos 


CEsnevicesTablesaddresses: 

8E02 EN pro, 

AEOZ De D 

ceo Du Drsz 

DOGOGOOOOLODASS Du 
00460 
00481 
00862 
00482 
00464 
00485 
00466 
00467 
00868 
00459 
00470 
100471 
00472 
00473 
00474 De se 
00475 De mn 
100478 


Este flujo de iniciali. 
la fase de inicializac 


el siguiente. 


El fornato del flujo es: 


oLG0s00108 
Ors10s1 18100 


OU1080101E 


oo 
1 
OL 11801180 


De ODER 
De 2 

DOSBaUdéRatesConstant: 
De 0007H 
De o 


DiSInitializesStrean: 
De 00m 
13 $ 
De 9,0,0 
De cl0bsc010R 
De Ors108118108 


De DOL0s0101B 


e ODE 





1 
108118011808 


Figura 8-10. (Continuación) 


0,0,0,0,0,0,0,0,0,0.0,0.0 


¡ción se Lanza 
n del dispositivo. Se define 
en el bloque de configuración a Largo plazo para dejar 
“congelados” sus contenidos desde un arranque hasta 





¿No asignado 


Flujo de bytes de inicialización de dispositivo 


salida durante 


La dirección de cada flujo está contenida en cada tabla de dispositivo, 


¿Número de puerto (termina en 004) 
Número de bytes a Lanzar al puerto 
Valores a Lanzar a salida 





¡Datos ejemplo para el chip 82514 
¿Número de puerto para el 82514 
¿Numero de bytes 
¿Bytes ficticios para preparación del chip 
Puesta a cero y elevación de DIR 
1 parada, paridad no, 8 bits/carácter 
5 factor de división de 16 
¿RTS-alto, disponible Tx/Rx 
¿Datos ejemplo para el chip 8253 
¿Núnero de puerto para 8253 
¿Número de bytes para salida 
¿Selección: 





Contador 1 
Cargar primero byte LS 

Modo 3, contador binario 
¿Número de puerto para el contador 
¿Número de bytes para salida 

¿Etiqueta usada por Las Utilidades 

;9.600 baudios (basado en divisor por 16) 
¿Número de puerto de flujo terminado en 00 


¡Datos ejemplo para el chip 82514 
¿Nunero de puerto para el 82514 
¿Número de bytes 
¿Bytes ficticios para preparación del chip 
¿Puesta a cero y elevación de DIR 
“1 parada, paridad no, 8 bits/carácter 
¿, factor de división de 16 
¿RTS-aLto, disponible Ta/Rk 


¡Datos ejemplo para el chip 8253 
¿Número de puerto para 8253 
¿Núnero de bytes para salida 
Selección: 
Contador 2 
Cargar primero byte LS 
Modo 3, contador binario 
¿Número de puerto para el contador 
¿Número de bytes para salida 














00517 
cos1s 
00519 
pos20. 
vos21 
00522 
00823 
vos2a 
90525 
00526 
00827 
00528 
00529 
0030 
00531 
00532 
00533 
00534 
00535 
00536 
00537 
00538 
00539 
00540. 
00581 
00592 
00593 
0osas 
005as 
00580. 
0587 
00sas 
usas 
00550 
100551 
Ossa 
ass 
00554 
00555. 
00BA 00 00550 
0055 
008s 3938 00555. 
0087 FF 00559 
00B8 2634 D05s0 
DOBA FF Dosé1 
00B8=363A 0056. 
00563 
Dosés 
00565 
00566 
00567 
00568 
00569 
00870 
00871 
00572 
00573 
100574 
00973 
00576. 
00577 
00578 
00579 
v0ss0. 
00581 
00582 
00583 
00584 
coses. 
coses 
00587 
00588. 
00585 
00570 
00591 
00892 
00593 
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DisDaudsRatesConetante 
7] S03em .200 baudios (basado en divisor por 16) 
DE o ¿Número de puerto de flujo terminado en 00 


D2SImitralizesStreame ¡Datos ejemplo para el chip 82514 
De 000 ¿Núnero de puerto para el B2514 
De ES ¿Número de bytes 
DE 5.0,0 ¿Bytes ficticios para preparación del e 
De olobs00108 luesta a cero y elevación de DIR 
De OS 51 parada, paridad no, 8 bits/car 
3_ factor de división de 16 
De O0L08O1018 ¿RTS-alto, disponible Tx/Rx 


¿Datos ejemplo para el chip 8253 

oe ou ¿Número de puerto para 8253 
De 1 ¿Número de bytes para salida 
DE 118118011508 ¿SeLección: 

Contador 3 

Cargar primero byte LS. 

Modo 3, contador binario 
DE oDEK ÍNumero de puerto para el contador 
E 2 ¿Número de bytes para salida 

D2SBaudsRatesCons tan! 

0 003sm 5.200 baudios (basado en divisor por 16) 
ve o ÍNúnero de puerto de flujo terminado en 00 


La tabla siguiente se utiliza para determinar el valor máximo 
de cada posición de indicación horaria ASCII (excepto Los "2%). 

Esta tabla está en el bloque de configuración a Largo plazo, de manera 
que el reloj puede ser puesto permanentemente en formato 

de 12 6 24 horas. 


NOTA: La tabla se procesa hacía atrás == en correspondencia con 
el tiempo ASCII. 

Cada carácter representa el valor del correspondiente 

carácter en "horas" ASCII en el que puede ocurrir un 
acarreo-y-puesta-a-cero. 


DE o ¿"Terminal 
CR8128208C Loch + 
DE ¡Cambio de reloj de 123* a '12* horas 
De 
¿Máximo de minutos 59 
Carácter de "salto" 
¿Máximo de segundos es 59 
UpdatesTimesEna: ¿Utilizado cuando se actualiza 


Variables para el reloj de tienpo real y para temporizador 
centinela 


1 
RTCSTAckstpersSecond DB su ¿Número de pulsos de reloj 
7 por segundo transcurrido 

RTCATICK8COUNt De su ¿Cuenta residual entre un segundo 

y el siguiente 
RTCsMatchdogsCount Du ¿contador de pulsos temporizador centinela 

(0 = no activado temporizador centinela) 
RTCsMatchdogsAddress DW rección a La que será transferido 

el control sí La cuenta del temporizador 

centinela Llega a 0 


Tabla de teclas de función 


Esta tabla consta de una serie de entradas cada una de ellas con la 
siguiente estructura: 


De Segundo carácter de La secuencia emitida por la tecla 
de función del terminal 
De Tercer carácter de la secuencia -- NOTA: Este campo 
no estará presente si el código fuente 
se ha contigurado para aceptar sólo dos caracteres 
en secuencias de tecla de función. 
NOTA: Ajuste de equivalencias para: 
FunctionsreysLength 
TnreesCharacterSPunc tion 


Figura 8-10. (Continuación.) 
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003554 
00595 
00596 
00597 
00598 
00599 
00800 
00801 
00602 
00803 
00804 
00805 
00806 
00607 
00608 
00609 
00610 
00811 
00612 
00613 
00614 
00615 
00616 
90817 
00618 
00615 
00620 
00621 
00622 
00623 
0024 
00625 
00826 
00827 
00828 
00829 
AFSOA6756E00830. 
AFS146756E00621 
AFS246756E00632 
AFSIAG756E006 33 
00634 
00635 
3B4155702000636 
S5B4Z444F 7700637 
SBA382696700638 
SBAGACESESO0639 
20630 
0900000000061 
000000000000642 


Una cadena de caracteres es forzada en el flujo de entrada 

de consola cuando se pulsa La tecla de función correspondiente, 
EL último byte de esta cadena debe ser 00M para terminar 

la entrada forzada. 


E0Uu 18m ¿Secuencia de señales de tecla de función 
FunctionskeysLength EQU 3 Número de caracteres en La función 
secuencia de entrada de tecla (NOTA: puete 
Ser sólo 3 6 2 caracteres) 


La Lógica asociada con el reconocimiento de 
5 teclas de función se hace fácilmente 
¿a partir de La siguiente igualdad 
ThreesCharactersFunction E0u FuncticnsreysLength — 2 
 ThreeSCharacterSFunction Será verdadera (TRUE) 
5 si La tecla de función emite 
tres caracteres, falsa (FALSE) si emite 
3 una secuencia de dos caracteres 


A Cada entrada en La tabla debe tener La misma Longitud, se define: 
CRAFUnCtionsKeysEntry8Size EQU 16 +1 + FunctionsreysLength — 1 


Máxima Longitud de La cadena Priner carácter no figura en 


de sustituto ; La entrada de tabla 
Para terminar 004 


Los valores ejemplos que se muestran a continuación son para un terminal VI-100 


BsFunctionsKeySTable: 


: 
; 
; 
; 
+ 
; La última entrada en La tabla se marca con un byte 00H 
1 
, 
a 


123456789. 1294 5 6 7 «- Utilizar para compr. de Longitus 
De Function Key 1'.LF-0,0 
DB sos Function Key 2"/LF-0,0 
De Function Key 3,LF/0,0 
DB a Function Rey 4-/LF/0,0 


123456789. 1 
e 
ñ3 
De 
ES 


De ¡Entradas disponibles 
De 
DE 
DB 
DE 


¿Terminal para La utilidad que preprograna La 
secuencia de teclas de función 


Tabla de control de secuencias de escape de salida de La consola 


Esta tabla se referencia después de que se ha detectado un carácter 
FunctionSkeySLead en La rutina CONOUT. El carácter siguiente a Lanzar 

a salida por consola se compara con el primer byte de cada entrada 

de tabla de 3 bytes. Si encuentra coincidencia, se transfiere el control 
a la dirección que sigue al byte coincidente. 


ONQUTSEscapesTable: 
DE as 
De CONQUTATAme 
De “a ¿Lectura de día en curso 
De CONOUTADAte 
De u 

De CONOUTSSetATAme 





¿Lectura de tienpo en curso 





¿Fijar tiempo en curso 
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0724 eS 
0225 4504 





0227 00 00674 
00675 


00877 7 
00800 :m 
00801 
00802 
00803 
00804 
osos. 
0080S. 
00807 
00808 
00809 

020 00810 


00812 
00813 
vo81a 
D0815. 
Do816 
00817 
oos18 
00819 
00820 
00821 
00822 
00823 
00824 
00825. 
00826. 
00827 
0821 
ESTA 
00901 
009021 
00903 
S 00904, 
00905 
- 00908 
- 00907 








OS 
00912 





00876 — LongsTermeCBsEn: 





00908 — DOSStatussPort EQU 
- 00909 — DOsModesPort EQU 
00910  DOSCommandaPort EQU 


00913 DisBasesPort EQU 
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De 


. ¡Fijar fecha en curso 
E) CONDUTSSetsDate 


Ds o ¿Terminal 





Vector de interrupciones 


El controlador de interrupciones programable (Intel 82590) transfiere 
el control a este punto. 


Nor, 





EL chip controlador de interrupciones precisa 

que La tabla de vectores de interrupción empiece en un principio 
de párrato. Esto se consigue con La Línea ORG siguiente 
ORG LS AND OFFEOM) + 20m 





0811 InterruptaVector: 


tInterrupt number 








JP RTCSInterrupt 10 —- reloj 
De o 1SaLto de un byte 

WMP o CharactersInterrupt 11 =-entrada/salida de carácter 
DB o Ss 

JP ChostsInterrupt 12 -- no utilizada 

DB o 

JMP O GhostsInterrupt +3 —- no utilizada 

Da o Ñ 

QMP O GhosteInterruet 14 —— no utilizada 

De o 

QMP O GhostsInterrupt +5 —— mo utilizada 

De o 

WMP O ChostaInterrupt +S —- no utilizada 

De o 

WMF GhostsInterrupt +7 -- no utilizada 


Números de puerto y otras equivalencias 
E0u Som ¿Número de puerto base 


Eu 
E0u 





ispositivo O 





ispositivo 1 











. 00914 Emu 
. 00915 EQU 
. 00916 E0u 
. 00917 E0u 
00918 
. 00919 E0u ¿Dispositivo 2 
. 00920 Eu 
z 00921 ou 
- 00922 E0u 
- 00923 E0u 
00924 
5 00925 ou OrRcOR Lis LOR. 
00926 71 bit de parada, paridad no 
00927 78 bits, asinc., factor 16 
009 00928 Eo oO IÓOR 
00929 ¿Tx/Rx en el reloj interno 
00930. ¿9.600 baudios 
07. 00931 — DsCommandaValue EQU 00s1GO11iB 
00932 ¿Modo normal 
00933 ¿Tx/Rx disponible 
00934 ¿Activar RTS y DTR 
0098 + 00935 DsError E0u 008 
0037 00938 — DsErrcraResel EQU ME 
00937 ¿Lo mismo que valor de orden más puesta a cero de error 
0001 00938  DsGutput$feady EQU 0000800018 
0002 = 00939 — DeInputsReady EQU 0000800108 
0080 = 00930 DeDTRAMi0h E0U 1000800008 ¿Nota: esto es realmente el pin DSR 
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vosa1 
00942 
00943 
00984 
00945 
00946 
00937 
00948 
00995 
00950 
0098: 
00952 
D095a 
00954, 
00958 
00956 
100957 
00958 
00959 
00960 
90901 
009% 
00963 
0094. 
00985 
00966 
00967 
00968 
uses 
00970 
00971 
90972 
90972 
00974 
00975 
00976 
00977 
00978 
o1100 
oros 
oraz 
ENT 
01104 
9110 
ze 01108 
8 01107 
ce 01108 
a 01109 
ES orto 
Co07O3 01114 
El ora 
23 or 
CasFoz 01114 
or1s 
p1200 
o1201 
p1202 
01203 
01208 
01205 
01206 
01207 
01208 
01209 
o1z16 
o1211 
01212 
ETE 
o1z14 
ETE 
DIZ16 
01217 
or218 
REE 
01220 
01221 
01222 


1CSOCH18POrt 
1CSOCHZAPOrt 
1CSOCHIMPOr t 
1CSICH1SPOrt 
1CSICHZSPOrt 


1csEor 


TcsIcHr 


1CHICHZ 


1080cH 


Displaysmessags 


mov 
ORA 
RL 
moy 
PUSH 
CALL 


z 
Enterscem 
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5 (data-set-ready) del 
7 chip, Está conectado al 
7 pin Dra 
Eo oos1soo111B ¿Elevar RIS, Tx/Rx preparado 
EGU 0ososoo111B ¿Bajar RTS, TÑ/Rx preparado 


controlador de interrupciones (Intel 82594) 


Estas equivalencias se sitúan en este Lugar siguiendo 
a La definición de vector de interrupciones 
y así evitar errores 'P" (fase) en el ASM 


EQU 009 de control operacional 1 
EQU 0D8H ¿Palabra de control operacional 2 
EQU 0DSHM ¿Palabra de control operacional 3 
EQU 008 ¿Palabra de control de inicialización 1 
EQU 00H ¿Palabra de control de inicialización 2 


EQU 20H ¿Final no específico de interrupción 


EQU (ImterrupteVector ANO 1110800008) + 0008101108 
¿Fijación de Los bits A7-AS de La dirección 
del vector de interrupciones má: 
Activación por flancos 
Intervalo de 4 bytes 
8259 único en el sistena 
y No necesita 1CH4 
Interruptgvector HR 2 
¿Bits de dirección A15-A8 de La dirección del vector 
de interrupciones. Nótese que el vector 
$ de interrupciones es La primera estructura 
en el bloque de configuración a Largo plazo 


INIISIIOOE ¿Máscara de interrupciones 
interrupción O (reloj) activada 
¿Interrupción 1 (entrada de carácter) activada 


'sualización en La consola del mensaje especificado 
En entrada, HL apunta al flujo de bytes a sacar. 
¿Un byte 00 termina el mensaje. 
a tención byte siguiente de mensaje 
A ¿Comprobación de si es un terminal 
¿Si, retorno al LLamador 
CA reparación para salida 
” ¿Alnacenamiento de apuntador a mensaje 
CONouT ¿Ida a La rutina principal de salida por consola 
la ¿Recuperación apuntador a mensaje 
E ¿Desplazamiento a byte siguiente de mensaje 
DisplaysMessage ¿Bucle hasta completar salida de mensaje 


¿Esta rutina se carga desde Los programas de arranque en frío y 
en caliente. Fija las instrucciones JNP en la 

; Página base y La dirección de DMA de la 

7 entrada/salida de Las unidades de disco. 


A ¿Obtención del código máquina para Los JN? 
a] ¿Fijación de Los JNP en La posición 00004 
000SH 7 y en la posición 00054 


H.MarmeBootsEntry, ¡Obtención de La direc. del vector del B105 
obo1H ¿Puesta de La dirección en La posición 000% 


MH. BDOSHENtry — ¡Obtención de La direc. del punto de entrada al 8005 
e ¿Puesta de La dirección en La posición 0005 


E, som ¿Fijación de direc. E/S de disco a su valor por defecto 
SETOMA ¿Utilización de La rutina B10S normal 


¿Asegurar activación de interrupciones 
Defaultstist — ¿Manejo del disco por defecto en curso al 
CA % procesador de comandos de consola. 
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02 C300cA 01223 ame CCPREMtrY ¿Transferencia al CCP 
o1zes 
01300 
91301 
013023 Equivalencias de tabla de dispositivo 
01303 + Los controladores utilizan una tabla de dispositivo 
130% + para cada dispositivo físico al que sirven. Las equivalencias 
D130S + Que siguen se utilizan para acceder a diferentes campos 
o130s + en el interior de la tabla. 
D1307 3 
ol30s + Nóneros de puerto y bits de estado 
0000. 01309 — DISStatussPort En Número de puerto de estado de dispositivo 
200. GI3LO — DTéDatasPort EDU DTeStatusarortel 
01311 “Numero de puerto de dispositivo de datos 
0002 2 01312 DTsOutputsReady EU DTaatarórtes 
01313 ¡Máscara de estado de salida preparada 
0003. DI21A — DTSInputsReady MU OTaduteutsñead, +1 
o1315 ¿Máscara de estado de entrada preparada 
0004. OI31S — DTSDTRSRrady EQU DYsInputiRead:+1 
01317 ¿DTR preparado para enviar máscara 
0005 = 01318 — DIsResetslntsPort EQU DTSUIRSKeadys1 
1319 ¿Número de puerto preparado para enviar 
ol3zo máscara cero de interrupción 
0006 = OL321— DTaResetsIntaValue EQU DTsReset$intaroriel 
01322 ¿Valor de salida puesta a cero interrupción 
0007 = OL323  DTaDetectóErrorsPort EQU DTaResetsIntiValuesl 
01324 lúnero de puerto para detección de error 
00. O1325 — DIsDetectsErrorsvalue EQU DTaDetecisErrorsFortes 
01328 ¿Máscara para detec. de error (paridad, etc.) 
2009. 01327 — DTsResetsErrorsPort EQU DTDetecisErrorsvaluesl 
o132s ¿Salida a puerto para puesta a cero de error 
0004 = 1329 DTSResetsErrordValue EQU DTaResetbercrsrortol 
01330 ¿Valor de salida para puesta a cero de error 
0008 1331 DTARISSCOMtrolWPort EQU DIsResetgErrorsvalues 
01332 ¿Puerto de control para RTS bajo 
Poe 01333 DTsDropsRTSAValue EQU DTARTSSCONtrolStori=t 
01334 ¿Valor para bajar RTS, al lanzarlo 
0000 2 DI3S — DTSRarsesRISSValue EQU DTADrOPSRTSAValuert 
D1336 ¿Valor para elevar RTS, al lanzarlo 
013373 
EA Estado de dispositivo lógico (incl. protocolos) 
no D1339  DrsStatus EOL DOTAR sesRTSRVa ue 1 
01340 ¡Bits de estado 
000. 01341 — DTsOuteuteSuspend E0u ooouso0Ie ¿Salida suspendida pendiente de La 
01342 ¿acción del protocolo 
0002 a 01343 — DTSInputeSuspend EQU O000Ñ00IOB ¿Salida suspendida hasta que se 
O134 7 vacíe La menoria intermedia 
0004 01345 DTSOUtAULSDTA EDU 000UGIO0B ¿La sal. utiliza DTR-aLto para enviar 
0008 = 01365 — OTsOutputskon EU 000G81000B ¿La salida utiliza XON/XOFf 
0010 01347 — DTSDutpUtsEtE EU 0001800008 ¿La salida utiliza ENVACK 
0020 2 01348 DTsOutputsTimeout EQU 001GÉ0000B ¿La salida utiliza Límite de tiempo 
2040 01349 — DISIMPutsRTS EQU 010080000B  ¡Lasal.utilizaIRS-aLtopara recibir 
000. 01350 — DTSInputexon EQU 1000800008 ¿ta salida utiliza NON/MOFF 
01351 
200. 01352 — DTSStatuss2 EQU DTsStatusel ¿Byte de estado secundario 
000 = 1353 DTSFakesTy a E0u  00Goso001E ¡Petición de ImputSStatus para 
o1354 ¿devolver "Datos preparados" 
01355 5 cuando hay carácter de control en 
01356 3 Ka menoria intermedia de entrada 
01387; 
0010. 01358 — DTSEtuSCount EQU DTsStatusszes 
01359 'Nónero caracteres enviados con protocolo Etx 





Do OL360  DTSELn8MessagesLength EQU DTSELNSCóunt+2 





ETE Longitud del mensaje especificado 
01362 + 
CEA Input butter values 
ota e 01364 DTeBuffersBase E0U DTSEtK8MessagesLenatn+2 
oras ¿Dirección de La mem. int. de entrada 
006 = ON36S — DTAPULSON Eset E0U DTS RufferStasesz 
01367 ¡Desplaz. para puesta de carác. en mem. it. 
0017. 01368 — DTSGeLSOtfset EDU OTAFUta O fsetel 
oL36> ¿Desplaz. para obtención de carác. en nen. int. 
0018 DI27O — OTsBUfferSLengthsMast EQU DTaGetaOffsetel 
91371 ¿Longitud de La memoria intermedia - 1 
91372 Nota: La Longitud de La mem. int. debe ser 
01373 


siempre potencia de 2: 32, 64, 128 
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oL374 Esta máscara se convierte entonces en: 
01375 2 oe 
01376 Ss cono 
01377 ds — 13 coso , 
01378 vespués de La SOLIcación de La función 
sun obtención/puesta el despl. se ha incrementado, 
81380 Se opera (AND) con La máscara para ponerlo 1 
01381 7 cero euando se alcance el Final de la mn, Mt 
01382 — DTsCharacterscount DIARIA Fer bLemolnma sr +1 
01305 lenta del minero de caracteres en curso 
01304 en La memoria Internedia 
01395 — DTSStopSInputaCount Drscharacteracounte 
01306 arar entrada cuando el contador alcance 
01387 ete valor 
01368 — DTSResumesInputecount DrsSlopsImput Count el 
01309 inicio de La entrada cuando el contador 
21350 alcanza este valor 
01391 — DTsComtrotacount DTS sume Input acount el 
01352 Cuenta del número de caracteres de control 
01353 ¿en la memoria Intermedia 
01394 — DTSFunctionsDelay DTeCantrolacoumes 
01395 ¿Nimero de pulsos de reloj a retrasar para 
013% 7 permitir La Llegada de todos los caracteres 
01397 ¿ después de pulsar la tecla de función 
01398 — DTSInitializesStrean DTOFn ct ionebe laos 
01399 irección del flujo de bytes necesario 
Slaoo ¿ara inicializar 
21801 
91500 
01501 
01502 Tablas de dispositivo 
01503 
01304 
Siños DB DosStatussPort ¿Puerto de estado (chip 82514) 
01506 De DOSDatasPort ¿Puerto de datos 
915307 De De0utputsReady ¿Salida de datos preparada 
01508 DB DSInputSReady ¿Entrada de datos preparada 
21509 De DeDreenian 7 ¿DIR preparado para mandar 
Sisio DB IesocMzaPort ¿Puesta a 0 puerto de Int. (00H es puerto no utiLindn 
Sis De EEOn Pueste a 0 valor de int. (EOL no especifica) 
S1512 DB DONStatussrort ¿Detección de puerto error 
01515 DE Datrror Máscara, estado del proc., esc. encina, error parida 
ol314 De Puesta $ cero puerto error 
01315 FS Puesta a cero: AiStaLto, Tx/RK activo 
ol51e Inajada/elevación puerto RTS 
01517 DROrcP8RTS ¿Bajar valor RIS (mantener Tx/Rx activo) 
S151e DóñaiseÓRTS — ¿Elevar valor RTS Ímantener Ta/Rx activo) 
01519 DTsImputelon > OÍRIneUtIArS o sprotecolo y estado 
01520 ¿Estado Ne 
01321 EEXJACK contador de mensa; 
01522 JELR/ACK Longitud de mensa, 
01523 DOS Dut ter Inenoria intermedia de entrada 
01524 S Puesta del desplazamiento en La memoria internedia 
o152s 9 ¿Obtención del desplazamiento en La men. int. 
01526 DOSBuffersLength -1 ¿Máscara de Longitud memoria intermedia 
01527 o ¡Cuenta de caracteres en Lo menoria Internos! 
S1s28 DosBut tersLength” 5 ¿Parar ent. Cuando contador [Lega e este valor 
01529 DOsBuffersLenath/ 2 ¿Reanudar ent. cuendo contador Llego a este valor 
01530 o ¿Cuenta del núm. de carac. de control en la mem. int. 
0153 < ¿Número 16,66 pulsos para permitir La Llegada 
91332 ¿7 de La secuencia de la tecla de función 
013533 DosInitializessióean "¿Dirección del flujo de Ineraliza 
01534 
2 
Si33s DisStatursPort ¿Puerto de estado (chip 82514) 
01537 DisDalasPort | ¿Puerto de datos 
01538 Dadutputaneady ¿Salida de datos preparada 
ES Detmputameady” ¿Entrada de datos preparado 
01540 DSDTRSHigh ¿DYR preparado para mandar. 
0134 ICaocuembort — ¿Puesta a D puerto de mt. (00H es puerto no utiLizadn 
01842 1csEor ¿puesta a 0 valor de int. (EOI no especifica) 
DisStatusarort ¿detección de puerto error 
Máscara, estado del proc., esc. encina, error paridad 
IPuesta 4 Cero puerto error 
Puesta a cero: ATScaLto, Dx/Ax activo 
DiSCommandsPort ¡Bajada/elevación puerto RTS 
DSOrOPeATS” ¿Bajar valor RTS (mantener TX/R activo) 
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020 27 
020 Co 
0280 00 
OZ 0004 
02c0 0004 
0202 4422 
0204 00 
0205 00 
0206 1F 
0207 00 
0208 18 
0209 10 
DZCA 00 
0208 06 


occ 9400 








02EC A4OO 


DR AF 


DEAR 


OZFO COFADZ 
023 30 
D2FA FELO. 
02 Ce 
027 C3F002 


oras 
01550 
01551 
01552 
01553 
01554 
01555 
01356 
01557 
01358 
01559 
01360 
01361 
01362 
01363 
0156: 

01565 
01366 
01567 
01568 
01569 
01570. 
01571 
01372 
01373 
01374 
01375 
01576 
01377 
01578 
01579 
01580 
01581 
01582 
D1583 
01584 
o15es 
01586 
91387 
01388 
01389 
01390 
91591 
01392 
01393 
01394 
01395 
01596 
01597 
01700 
01701 
01702 
01703 
01704 
01705. 
01706 
01707 
01708 
01709 
D1710. 
01711 
01712 
D1713 
o1714 
01715 
01716 
01717 
01718 
01719 
01720 
01800. 
01801 
01802 
01803 
01804 
01805 
01806 
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De DRaisesRTS ¿Elevar valor RTS (mantener Tx/Rx activo) 

DE DTeInputsxon + DTSInsutsRTS — ¡Protocolo y estado 

De o Estado M2 

E 1024 FELx/Ack contador de mensaje 

Da 1024 FEtx/Ack Longitud de mensaje 

De DISRU er ¿Menoria intermedia de entrada 

De o ¿puesta del desplazamiento en La menoria intermedia 

De o Obtención del desplazamiento en La mem. int. 

DisBuffersLengtn 1 ¿Máscara de Longitud menoria intermedia 
o .Cuenta de caracteres en La memoria intermedia 
DisBuf fersLength” 5 ¿Parar ent. cuando contador LLega a este valor 
DisBuffersLength/ 2 ¿Reanudar ent. cuando contador Llega a este valor 
o ¿cuenta del_nún. de carac. de control en la mem. int. 
s Número de 16,6 pulsos para permitir La Llegada 
de la secuencia de la tecla de función 

P e sam ¿Dirección del flujo de inicialización 

pe ¡Puerto de estado (chip 82514) 

De ¿Puerto de datos 

De ¿salida de datos preparada 

DB ¿Entrada de datos preparada 

De DSDTRSMI 9h ¿DTR preparado para mandar 

DE 1CsOCU2aPort ¿Puesta a O puerto de int. (00H es puerto no utilizado) 

De 1CSEO1 ¿Puesta a O valor de int. (EOL no especifica) 

De DieStatussPort ¿Detección de puerto error. 

De DeError ¿máscara, estado del proc., esc. encina, error paridad 

De DZsCommandsPort ¿Puesta á cero puerto error 

ES ¿Puesta a cero: RTS-aLto, TXx/Rx activo 

De ¿Bajada/elevación puerto RTS 

De ¿Bajar valor RTS (mantener Tx/Rx activo) 

De ¿Elevar valor RTS (mantener Tx/Rx activo) 

se DTsInputsxon + DTsinputsfTS — ¡Protocolo y estado 

ce o ¡Estado Ñ2 

7] 1024 ¿Etx/Ack contador de mensaje 

Du 1024 FEtx/Ack Longitud de mensaje 

De DC ter ¿Menoria intermedia de entrada 

De o ¿Puesta del desplazamiento en La memoria internedia 

DE o ¿Obtención del desplazamiento en La mem. int. 

DE DasbuffersLength —1 ¿Máscara de Longitud memoria intermedia 

DE o Cuenta de caracteres en La memoria internedia 

DE D28Buf fersLength- 5 ¡Parar ent. cuando contador llega a este valor 

3 math/ 2 ¿Reanudar ent. cuando contador Llega a este valor 

De ¿Cuenta del núm. de carac. de control en La mem. int. 

De ¡Número de 16,66 pulsos para permitir La Llegada 

7 de La secuencia de La tecla de función 

E DasInitializesstream ¡Dirección del flujo de inicialización 
: Inicialización general de dispositivo de E/S de caracteres 
1 
, Esta rutina será Llanada desde el programa principal 
; de inicialización de CP/M. 
1 Hace varias Llamadas a La rutina específica de inicialización 
, de dispositivos de E/S. 
GeneralsCIOSInitialization: 

RA A Fijación núnero de dispositivo (utilizado para 
acceder a La tabla de direcciones de tablas de 
dirección del bloque de configuración) 

moy CA Jemparejamiento con interfaz Llamable externamente 

GCIANextaDevicer 





CALL SpecificacIosInitialization — ¿Inicialización del dispositivo 





INR Mover a dispositivo siguiente 
cer comprobación de inicialización de todos Los 
AZ dispositivos (0 - 15) posibles 

a 





Inicialización de dispositivos específicos de E/S de caracteres 


Esta rutina Lanza a La salida valores específicos de bytes a Los puertos 
especificados controlados por Los flujos de inicialización del bloque de 
configuración. Cada tabla de dispositivo contiene un apuntador 
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01807 a estos Hujos. La tabla de dispositivos se relaciona 
o1908 de acuerdo con el número de dispositivo —= es un parámetro 
51809 de entrada para esta rutina. 
disto La rutina puede ser Llanada desde La rutina anterior de inicialización 
vit general o directamente por Una Llamada a BIOS desde 
01812 da Utilidad del sistema ejecutándose en La TPA. 
Dieta 
01814 Parámetros de entrada 
D1SIS 
D1s1S € = núnero de dispositivo 
01817 
o181e Parámetros de salida 
01919 
01820 A = número de dispositivo (preservado) 
d1e2 
Dre2a ... 
01823 ¿c=== Punto de entrada al BIOS (privado) 
01824 
Jo d1s2s ¿obtención número de dispositivo 
ES 01828 ¿preservar número de dispositivo 
e 01827 ¿componer núnero de dispositivo en apuntador 
ar 01828 
0600 0182 Componer en una palabra 
26800 01630 DevicesTaviósadorosses Obtención tabla base 
S9 Den DAD He O direciión tabla de dispositivo 
Se o1832 mov ¿Obtención byte LS 
Es] 01833 
Se O1838 mov " ¿Obtención byte MS DE > tabla de dispositivo 
d183s 
Ja 01830 mov » ¿Comprobación de dirección tabla dispositivo =0 
93 01827 ORA 
caros 01838 7 Screat SÍ, tabla de dispositivo inexistente 
ols39 
211000 01840 LI ML OTSInitializesStrean 
13 01841 ES HIS dirección flujo de inicialización 
se 01842 moY EM ¿Obtención byte LS 
ES 01843 mA 
Se 01894 Poy Dn ¿Obtención byte MS 
ED 01845 xo MLS flujo de inicialización 
IS CALL OutrutsBytesStream ¡Sida flujo de bytes 
91847 5 a diversos puertos 
0188 7 
0184 dcrsexat: 
01850 Por ¿Recuperar número de dispositivo de usuario en € 
ole Rer 
d18s2 
02000 
02001 Salida de flujo de bytes 
02002 
02003 Esta rutina Lanza a salida bytes de inicialización a núneros 
02004 de puerto. El Hlujo de bytes tiene el formato siguiente: 
02008 
02006 Ds ppm Número de puerto 
02007 DE nm Mómero de bytes para salida 
02009 DE VOM W WM] Bytes para salida 
02009 : 
02010 Repetición 
020 ' 
02012 00H Número de puerto de 0 
02013 
02018 Paránetros de entrada 
02015 
02016 HL => flujo de bytes 
02017 
02018 — DutrutsBrtesStream: 
02019 OBSaLoo»: . 
02020 ho am ¿Obtención núnero de puerto 
0202 or ¿comoroba € 
02022 17 ¿salida sí final de flujo 
02023 STA omssPort ¿Almacenar en núnero de puerto 
02024 E IM cuenta de bytes 
02025 mor Obtención cuenta 
02026 Pr =HL => primer byte de inicialización 
02027 + 
A A a ¿Obtención byte siguiente 
ES o /HL —- byte de datos siguiente (o número de puerto) 
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0324 09 


0325 00 
0326 0D 

0327 022203 
032A C31903 


0320 2A5800 
0230 116400 
0333 CDSFOS. 
0396 034708 


0399 00 


0394 2a800F 
0330 7E 
30 07 
0335 CAA7O3 
032 23 
0343 22800" 
0308 09 


0347 2A5800 
03M 116400 
0340 CDÁFOS 
0350 CD9108 





0353 FE1B 


0395 co 
0356 FS 


02031 
02032 
02033 
02034 
02035 
02036 
02037 
02038 
02100 
02101 
2102 
02103 
02104 
oz1os 
02106 
02107 
02108 
02109 
02110 
02111 
02112 
02113 
02114 
02115 
02116 
02117 
sae 
0219 
02120 
FTE 
02122 
02200 
02201 
02202 
02203 
02204 
02205 
02206 
02207 
02208 
02209 
cazo 
022 
02212 
02213 
02214 
215 
02216 
02217 
02218 
02219 
02220 
02m 
02222 
02223 
02224 
02223 
02226 
02227 
02228 
02229 
02230 
02221 
02232 
02233 
02294 
02235 
02236 
02237 
02238 
02239 
02240 
02241 
02242 
02243 
02249 
o22ss 
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e our 
OBSSPOrt: 
DE. o ¿<- Puesta a 1 en instrucción anterior 
AS ¿Decrementar contador de bytes 
JNZ O OBSeNexteByte — ¿Salida byte datos siguiente 
ÍmP OBSeLO0 ¿Vuelta atrás para siguiente número de puerto 


CONST — Estado de consola 

Esta rutina comprueba el apuntador de entrada forzada 
y la cuenta de caracteres para La memoria internes 
apropiada. El registro A se activa para indicar cuándo 
existen datos a la espera. 

Parámetros de entrada: ninguno. 

Parámetros de salida 


A = 0004 si no hay datos esperando 
A = OFFH si hay datos esperando 





-ONST: 1o 
EMO CBSCOnsolesInput ¡Obtención palabra de redireccionamiento 
EXT D/CESDevicesTablesadaresses 
CALL ble ¿Obtención tabla de dispositivos 
SNE Gets IMpuréStatus ¿Obtención estado de dispositivo de entrada 

5 y retorno a quien efectúa La Llamada 





+ 
; 
+ 
E 





Punto de entrada al BIOS (estándar) 








CONIN -- entrada de consola 





, 

, Esta rutina devuelve el carácter siguiente del flujo de entrada de 

, consola. Dependiendo de Las circunstancias puede tratarse de un carácter 
, de la memoria intermedia de entrada de consola o de una cadena de 

1 caracteres almacenada previamente para ser "forzada" en el flujo de 

1 entrada por Las rutinas de ejecución o de inicialización del sistena. La 
1 “entrada forzada" puede provenir de una cadena de caracteres almacenada 

1 previamente en nemoria. Se utiliza para inyectar La fecha y hora en 

i curso o Una cadena asociada con una tecla de función en el flujo de 

; consola. AL Levantar el sístena, se fuerza La cadena “SUBMIT STARUP" en 

1 el fLujo de entrada de consola para proveer el mecanismo. 


La entrada normal (no torzada) de un dispositivo físico cualquiera se 
especifica en la palabra de redireccionamiento de entrada de La consola 
Cver bloque de configuración. 


1 

CONINSDelayBElapsed: DE o ¿Indicador utilizado durante el proceso 
de La tecla de función para indicar 

5 el transcurso de un retardo 

predeterminado 











CONIN: ;0=== Punto de entrada al BD0S (estándar) 
LMLD CESFOrcedsInout ¿Obtención apuntador a entrada forzada 
moy AA ¿Obtención carácter de entrada siguiente 
OR A ¿Comprobación de nulo 
ae CONINSNOSF ¿S, no entrada forzada 
moon ¿Si actualizar apuntador 
SHLD CEeFOrcedsInput 7 y almacenarlo en su posición 
REr 

CONINSNOSF 1 ¿No, entrada forzada 
EHD O CBsCOnsolesInput ¿Obtención palabra de redireccionamiento 
LXTO — D,CBRDevicesTablesadorosóos 
CALL SelectóDevicestable ¿Obtención dirección tabla de dispositivo 
CALL GetsInputsCharacter ¿Obtención carác. siguiente dispositivo ent. 


¡Proceso de teclas-función 
CPI FunctionsKeysLead ¡Comprobación de primer carácter de secuencia 
¿de tecla-función (normalmente escape) 


ANz ¿si mo, retorno a La rutina que Llanó al BIOS 
Pu rs ¿Almacénar primer carácter 
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MDT8FunctionsDelay — ¿Obtención constante de tienpo 
para esperar La Llegada 
de caracteres siguientes 
7 de tecla-función 


¡Obtención valor de retraso 
¿Composición en palabr 
¿Indicación al temporizador no fuera de tiem, 


14 ¿Dírec, de reanudación después de la espera 
vación del retardo basada en un relo] de 
tiempo Peal. tal que transferirá el control 
a una dirección especificada después que 
haya transcurrido Un intervalo de tiem 
CONINAMASL81or8Delays Jespera hasta que transcurra el retardo 
LD CONINADelaySElaosed — ¿Comprobación de indicador activado 
¿por rutina centinela 
32 ComtmeuasterorsDeay ? POr futina centínel 


CONINSCheck8for8Function: 
LXI  M,DTaCharactersCount — ¿Comprobación de sí han entrado el resto de 
7 caracteres de La secuencia 
DAD a 


Am ¿Obtención cuenta de carac. en la mes, int. 
FunctionskeySLength = 1 
CONINSCheck8Function — ¿Suficientes caracteres en La mem. int. 
3 para posible secuencia de tecla-función 
Ps ¿Insuficientes carac. en La mem, int. para ser 
¿ Una secuencia de tecla-función, retorno a 
5 la rutina de Llamada con el primer carácter 


La siguiente rutina será Llamada por La rutina centinela cuando 
ha transcurrido el retardo especificado 


-ONINSSet$DeLaySElapsed: 
MI A, OFF ¿Indicación temporizador centinela tiempo 
STA CONINSDelaysElarsed ¿excedido 
RET ¿Retorno a rutina centinela 


CONINSCheck8Func tion: 
211700 LAI MI DTRGEtSON1set ¿Almacenar "apuntador-obtención" en curso 
19 DAD 5, en la memoria intermedia 
7E mo am Obtención apuntador 
FS PUSH PSA ¿Almacenar apuntador en la pila 


211700 LXI O M.DTSGetSOffset ¿Comprobación segundo carácter (y posiblemente 
CoFO07 CALL insButfer 5, tercero) en La secuencia 
se moy ¿Obtención segundo carácter 


1 ctersFunction 

cs PusH ¿Almacenar para uso posterior 

211700 EXI Mi DTAGetSOtfset ¿Recuperación tercer carácter 

CoF007 CALL GetsAddresssinstut ler 

a POr E lecuperación segundo carácter 

se ] carácter 2, carácter 3 
ENDIF 


ps PusH 0 ¿Almacenar apuntador a tabla de dispositivo 
218000 EXI M-CBsFunctions CéRFune: ay aEntrysSize 
¡Obtención apuntador tabla de teclas-función 
¿_ en el bloque de configuración 
111300 EXI D.CBSFunctiomBKeySEntry$Size ¡Obten. tamaño ent. preparada para bucle 
CONINSNextaFunc tión: 
19 DAD ¡Desplazar a síguiente (o primera) entrada 
TE moy A ¿Obtención segundo carácter de La secuencia 
27 RA A ¿Comprobación de final tabla de teclas-función 
CAc203 Je CONINSNOtSFunction ¿SÍ =- no es una tecla-función 
ES mee ¿Comparar segundos caracteres 
AS ÚNZ CONINSNextsFunction ¿No coincidencia, intentar ent. sig. en tabla 





16 ThreesCharactersFunctión 
23 1 ¿ML => tercer carácter 

de moy Am tención tercer carácter de La secuencia 
28 Dex. impLif. Lóg. para secuencias 2 y 3 carac. 
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AS comparación terceros caracteres 
ÍNZ CONINSNextaFunction — ¿No coincidencia, intentar ent. sig. de la tabla 
10 ¿En caso de coincidencia, compensar por 
7 decrementos extra 
ENDIF 
moon lL -> primer carácter de cadena de caracteres 


de sustitución (terminada en byte 00H) 
La rutina CONIN se encargará de Inyectar 
La cadena de sustitución en 

el flujo de entrada 


¡Cuando se ha identificado una secuencia 
2 función, La pila debe ajustarse 
3 antes dé devolver el control 
Porn ¿obtención apuntador tabla dispositivos 
POE PSA ¿Sacar de La pila valor desplaz. para "obtención" 


SHO CBsForcedsInput 

















Por PSA ¿Sacar de la pila primer carác. de sec. función 
LX M,DTaCnaractersCount ¿Decrementar contador de caracteres para tener 
DAD O 3 “en cuenta Los caracteres eliminados de 
5 la memoria intermed! 
moy Am ¿obtención de La cuenta 
SUL FúnctiomskeysLengtn-1 3 Cel primer carácter ya ha sido 
moy mA 5. deducido) 
AMP CÓNIN ¿Retorno a CONIN para obtener Los 


7 caracteres de entrada forzada 

CONINSNOt Func tion: 

Los intentos de reconocer una secuencia de 
tecla-función han sido infructuosos. El apuntador. 
del desplazamiento para "obtención" debe reponerse a 
su antiguo valor para que no se pierda el carácter 
Gue se supuso formaba parte de La secuencta-función. 








Porn ¿Recuperación apuntador a tabla de dispositivo 

POP PSU ¿Recuperación "desplaz." para "obtención" previo 

LX Mi DTRGeLSOffset 

DAD D ¡HL -> desplaz. para "obtención" en La tabla 

AS Juelta a valor inicial despl. para "obtención" 
después de detectar el primer carácter 

POr PSA tecuperación primer carácter 

Rer ¿Devolución del primer carácter al usuario 


Salida de consola 





Esta rutina Lanza caracteres de datos al dispositivo de consola. 
“Atrapa" también secuencias de escape lanzadas a La consola y 
desencadena acciones especificas de acuerdo con Las secuencias. 
Un autómata-primitivo se utiliza para reconocimiento de secuencias de 
escape. 

Además, para Lanzar el carácter siguiente a todos Los dispositivos 
seleccionados en La palabra de redireccionamiento de salida de consola, 
comprueba que no haya sido suspendida La salida del dispositivo 
seleccionado por un protocolo XON/XOFF y que DTR está alto sí debe 
estarlo. 

Una vez que se ha Lanzado el carácter, sí se utiliza el protocolo 
ETX/ACK y ha salido La Longitud especificada del mensaje, se saca un 
carácter ETX y el dispositivo se marca cono suspendido. 








Parámetros de entrada 
€ = carácter a Lanzar a salida 





Variables de alnacenamiento de CONOUT 


CONQUTACharacters De o ¿Guardar área para carácter a Lanzar a salida 


CONOUTSProcessors Du CONOUTSNormal 
¿Es La dirección del trozo de prograna 
7 que procesará el carácter siguiente. 
5 Él caso por defecto es 
%, CONOUTSNormal 
CONOUTAStringsPoimter: 04 o Apunta a una cadena (normalmente 
'en el bloque de configuración) que es 
prefijado por Los caracteres del 
5 flujo de salida de consola 
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CP/M Manual para programadores 





CONQUTSStringsLength: DE «Contiene el núnero máximo de caracteres 
a pretijar en un flujo de salida 
7 desde consola 


rut ATENCIÓN re 
La rutina de mensajes de error comparte programa en esta subrutí 
En entrada, el byte de datos a lanzar a La salida estará en La pila 
y el registro DE fijado correctamente. 


ONOUTSCEMSENtr y 
STA CONOUTSCharacter Almacenar byte de datos 
CONOUTSEntry2 ML tiene un mapa de bits especial 


¡=== Punto de entrada al BIOS (estándar) 


2arcos CONOUTSProcessor ¡Obtención de La dirección del procesador para 
3 manejo del siguiente carácter a Lanzar 
¿(EL defecto es CONOUTSNormaL) 

es ¿Transferencia de control al procesador 

¿Procesador normal para salida de consola 

7> CS ¿Comprobación de posible comienzo de secuencia 

Fer CPI FunctionsKeysLead 5 de escape 

CA1204 32 CONOUTsEscapesFound ¿Es posible 

CONQUTSFOrced: 

7>. mo ac ¿Punto de entrada salida forzada 

320803 STA CONOUTsCharacter ¿No es secuencia de escape == almacenar bytes 
¿de datos 

2A5A00 LHLO CBSCONSOlesduteut ¿Obtención palabra de redirec. de consola 


CONQUTSENtry2+ 1é=== Punto de entrada de mensajes de error de salida 
: 
Lxr “ablasaddresses — ¿Direcciones de tablas de dispositivos 
Ds Pus Puesta en pila preparado para bucle 
Es Pus 


CONQUTSNext$Devices 

E O] ¡Recuperación de mapa de bits de redirec. 

DI Por O ¡Recuperación apuntador direc. tablas de 

CDSFOS CALL SelectaDevicesTable ¿Obtención tabla de dispositivos en DE 

.7 AS ¿Comprobación de si ha sido selec. algún disp. 

7, Cmapa de bits no totalmente cero) 

CA0DOS yl CONQUTSEYA 1 ¿No, salida 

cs Pus FVes = Bo ¿Almacenar mapa de bits de redireccionamiento 

ES Pue ¿Almacenar apuntador direc. tabla Gispositivos 
CoNouTeMas te 

CDOFOS CALL ChecksOuteutsReady ¿Comprobación de dispositivo no suspendido y 


(si es necesario) DTR-alto 
CAFe03 se CONQUTSMast ¿No, espera 


Fa pr ¿tancelar interrupciones para prevenir 
7  reentrada involuntari: 
3acmos LOA CONOUTSCharacter ¿Recuperación byte de datos 
moy C.A Preparado para salida 


CAL tauteDatastte Hatiaa delito de datos 


CALL ProcesssEtisProtocol — ¡Diálogo con protocolo Etx/Ack 
IMF CONQUTSNest$Device ¿Bucle para dispositivo siguiente 


CONQUTAEN Ate 
LDA CONOUTSCharacter ¡Recuperar carácter de datos 
moy ¿Convenio CP/M 
REr 


CONQUTSEScas ¿Posible secuencia de escape 
(53 ¿Proceso del vector de carácter siguiente 


SHLD CONQUTSProcessor ¡Fijar dirección vector 
RET ÍRetorno a La rutina que Llamó a B105 





Salida de consola: Proceso de secuencias de escape 
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02704 

02705 

0419 211802 02706 
02707 

os1C 7E 02708 
0410 87 02709 
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042 9, 02711 
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a 02724 
CDE103 02725 
02726 

02727 
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02730 
02731 
02732 
0438 23 02733 
03 SE 02734 
0430 23 02735 
DASE 56 02736 
049 ES 02737 
0440 ES 02738 
02729 
02740 
02741 
02742 
0481 218FOF. 02783 
02744 
0484 228D0F 02745 
0447 09 02746 
0277 
02748 
02749 


0848 21990F 02750 
0448 034404 02751 


02752 
02753 
02754 
02755 
DAME Z1ADOF 02756 
0451 3802 02757 
0453 Bo 02758 
0454 77 02759 
0455 3808. 02760 
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DASA CAÉCOA 02782 


02763 
02764 
02765 
02766 
02767 
DASD Z1A3OF 02768 
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0462 B6 02770 
0463 77 02771 
0454 2808 02772 


0466 21990F 02773 
0469 C36COA 02774 
02775 
02776 
DASC 320003 02777 
DASF 22CE03 02778 
0472 217804 027, 
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CONQUTSProcesssEscapes ¿El control LLega a este punto con Un 
Í_ carácter después del escape en C 























LEI HLCONQUTSESCAS Jobtención base de La tabla de reconocimiento 
CONOUTSNENtsEntrys 
moy AM ¿Comprobación de final de tabla 
a 
$2 CONOUTANOSMatch ¿SÍ no coincidencia 
AS omparación Con carácter dato 
37 ComouTaMaten ne idencta 
INE $" ¿desplazar a siguiente entrada de tabla 
mo 
mo 
MP CONDUTSMextSEntry juelta atrás y nueva comprobación 
A 
Conoursnosmateh: ¿No coincidencia, en consecuencia deben 
7 sacarse escape original 
7 Y carácter siguiente 
PUSH bs ¿Almacenar carácter después de escape 
mi £C.FunctiontKey8Lead ¿Obtención carácter de escape 
CALL CONOUTSFOrceS ¿salida a dispositivo de consola 
-or B ¿Obtención de carácter después del escape 
CALL CoNoursForced Pincerto compita 
ConouTaSet8Normat: 
AE TR concuTeNorma! ¿Fijar vector a valor original para 
She CONOUTaSetabracessor — 7 caracteres siguientes 
, 
CONQUTSMatehe 
E ¿HL -> byte LS de subprocesador 
HOY Em Jobtención byte LS 
To 
mo ¿Obtención byte MS 
xeno ZML => suborocesador 
Pomo Fa subprocesador 
ConoursDat ¿Subprocesador para inyectar fecha en curso 





¿ en el flujo de entrada de consola 
(utilizando entrada forzada) 
LIE MyDate 
CONQUTASEtSFOrcedBInputs 
SHLO CBSFOrceds Input 


REr ¡Retorno a La rutina que efectuó La Llamada al BIOS 
CONOUTSTAmes ¡Subprocesador para inyectar La hora en el flujo 
7 de entrada de consola 
XI M¿TamesInsASCIL 
ÍMP O CONQUTSSetSFOrceds Input 





etsDates ¡Subprocesador para fijar La fecha tomando Los 
F 8 caracteres siguientes de salida de consola 
7 y almacenarlos en cadena-fecha 








LX Mi TimesDatesFlags ¿Fijar indicador para indicar que La fecha 
MUI A/DatesSet 5 ha sido fijada por programa 
OR 
moy mA 
mI AS ¡Fijar cuenta de caracteres 
LXI M;Date ¿Fijar dirección 
IMP CONDUTSSEtAStrinasPornter 

CONOUTASet8Time: ¿Subprocesador para fijar La hora tomando Los 

8 caracteres siguientes de salida de consola 
y almacenarlos en cadena-hora 
xr ¿Fijar indicador para indicar que La hora 
mur ha sido fijada por programa 
ORA 
moy 
mui ¿Fijar cuenta de caracteres 
pe] ¿Fijar dirección 
MMP O CONOUTASEtEStringsPoimter 

CONQUTSSet8StringsPointers ¿HL -> cadena, A = contador 

STA CONQUTSStringsLength — ¿Almacenar cuenta 





SMLD CONOUTSStringsPointer ¿Almacenar dirección 
EXT H,CONOUTSProcesi8Strino ¿Vector salida adicional 
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carsos CONQUTSSetéProcessor 


¿Strings ¿El control Llega a este punto para 
cada carácter en La cadena en el registro €. 

EL carácter se apíla en La cadena 

de recepción hasta que se encuentra un byte 00 

¿ 0 hasta que se alcanza el número de 

3 caracteres especificado. 

CONOUTSStringsPointer ¡Obtención de La direc. para pila de carat, 

aC ¿Comprobación de carácter en curso 00H 

A 

CONouTaSetaNormal ¡Vuelta al proceso normal 

ma ¿En caso contrario, carácter en la pila 

Mm ¿Actualizar apuntador 


m, 00H 
CONOUTSStringsPointer ppuntador actualizado. 
H: CONQUTSStrang8Length ¿Decrementar contador 

” 


CONOUTASet8Normal ¿Vuelta al proceso normal 
7, sí el contador Llega a 0 
¿Retorno a 
7 CONOUTSProcessSStrings 


Estado de entrada auxiliar 


Esta rutina comprueba La cuenta de caracteres en La memoria 
intermedia de entrada adecuada. 

El registro A tona un valor indicando sí existen o no datos 
a la espera 


Parámetros de entrada: ninguno. 
Parámetros de salida 


A = 000H sí no hay datos esperando 
A = OFF sí Los hay 


Jun pa .. 
AUXISTE '=== Punto de entrada al BIOS (privado) 
puma se . 

LMLD— CBSAuxiLiary8 Input ¿Obtención palabra de redirec. 

LXI DiCBSDeyiceSTableSAddresses —¿ y apuntador de tabla 

CALL SelectiDevicesTable ¿Obtención de dirección tabla de dispositivo 

JP Det ImputéStatus Obtención del estado de disp, de entrada 

+ y retorno a quien efectuó la LLanada 


Estado de salida auxiliar 


Esta rutina tija el valor del registro A para indicar cuándo el 
dispositivo(s) auxiliar está preparado(s) para aceptar datos de salida. 
Puede utilizarse más de un dispositivo para salida 

auxiliar. Esta rutina devuelve el AND booleano de sus estados. 


Parámetros de entrada: ninguno 
Parámetros de salida 


A = 000H si no están preparados uno o más dispositivos 
A = OFFH si todos Los dispositivos Listado están preparados 


¡6=== Punto de entrada al BIOS (privado) 
CBrAux il tar y8sCutput tención palabra de redírec. de List. 
GetáCompos itesstatus 








Entrada auxiliar (sustitución para Lectora) 


Esta rutina devuelve el siguiente carácter de entrada 





Figura 8-10. (Continuación.) 


04M 2ASCOO. 
04A4 116400 
DAA CDEFOS. 
DAMA C39106 


o31os 
03106 
03107 
03108 
03109 
ao 
03111 

03112 
03113 
03114 
03115 
03116 
03117 
03118 
03119 
03120 
o3r21 
03200 
03201 
03202 
03203 
03204 
03205 
03206 
03207 
03208 
03209 
03210 
03211 
03212 


DAAD ODOAO7417503213 


DACE 2A5E00 
DADA 11ADO4 


DADA C3A205 


DAD 2A6200 
DADA 037905. 
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del dispositivo Lógico auxiliar apropiado. 
Parámetros de entrada: ninguno. 


Parámetros de salida 


Punto de entrada al BIOS (estándar) 


CBBAUxi ldary8 Input ¿Obtención palabra de redirec. 
D,CBeDeyics Adares: 7 y apuntador a tabla 
¿Obtención dirección tabla de dispositivo 
¿Obtención carácter de entrada siguiente 
5 y retorno a quien efectuó La Llamada 


Salida auxiliar (sustituye PUNCH) 
Esta rutina Lanza un byte de datos al dispositivo(s) auxiliar. 
Es similar a CONQUT excepto en que utiliza el 
temporizador centinela para detectar si un dispositivo 
permanece ocupado más de 0 segundos consecutivos. 
Si ello ocurre, Lanza un mensaje a la consola. 
Parámetros de entrada 

€ = byte de datos 

CR,LF,7, Auxiliary device not Ready? ,CR,LF.O 


1<=m= Punto de entrada al BIOS (estándar) 
CBsAuxiliarys0uteut — ¿Obtención palabra de redírec. auxiliar 
D, AUXOUTS Busy Se: ¿Mensaje a Lanzar a salida si se 


5 sobrepasa Limite de tienpo 
MultapLeSOutputeByte 


Estado de impresión 
Esta rutina fija el registro A para indicar cuándo el 
dispositivo(s) de impresión está preparado(s) para aceptar datos. 
Puede utilizarse más de un dispositivo de Listado de salida. 

La rutina devuelve el AND booleano de todos Los estados. 
Parámetros de entrada: ninguno. 

Parámetros de salida 


A = 00H si al menos uno de Los dispositivos no está preparado 
A = OFFH sí todos Los dispositivos están preparados 


1ó=== Punto de entrada al BIOS (estándar) 

CBA 1st80utput ¡Obtención palabra de redirec. de Listado 
GetacompositesStatus 

Salida de impresión 

Esta rutina Lanza al dispositivo de Listado un byte de datos. 

Es similar a CONQUT excepto en que utiliza el 

temporizador centinela para detectar si La impresora 

está ocupada más de 30 segundos consecutivos. 

Si ello ocurre, Lanza un mensaje a La consola. 

Parámetros de entrada 


€ = byte de datos 





(Continuación.) 
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ODOAO7307203413 


2A6200 
110004 
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Fr 
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03517 
035 
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LISTABUSy8Messages pe CR,LF,7. “Printer not Ready? ,CR,LF.O 
1<=== Punto de entrada al BIOS (estándar) 
LHLD CBeLAstaDutput ¡Obtención palabra de redirec. de Listados 
XI D,LISTABUS yenes: ¿Mensaje a Lanzar si se sobrepasa 
el tiempo Límite 
MP MultiPLeSOUtpUtsByte 





Petición de elección al usuario 


Esta rutina visualiza un mensaje de error pidiendo la 
elección dez 


R -- Intentar de nuevo La operación que ha causado el error 
1 = Ignorar el error e intentar continuación 
A =- Abortar el programa y volver a CP/M 


Esta rutina acepta un carácter de La consola, Lo convierte 


a mayúsculas y devuelve control a quien hizo 

la Llamada con la respuesta en el registro A. 

De CRL 

De Enter R— Retry. 1 = lgnore, A = Abort is 
User SChoices 
CALL CONST ¿Engullir cualquier mecanograf iado-en-avace 
y RUCSBU fersEnoty 
CALL CONIN, 
MP RequestaUsersChoice 

RUCABUN fer sEnpty: 

Lalo Mm, RUCSmess. ¿Visualizar indicación 
CALL OUtPUtSErTOr Message 
CALL CONIN ¡Obtención de carácter de consola 
CALL AsTosUPper Joner en mayúsculas para comparación 
STA DistsActionsConfirm ¿Almacenar en mensaje de confirmación 
Pus Pe inacenar para uso posterior 
LX M/DisKSACtionSConfirm 
CALL OUtputsErrcr Message 
POr PSA ¿Recuperar código de acción 
RT 














Salida de mensaje de error 


Este rutina Lanza un mensaje de error a todos Los dispositivos de consola 
seleccionados en curso excepto a aquellos que están siendo utilizados 
para recibir salida de impresión, Ésto se hace para prevenir 

Situaciones de "abrazos mortales" en Los que el hecho de que La 
Impresora esté ocupada durante denastado tiempo causa La salida 

de un mensaje de error == y la salida se dirige a La propia impresora. 





Esta subrutina hace uso de buena parte de La rutina CONOUT. 
Para economizar menoria, entra en CONOUT utilizando un punto 
de entrada privado. 





Paránetros de entrada 


HL => mensaje de error terminado en 


a byte 00 
DutputsErr or Ses sages 








Pus ¡Guardar dirección mensaje 

LHLD CBACONSOleSOutput Obtención mapa de bits de redic. de consola 
xcHo 

LMUD O CBRLAStaOUtpUt ¡Obtención mapa de bits de redirec. de Listado 





FHL = impresora, DE = consola 
FFijar a 0 todos Los bits en el mapa de bi 





. 
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de La consola que estén a uno en el mapa 














% de bits de la impresora 

mo AA ¿Obtener byte MS de impresora 

cha ¿Inversión 

ANA o ¿Preservar sólo Los bits a cero 

moy MA ¿Salvar resultado 

moy AL ¿Repetir para byte LS de la impresora 

Cm 

ANA E 

moy Lia ¿HL contiene ahora únicamente dispositivos 
; de consola puros 

or ¿Asegurar que al menos un dispositivo 

3 DEmsDevicesPresent ¿esté seleccionado. 

LM 0001 ¿En caso contrario, utilizar disp. por defec.0 

DEMsDevicesPresen 
DEMeNe»t8Characters 

Poe o ¿Recuperar dirección de mensaje en DE 

oax 0 ¿Obtención byte siguiente del mensaje 

IND Actual ización apuntador a mensaje 

RA A ¿Comprobación de final de mensaje 

Az ¿SÍ, salida 

PUSH a ¿Salvar direc. de mensaje para uso posterior 

O] Almacenar mapa de bits especial 
¿Carácter-dato en A 

CALL CONCUTSOEMSENtry ¿Entrar programa compartido 

Pr ¿Recuperación mapa de bits espec 

PO DEMBNeytáCharacter 

Obtención de estado compuesto 

Esta rutina fija el registro A para indicar cuándo el dispositivo(s) 





de salida está preparado para aceptar datos de salida. 
Puede utilizar más de un dispositivo de salida, Esta 
rutina devuelve el AND booleano de Los estados. 


Parámetros de entrada 


HL = mapa de bits de redirec. de E/S para dispositivos de salida 


Parámetros de salida 


00H sj uno de Los dispositivos no está preparado 
OFFH Si están todos preparados 





gr 






















SeStatus: DB o ¿Estado compuesto de todos Los dispositivos 
GetsCompos itesStatus: 
MUI ALOFEN ¿suposición todos Los dispositivos preparados 
STA OCSeStatus ¿Prefijar byte de estado compuesto 
LXI D,CBsDevicesTablesaddresses — ¡Direc. de tablas de dispositivos 
PusH 0 ¡Puesta en La pila preparada para bucle 
Pus ¿Almacenar mapa de bits 
GCSSNext$Device: 
A] ¿Recuperación mapa de bits de redirec. 
Por O ¿Recuperación apuntador a direc. tabla disp. 
CALL SelectaDevicesTable — ¿Obtención tabla de dispositivos en DE 
OS 'omprobación de si un disp. ha sido selec. 


5 (mapa de bits no idénticamente nulo) 


Jr ocSREXAt ¿No, salida 
pun 8 ¿Ves - Ba JAlnacenar mapa de bits de redireccionamiento 
Pu JAlnacenar apuntador a direc. tabla de disp. 
CALL ChecksQutputseady — ¿Comprobación de dispositivo preparado 
LX Hi OCSeStatus ZANO con Los estados de Los 
pl 7 dispositivos previos 
AS ¿Almacenar estado compuesto 
OP CCSINexteDevice ¿Bucle para dispositivo siguiente 
GCSeERAte 
Loa ocstStatus letorno con estado compuesto 





O 
RT 


(Continuación.) 
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Byte de salida múltiple 


ína Lanza a salida un byte de datos a todos Los dispositi 
especificados en La palabra de redireccionamiento de entrada/salida 
Es similar a CONOUT excepto en que utiliza el temporizador centinela 
para detectar sí alguno de los dispositivos 

permanece ocupado más de 30 segundos consecutivos. 

Si ello ocurre, Lanza un mensaje a La consola. 


ránetros de entrada 


HL = mapa de bits de redireccionamiento E/S 
DE -> mensaje a Lanzar sí se sobrepasa el Límite de tiempo 
€ = byte de datos 


MOBAMAximumtBusy 1800 ¿Número de pulsos de reloj (uno cada 
7 16,66 ms) durante Los que el dispositivo 
%_ puede estar ocupado 

MOBSCharacters ¡Carácter a Lanzar a salida 

POBABUS y She: Dirección del mensaje a Lanzar si se 
7 sobrepasa el Límite de tiempo 
¿Indicador utilizado para detectar que se ha 
3 sobrepasado Límite temporizador centinela 


, 
MultiplescutputsBy tes 
CO ¿Obtención byte de datos 
STA MOBSCharacters ¿Almacenar copia 
xcmo 'HL => mensaje de Límite de tiempo 
SHO MOBSBUSy ame: ¿Salvar para uso posterior 
x0no. Mapa de bits 


LXI — D,CEsDevicesTablesaddresses — ¡Direc. de tablas de dispositivos 
PusH 0 Almacenar en fila preparada para bucle 
Pus ¿Alnacenar mapa de bits de redírec. de E/S 
MOBANext8Devices 
A] ¿Recuperación napa de bits de redirec. 
Por D ¿Recuperac. apuntador direc. de tabla de disp. 
CALL SelectsDevicesTable — ¡Obtención tabla de dispositivos en DE 
RA A ¿Comprobación de existencia de disp. selec. 
32 MOBsErat 


PusA 8 16 Ves 3 Bo ¡Almacenar apuntador a direc. tabla dí: 
Puso ¿ALnacenar mapa de bits de redireccionamieno 


MOBSStar tsUlatehdogs 
xa A ¿Puesta a cero del indicador de 
324105 STA MOBANeedeMess: mensaje que se precisa 
010807 pes MOBS Max imumsBus y ¿Retardo de tienpo 
210906 oa ¿Dirección a dirigirse 
CoeDos CALL ¿Arranque de temporizador. 


Sanos rio ¿Comprobación de tiempo centinela ext. 
E ora 

Elecos ne ” ¿Sí, mensaje de atención 

Choros CALL Cesto put áReady conorabac ón dispositivo preparado 
ES O bar Nos espera 





Fa pr ¡Desactivar interrup. para prevenir 
involuntaria 

O ¿Desconectar temporizador centinela 

CALL SeteMatchdos 5 Cualor fijado en HL irrelevante) 


LOA MOBSCharacter ¡Obtención de byte de datos 
mov Cr 

CALL OutputaDatasByte ¡Salida de byte de datos 

El 

CALL ProcesssEtxsProtocol ¿Diálogo con protocolo ETX/ACK 
MP MOBRNeXtáDevice 


MORA T9nOresEXite 
O] 
Porn 


:Ignorar error de tiempo excedido 
Ajustar la pila 
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moy AC 
Rer 





LALO 
CALL 


¿Visualización mensaje de atención en Los 
7 dispositivos de consola seleccionados 





CALL ¿Visualización de mensaje y obtención de 
7, carácter de acción 

cer R ¿Nuevo intento 

3 MOBAStar tsMatchdog ¿Conectar centínela e intentar de nuevo 

E Y ¿Ignorar 

m7 MORA I9noresEnit 

OS ¡Aborto 

m3 7 Dar función O del 8005 

me Aschoice 





rutina de tenporizador-centinela Llamará a ésta 
si el dispositivo está ocupado más de 30 segundos 
aproxinadamente 

NOTA: Esta es una rutina del servicio de interrup. 





mur ¿Elevar petición de salida de mensaje 
STA e 
Rer ¿Retorno a rutina centinela 


Comprobación salida preparada 


Esta rutina comprueba sí el dispositivo especificado 
está preparado para recibir datos de salida. 

Para ello debe comprobar si el dispositivo ha sido suspendido 
por razones de protocolo y si DIR está bajo. 








NOTA: Esta rutina no comprueba sí La USART está preparada. 
Este test se realiza en La propia rutina de salida de byte de datos. 





ránetros de entrada 
DE => tabla de dispositivos 
Parámetros de salida 


A = 00H Cindicador de cero a uno); Dispositivo no preparado 
A = OFF (indicador de cero a cero): Dispositivo preparado 


Checks0utput Ready: 








ae pen td 

E Eos 

A oasis 

A ns, e e 
Lxr H,DTOStatusSPort ¡Poner a 1 para leer estado del dispositivo 
moy 40m ¡Obtención número de puerto estado 


CORSStatussPorts 








Da o - Puesto a uno por instrucción anterior 
mo CA Almacenar estado del hardware 
LX M.DTSDTRSReady .Si, puesta a uno para comprobación estado del 
DAD 0 Cnio para ver si DTR está alto 
mV Am “obtención máscara de estado de DIR alto 
ANA O “Comprobar estado del chip 
3 CORANOtéReady ¡DTR bajo indica no preparado 
CORMReadys 





Figura 8-10. 
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E oi om ¿Anatear dispositivo preparado pra sali 
O orónéadós ¿icdtcar¡dlagsiciv no grejaradó cs 
as 
e Esta rutina soporta el protocol ETS/AK. 
zos A AA 
pass a O ral decia 
Ea A 
pssdd A A: de Careir detinccos ADE Tenia 
RE de => tabla de dispositivo 
Sun Parámetros de saLida 
Pra E ¿tomrobación diwponibiLdnd protcelo FUE 
cua E rá 
04225 Lxr H,DTSELxSCOuUnt ¿Si, decrementar contador. 
Led E 
as pS 
E E 
ea eN 
Es Se 
q Ss 
Ss E 
dias En 
as 0% 
Pr ES 
cun E 
es E 
brete a egstistasás cuido cada atea 
Et E do a iia 
pei aa e RR gore 
pet Ñ RC 
Per cstrataDatadtrte 

S 


¡Almacenar direc, contador para uso posterior 
Jobtención byte LS 


33 


¿Obtención byte MS 


>omioro 


comprobación cuenta igual a cero 
No 
¿SÍ, puesta a cero Longitud de mensaje 


qo 


¿Obtención byte LS 
¿Obtención byte MS 


¡Recuperación dirección de contador 
¿Salvar cuenta en la tabla 


221 93507 


M.DTAStatus ¿Indicador de salida suspendida 
pan D 
DI 
MOYA 
ORI DTedutputeSuspena 
ma 





revisión de interacción con interrupción 
tención byte de estado 

¿jar bit 

imacenar en tabla 





El 


Selección de tabla de dispositivo 


Esta rutina examina una palabra de 16 bits y, dependiendo del primer bit 
que encuentra a uno, selecciona La dirección de la tabla de dispositivo que 
Le corresponde. 
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Parámetros de entrada 


HL = Mapa de bits 

DE -> Tabla de direcciones de tablas de dispositivos 
La primera dirección de la tabla se selecciona 
cuando el bit menos significativo del mapa 
de bits está a uno, y así sucesivamente 


Parámetros de salida 


BC -> Entrada en curso en Las direcciones de tabla de dispositivos 
DE = Dirección de la tabla de dispositivo seleccionada 
HL = Mapa de bits desplazado 

Distinto de cero sí se ha encontrado un bit a uno 

Cero si el mapa de bits es idénticamente O 


Nota: Si, en entrada, ML es OO00M, será devuelta en DE La prinera entrada 
en las direcciones de tabla de dispositivo. 


etectaDeyicesTabies 
SO obtención byte nás significativo del mapa de bits 


ORAL ¿Comprobación de si HL es nulo completamente 
RL ¿Retorno indicando que no hay nás bits a uno 
moy AL ¿Comprobación de sí byte LS es no nulo 
ANI 
ÓNZ O sprepsteset ¿Sí devolución de La dirección correspondiente 
ma a ¿No, actualizar apuntador a tabla 
D 
Sue ¡Desplazar HL un bit a La derecha 
SelectelevicesTable — ¿Comprobación bit siguiente 


¡Almacenar mapa de bit desplazado 
¿Tonar copia de tabla de apuntadores 


¿HL => dirección en la tabla 


¿DE > tabla de dispositivo seleccionada 

FActivar registros para una nueva 

7 entrada 

jrecuperación mapa de bits desplazado 
¡Desplazamiento napa de bits un lugar a La derecha 
¿Actualización apuntador a tabla de direcciones OT 
7 a la entrada actual 

¿Indicación de que se ha encontrado un bit a uno 

7 y registros activados correctamente 


tención de carácter de entrada 


Esta rutina obtiene el siguiente carácter de entrada del 
dispositivo específicado en La tabla de dispositivos 
manejándolo cono un parámetro de entrada. 


Gets InputaCharacters 

EXI HiDTscharactersCount — ¿Comprobación de si han sido almacenados 

DAD O 7 caracteres en la menoria intermedia 
GIcsmarte 

Er ¡Asegurar que serán detectados Los caracteres 


7 de entrada que LLeguen 
moy am ¿obtención cuenta de caracteres 


A as Mo hay taractarés, Espora 


¿Decrenentar contador de caracteres habida 
Dro Él 
> cuenta del carácter que se ha extraido 
7 dela menoría intermedia 
va DTAGets0ffset ¿ur isración del despl- obtención para acceso 
Ea delaadarenssineBurter ¿Retorno de HL -> carácter y con 

7 “desplazamiento-para-obtención actual izado 
moY a Jobtención carácter dato en curso 
Pus PSA ¿Almacenar para utilización posterior 








h.DTsCharactersCount — ¿Comprob. cuenta de carac. decrementada en La 
DAD DO 5 mem. inte. comprobando si puede existir ent 
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ze An 5  reanudarse después de haber sido suspendió 

211800 M:DTsResunes InputsCount ¿Obtención cuenta decrementada 

19 D ¿Comprobación de si cuenta en curso coincide 

BE ” 7, con umbral de memoria intermedia vacia 

c2oBos SICSChecksControl en el umbral, comprobación de entrada de 
carácter de cóntrol 

210800 H.DTAStatus in el umbral, comprobación de La forna 

1 D utilizada para espaciar La entrada 

Fa isegurar no interacción de Las interrupciones 
durante el cambio del byte de estado 

7e 0aé3o am tención del byte de estado/protocolo 

ESFO 04640 OFEM AND NOT DTsInputeSuspena — ¿Borrado de indicador de suspensión 

7 ma inacenamiento del estado actualizado 

FS 

ES psu jardar para uso posterior 

Esso DTS InpUtSATS omprob. Si se ha reaLiz. el borr. para en 

CaDoOs GICSChesrSImeutsxon 

210800 H.DTeRTSeCOMtrolsPort — ¿Si, obtención número puerto control 

19 

TE E 

32cros — 0480s ¡Almacenar en instrucción posterior 

Zion00 08850 

E 

la ¡Obtención del valor necesario para elevar 11% 


p3 
04895 
00 04850 ¿Fijación en instrucción posterior. 
04657 ¿Salto para comprobación de XON 
04858 — GICSChecksInputsxon: ¿Comprobación de si ha sido utilizado XON/XOF para 
04659 5 la suspensión temporal de La entrada 
E 04660 psu ¿Recuperación del byte de ent./prot 
Esso 04861 DT8Inputsxon ¿Comprobación de si el bit XON está a wo 
CADBOS 04662 ya OICSCheck8Control No, ver entrada de carácter de control 
cen 04663 MUI CXON Si, salida de carácter XON 
co2608 04664 CALL OUtpUteDatasByte 
04665 
04686 — OICSCheckAControl: 
co0808 CALL” Check8ControleChar ¡Comprobación de si es un carác. de control 
CaEó0S N] GICeNOt8COntrol No, es CR, LF O TAB 
211coo EXI MDTsControl$Count Si, decremento de contadar de control de 
19 DAD O 5 Caracteres en La memoria internedi 
35 A] 
GICANOtSCONtro1: 


” POR PSA ¿Recuperación carácter dato 


;= Control de interrup. para unidades de ent./sal. serie 

+ 

, Se han diseñado estas unidades para capturar caracteres de entrada 

, utilizando interrupciones generadas por hardware. La salida no está 

' controlada por interrupción, ya que, en general, el programa usuario 
puede generar la salida bastante más rápidamente que el hardware puede 

por tanto, La salida se pondrá rápidamente en un "estado 

estacionario" esperando ser tomada en cuenta por el hardware. 


Las unidades de entrada soportan Las siguientes características: 


9 Protocolos serie para control de salida 
DTR alto para enviar 
XON/XOF 
ETK/ACK con Longitud de mensaje vi 
9 Protocolos serie para control de entrada 
RTS alto para enviar 
XON/AOF 





Los caracteres de entrada se almacenan en una menoría internedia 
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05002 
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03004 
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05016 
05017 
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Eharactersinterruets 
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circular hasta que el programa usuario está preparado para aceptarlos. 
Opcionalmente, Las unidades pueden prever el borrado de esta menoría 
intermedia utilizando RTS bajo o XOF para pedir La interrupción de la 
entrada. 


Rutina de interrupción de carácter. 


Esta rutina recibe el control cuando el harduare detecta un carácter 
de entrada. Los chips del hardware y Las posiciones de menoría 
necesarias se habrán fijado durante el programa de inicialización. 


Como consecuencia de que realmente Las arquitecturas varían 
enormemente, esta rutina ha sido escrita para mostrar genéricamente el 
proceso requerido. Supone una estructura de interrupciones que 
transfiere el control a esta rutina sea cual sea el dispositivo 
realmente interrumpido. Supone también que una vez que ha entrado un 
carácter, se genera un valor específico de salida a un puerto particular 
para preparar de nuevo el harduare para una nueva interrupción. 
























Pu ¿Salvar HL en pila de usuario 
ANO ¿Obtención del valor en curso del apuntador a pi 
ES 
SHD O Pl , Luar pila de usuar 
xr SPP o a pila Local 
Pus PSA ¿Salvar resto de registros 
Pu 
Pus 0 

¿Comprobación de cada dispositivo por orden para detección 

5 de caracteres de entrada 
XI D.bT86 ¿Dispositivo 0 
CALL Servicestevice ¿Si interrumpido entrada del carácter 

5 y proceso de acuerdo con él y el estado 
del dispositivo 

xr 0.ores ¿Dispositivo 1 


CALL ServicesDevico 

















Lo p.orez ispositivo 2 
CALL Servicesbevice 
MUI ALtCSEOL indicación a chip controlador de interrupciones 
Sur fémocuemrort ¿de que ha sido atendida La interrupción 
Por a Jrestaurar valor de registros 
Pop 
Po 
Lio ¿tonmutar a pila de usuario 
sen 
Por 
El ¡Activar de nuevo interrupciones en La CPU 
Rer ¿Reanudar proceso interrumpido. 
Ja 
, A A 
: Servicio de dispositivos 
; 
; Esta rutina configura el servicio de interrupciones de dispositi 
: comprobando si el dispositivo especificado en La tabla de dispositivo 
: (dirección en DE) está interrumpido actualmente, en este caso entra el 
; carácter. Dependiendo del carácter entrado, está, rutina puede almacenarlo en 
; La menoria intermedia de entrada Chaciendo “caer” el flujo de entrada si La 
1 menoria internedia está prácticamente Lleno) o puede suspender o Jeanudar 
; la salida al dispositivo. 
: Paránetros de entrada 
: DE -> tabla de dispositivo 
ServicesDevices e 
XL M,DTRStatussPort ¡Comprobación de si este dispositivo 
DAD 0 5 “está realmente interrumpido 





A A | 
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moy am ¿Obtención número de puerto de estado 
STA SDeStatussPort ¿Alnacenar en instrucción posterior 


e 16 ¿Entrada de estado 
SDSStatussPor ti 
De o 1<-- Fijar según instrucción anterior 
EXI MDTSIMDutReady ¿Comp. de si el estado indica preo. para datos 
pop 
ANA A ;Enmascarar con valor de entrada pfeparada 
Rz ¿No, retorno al servicio de interrupción 
¿Comprobación de ocurrencia de errores 
LEI MiDTeDetectaErrorsPort ¿Activar interrupción para Leer estado 
DAD 0 Je error 
moy A.M obtención número de puerto de estado 
STA SDeErrorsPort ¿Almacenar en instrucción posterior 


De 19 ¡Entrada de estado de error 
SOSErrorgPorte 
DE o +<-- Fijado por instrucción anterior 

210800 LXI O M/DTeDetectsErrorsValue ¡Mask with error bitis) 
19 DAD 
AS ANA P 
CAs707 ya No bit(s) a uno 
210900 bar Activar para puesta a cero del error 
15 DAD 
7e mov ¡Obtención número de puerto de puesta a cero 
324607 STA tsErrorsPort ¿Almacenar en instrucción posterior 
210400 ex SErrorsValue 
19 DAD 
Je mov ¡Obtención valor de puesta a cero de interrip. 


pa 3 


SUSE setsErrorsPorte y ñ . d 
00 De E 10-- Fijada por instrucción anterior 


SOSNOSErrOr+ 
210100 LXIO M.DT8DatasPort ¿Entrada de caracteres=dato (puede ser 
19 DAD 7 “mutilado" si ocurre un error) 

7e moy AA ¿obtención núnero de puerto de datos 
325007 STA SDeDatasPort ¿Almacenar en instrucción posterior 


De 10 ¿Entrada de carácter-dato 
SOSDAtasPorte 
DB o 15-- Fijada por instrucción anterior 


HOY BA Hacer copia carácter de dato anterior 
LX M/DTaStatus ¿Comprobación de protocolo activo en curso 
DAD D 7 XON o ETX 
moy A ¿Obtención byte de protocolo 
ANI DTSDutputsXon + DTeOutputsEtx 
yz SDHNOSProtoco! ¿Ninguno está activo, 
ANI DTSOutputsXon ¿Comprobación de si XON/XOFF activo 
UNZ O SDAChecksif8 kon Si, comprobación de entrada de carácter XOM 
¿No, suponer que ETX/ACK está activo 
MVE AV ACK ¿Comprobación por si carácter de entrada AX 
cue Ba 
ÍNZ O SDWNOSProtocol ¿No, procesar carácter como date 
SOS0UtpULSDesuspend: ¿Si, dispositivo preparado para 
5 más datos, indicar al dispositivo 
5 La reanudación 
¿La rutina de sal. de control con no interrup. 
comprueba el bit de suspensión 
TE] ¿Obtención de byte de estado/protocolo 
ANI OFFM AND NOT DT8QutputeSuspend ¡Preser. todos Los bits excep. el susp. 
mo A 'Salvar con bit de suspensión = 0 
me SDE Salida al servicio de interrupciones sín 
% almacenar carácter dato 





SOSCheck8118xom! ¿Protocolo XON/XOFF activo, de forma que 
7 si se recibe XOFF suspensión de La salida 
si se recibe XON reanudarla 
'La rutina de sal. de control con no interrups 
comprueba el bit de suspensión 
¿Comprobación de entrada de carácter X0M 





076E 3E11 
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o770 
om 
0774 
0776 
977 


om 
0778 
9770 
ore 


eres 
0784 
0785. 
0798 
078 
o78A 
0788, 
ore 
oe 
0790 


0793 
0798 
0797 


0798 
9798 
0790 
0790 
079€ 
o7A 

0782 
07 


07% 
0749 
OTRA 
O7AD 
DAD 
O7AE 
O7AF 
orar 
0784 
0787 
0788 
0789 
078c 
oe 
orco 


cores 
0702 


o7c3 
o7ca 
o7c6 
0709 
oca 


o7cE 
0701 
0704 
0707 
0708 





5 
CAS7O7 
3e13 
2s 
c28107 


TE 
Fsor 
7 
c30907 


211800 
19 
TE 


211900 
19 


CAEBO7 
cs 
211600 


CoF007 
a 
7o 


211900 
19 
E 
Te 
211800 
19 
FS 
c2cEo7 


210800 
19 

7E 
Eso 
7 

ES 
ES40 
CAc3O7 
210800 
19 

TE 
220207 
210000 
19 

ve 


Da 
0 


E 
Es00 
CACEO7 
Eat) 
c02508 


00808 
ADO? 
211c00. 
19 
24 


05095 eme 
05096 3 
05097 mur 
05098 a 
05099 NZ 
05100 — SDeDutputeSuspend: 
os101 

03102 mov 
05103 ORI 
05104 moy 
Ostos ya 
03106 

05107 5 

03108 SDsNosProtocol: 
05109 Lx 
05110 DAD 
TN moy 
os112 10 
5113 Le 
oS11a DAD 
os115 cue 
os116 3 
05117 Pus 
05118 [es 
05119 

os1z0 CALL 
05121 Pop 
05122 mov 
os123 

os124 

05125 

05126 Lxr 
05127 DAD 
05128 INR 
05129 moy 
05130 pie] 
05131 DAD 
05132 cue 
05133 NZ 
05134 

05135 La 
05136 DAD 
05137 mov 
05138 ORI 
05139 mov 
05140 PusH 
05141 ANI 
os1a2 yz 
05143 Lxr 
05144 DAD 
o51as mov 
05146 STA 
05147 Le 
os1as DAD 
05149 moy 
os150 

05151 De. 
05132 — SDeDropsRTSsPOrt: 
05153 Da 
05134 

05153 SDeChecksInsutsXon: 
05156 

05157 Por 
05158 ANI 
05159 m4 
05160 mur 
05161 CALL 
0516Z 1 

OS1é3 — SDeChecksControl: 
05164 

05165 

05166 CALL 
05167 ya 
05168 bx 
05169 DAD 
05170 INR 


| 


e 

SpscuteutsDesuspend ¿Ss preparación salida al dispositivo 
A. XOFF ¿Comprobación de entrada de carácter XOFF 
e 

SDANGAProtocol ¿No, procesar carácter cono dato 


¿EL dispositivo precisa una pausa en La sal. 
7 de datos para indicar suspensión de salida 
am ¿Obtención de byte de estado/protocolo 
DTsoutput ¿fijar a uno bit de suspensión 
mA 5ALnacenar en tabla de dispositivo 
NN] ¿salida al servicio de interrupciones sín 

5 “almacenar carácter de entrada 








H.DTSEuf fer sLengtnenasí ¿Comprobación de si queda espacio en la 








D ¿ memoria intermedia de entrada 
Am ¿obtención Longitud - 1 

A “Actual izar Longitud verdadera 

A DTsCharactersCount — ¿Obtención cuenta en curso de caracteres 

p 7 en La memoria intermedia 

” ¿comprobación Longitud = cuenta 
SORBUtferaFull 3si, salida de carácter asociado a sonido 
A ¿Almacenar carácter nulo 

H, DTSPULSOr fret ¿Cálculo de La dirección del carácter en la 


"memoria intermedia de entrada 
GetsAddresssInsButter ¿HL -> posición del carácter 
A ¿Recuperación carácter de entrada 
ma ¡Salvar carácter en La mem. int. de entrada 
¡Actualizar núnero de caracteres en la 
7 memoria intermedia, comprobando sí La 
7 entrada debe detenerse temporalmente 
|. DT8CharactersÉount 





h 

DP 

$” :Actualización de La cuenta de caracteres 
Am ¿Obtención contador actual izado 

MID: eStopSInputsCount — ¿Comprobación de sí cuenta en curso coincide 
D con el umbral de memoria intermedia 

” 





5 completa 

SDSCheck8Control ¿No en el umbral, comprobación de 

7 entrada de carácter de control 
H,DTSStatus ¿En el umbral, comprobar en qué forma debe 
D 3 detenerse honentáneamente La entrada 
A ¡obtención byte de estado/ protocolo 
DTeInputsSuspena Sindicación de entrada suspendida 
mA ¿Almacenar estado actualizado en tabla 
15) ¿Almacenamiento para utilización posterior. 
DTSINPUtARTS ¿Comprob. de sí debe ignorarse bajo-para-saLida 
SDWChecksInputexon ¿No 


H, DTSRTSSCOntrolsPort — ¿Sí, obtención número de puerto de control 
D 





A, 

SOSDropaRTSSPOrt ¡Alnacenamiento en instrucción posterior 

Ho DTSDrOpeRTSeVaLUe 

13 

a.m ¿Obtención de valor necesario para salto RTS 
our 


o 





Fijada en instrucción anterior 
¿Salto a test de entrada XON 

¿Comprobación de sí se está utilizando protocolo 

3 XON/XOFF para suspender temporalmente La entrada 





psu ¡Recuperación de estado/protocolo 
DTS Inputexon ¿Comprobación de b1t XON a uno 
SDSChecksControl lo, ver control de entrada de caracteres 
Co XOFF ¿Si, salida de un carácter XOFF 


OltputeDatasbyte ¿salida de byte de datos 


¿Comprobación de si existe en entrada un carácter de 
“control (distinto de CR, LF o TAB) y actualizar 
7 cuenta de caracteres de control en la mem. ínt. 








ChecksControliChas ¡Comprobación de caracteres de control 
SOREKAt óNo, no existe ningún carácter de control 
H,DT8Control8Count 

p 

" ¡Actualización cuenta de caracteres 
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0709 210500 
O70C 19 
0700 7€ 
070€ 87 


o70F ce 
07E0 32€907 
07E3 210600 
07ES 19 
077 7E 


o7es 03 
079 00 
OEA C9 


o7EB 0807 
07ED C32608 





O7FO 19 
071 ES 
O7F2 AE 
O7F3 0800 


o7ES 79 
07FS 30 
077 211800 
O7FA 19 
O7FB AS 
O7FC Er 
07FD 77 
O7FE 211400 
0801 19 
0802 7£ 
0803 23 
0804 66 
0805 6F 
0808 09 
0807 C9 
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¡Puesta a cero del sistena de interrupciones hardware 





































05173 Lxr AsIntsPort 
05174 DAD 0 

03175 mOY AM ¿Obtención de núm. o de puerto de puesta a ceo 
05176 AS ¿Comprobación de puerto especificado 

05177 7. Csuposición de que será NZ) 

05178 ez ¿Ignorar puesta a cero si puerto no específ. 
05179 STA ¿Almacenamiento en instrucción posterior 
05180 La 

os181 DAD 

05182 O] ¿Obt. de valor de puesta a cero de interrup. 
05183 

05184 De cur 

03185 SDsResetsIntaPorte 

05186 DB o Fijada por instrucción anterior 

05187 Rer ¿Retorno a La rutina de servicio de interrwp. 
os188 


OS1S9 — SOSBuftersFulI: 





Mem. int. de entrada completamente Llena 






















































05190 MvI  C/BELL ¿Envio de carácter sónico como Ultima 
05191 UM? OUtpuleDatasbryte 7 medida. Nótese que el retorno JNP se hará 
05192 5 por subrutina 
05193 
05300 + 
053017 
053023 Obtención de dirección en memoria internedia 
03303 + 
03304 + Esta rutina calcula La dirección del siguiente carácter a acceder 
03303; a la memoria intermedia. 
05308; 
05307 + Parámetros de entrada 
es30s + 
05309 + DE -> tabla de dispositivo apropiada 
FESTA HL = desplazamiento en tabla de dispositivo o bien 
ETA GetSOffset o bien PutSOffser 
EIC 
03313; Parámetros de salida 
, 
05315 5 DE no cambia 
oS31s + HL => dirección en memoria intermedia de carácter 
05317 
05318 InsBuf fer 
05319 q ¿HL > obtención/puesta desplaz. en tabla disp. 
05320 A ¿Preservar apuntador a tabla 
05321 7 Obtención valor del desplazamiento 
05322 Bo ¿Composición en valor palabra 
05329 ¡Actualización valor del desplazamiento, poniéndolo a 
05324 5 cero al final de La memoria intermed 
05325 moy AC ¿Obtención copia del desplazamiento 
05326 INR A ¿Actualización a nueva posición 
05327 EXI MH, DTeBUfferSLengthtmas 
05328 DAD 0D 
05329 ANA sEmmascarar bits LS con Longitud - 1 
05330 Por ¿Recuperación apuntador a desplaz. en tabla 
05331 moy MA jAlmac. nuevo valor (fijado a O si es nec.) 
05332 LXI— MiDISBuffersBase ¿Obtención direc. base de La men. int. de entr, 
05333 DAD O 'HL > direc. de La mem. int. en la tabla 
05334 moY A Obtención byte LS de dirección 
05335 mo ZHL_-> byte MS de dirección 
05336 moy byte NS 
105397 moy LA byte LS 
05338 DAD 8 ¿Añadir base a desplaz: 
05339 Rer 
05340 
: 
05402 + Comprobación de control de caracteres 
05403 + 
03404; Esta rutina comprueba el carácter en A para ver si se trata 
03405 + de un carácter de control distinto de CR, LF o TAB. El resultado 
05406 + se devuelve en el indicador 2. 
03407 + 
05408 + Parámetros de entrada 
1 
; A = carácter a comprobar 
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Parámetros de salida 


Estado cero si A no contiene un carácter de control 
distinto de CR, LF o TAB. 


Distinto de cero sí A contiene un carácter de control 
distinto de CR, LF o TAB. 
hecksControl8Char + E A 
mI A ¿El espacio es el primer carácter no de 
cue 8 control 
Je CCC8No ÍNo se trata de un carácter de control 
MUI AS CR ¿Comprobación de si es de retorno de carro 
ce a 
0811 CA2408: y CCCeNo No es un carácter de control 
0614 SEO MUI ALE ¿Comprobación de si es de LF 
0816 Be cmo a 
0817 CA2408. ye CCCINo ¿No es un carácter de control 
OBIA 3509 MUI A,TAR ¿Comprobación de si es tab. horizontal 
oB1c Be cea 
01D CA2408. yz CCCNo ¿No es un carácter de control 
0820 3E01 AVI A ¿Indicación de un carácter de control 
0822 87 DRA A 
0823 09 REr 
¿Indicación de que A no contiene 
0824 AF xa A 5 Jun carácter de control 
0825 09 Rer 


Salida de byte de datos 


Esta es una rutina simple de salida que Lanza un simple carácter 
Cen el registro C en entrada) al dispositivo especificado en la tabla 

de dispositivos. 

Por preferencia, esta rutina habría sido reentrante. Sin embargo, 

debe almacenar [os núneros de puerto. Por tanto, para utilizarla 

con un programa ejecutándose con Las interrupciones activadas, La secuencia 
de instrucciones debe ser: 


pr Interrupciones inhibidas 
CALL OuteutsDatasBrte 
El ¡Activa La interrupción 


Dejar de hacer esto puede ser causa de una reentrada involuntaria 


Parámetros de entrada 


salvar registros 
M.DTA0Utput8Ready ¿Obtención de máscara de estado de salida 
19 D 5 preparada 
46 Bn 
Mo DTSStatussPort ¿Obtención de número de puerto de estado 
19 DAD O 
TE 1) 
323508 Ss ODBSStatuséPort -Almacenamiento en instrucción posterior 
ODBRMAStSunti1er 


D8 ¿Lectura de estado 


De 
ODBHStatussPor ts 
0 De Fijado en instrucción anterior 


Ao ANA ¡Comprobación de sí está preparado para salida 
3z ODBSHastéuntil8Ready ¿No 

210100 EXI M-DTeDatasPort ¿Obtención de puerto de datos 

19 DAD 0 

TE 1.) o 

224408 ODBSDAtasPOrt ¡Almacenamiento en instrucción posterior 

” 1N3 ¿Obtención carácter para salida 


our 
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o8aa 00 ¿<= Fijado en instrucción anterior 


0845 ca ¡Realmacenamiento registros 
0846 C9 


Rutina de estado de entrada 


Esta rutina devuelve un valor al registro A que indica sí uno o más caracteres 
de datos está esperando en La memoria intermedia de entrada. Algunos productos, 
tales como el Microsoft BASIC, impiden La continuación del mecanografíado 
normal, engul Lendo continuamente caracteres, con el fin de comprobar sí se 

ha recíbido un Control=S, -Q o -C de entrada. Con el fin de preservar lo 
mecanografiado en-avance en estas circunstancias, el retorno de estado de 
entrada puede, cono opción escogida por el usuario, devolver Los "datos que 
esperan" sólo sí La menoría intermedia de entrada Contiene un Control=5, -4 0, 
Esto permite La continuación del mecanografíado engañando al Microsoft BASIC, 


Parámetros de entrada 
DE => tabla de dispositivos 
Parámetros de salida 


A = 000H si no hay ningún carácter esperando en La 
menoria intermedia de entrada 


Gets InputeStatuss 
LXI Mm DTAStatuss2 ¿Comprob. de sí está disp. en nodo simulado 
DAD ¿NL => byte de estado en tabla 
mov Obtención del byte de estado 
ANI ¿Aislamiento del bit de estado 
ye DISeTruesStatus ¿Modo de simulación desconectado 


+ Modo de simulación -- indicando sólo datos preparados 
1si hay caracteres de control en La mem. int. 

211c00 LXI M,DTSCOntrol8Count ¿Comprobación de sí hay caracteres de control 

19 DAD 0 ¿_ en La memoria intermedia de entrada 

AR xa A ¿Cheap 0 

26 or o” ¿Fijación de indicador según cuenta 

ES RL ¿Retorno indicando cero 

GISADatasReadys 

ar xRA A ¿Cheap 0 

20 DORA ¿Fijación de A = OFFH e indi 

cs REr ¿Retorno al Llamador 


GISSTruesStatuss 
Estado verdadero, basado en algunos caracteres 
preparados en La memoria intermedia de entrada 
2A8DOF. LMLD CBeFOrcedsInput ;Comprob. sí hay alguna ent. forzada esperando 
e moy 2” ¿Obtención del próximo carác. de ent. forzada 
87 Ora A ¿Comprobación de si es distinto a cero 
c25008 JNZ O GISSDatasReady , indica que hay datos esperando 


211900 LXI M,DTsCharactersCount — ¿Comprobación de si hay caracteres 
19 DADO 2 en La memoria intermedia 


TE moy AM ¿obtención de cuenta de caracteres 
87 ORA A 
ce Ri ¡Memoria intermedia vacía, A 
Case0s AMP GISSDatasReady 


Proceso de reloj de tienpo real 


El control se transfiere a la rutina RICSInterrupt ATC en cada pulso 
del reloj de tiempo real. Se va decrementando La cuenta de pulsos 
para comprobar sí ha transcurrido un segundo completo. Si es así, 
se actualiza el tiempo ASCII del bloque de configuración. 


Con cada pulso, La cuenta de reloj=centinela se decrementa para ver sí 
el control debé ser "forzado" a una dirección especificada previamente 
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ES 
229622 
210000. 
E 
229422 
318022 
cs 
DS 


21BE00 
ÉS 
c2B008 


3ABDOO. 
7 





Figura 8-10. 


al regreso de La interrupción RIC. El tenporizador-centinela 
puede utilizarse para transferir El control fuera de Lo que puede ser 
Un bucle infínito, como es el de esperar que La impresora esté preparada. 


Fijación de centinela 


Esta es una subrutina de nivel de no interrupción que simplemente fija 
La cuenta y La dirección del centinela. 


Parámetros de entrada 


BC = núnero de pulsos de reloj antes de que el centinela esté 
"fuera de tiempo" 

HL = dirección a La cual se transferirá el control cuando 
el centinela esté fuera de tiempo 


¿Evita interferencia de Las interrupciones 
RTCsWatchdogsadaress — ¿Fijación de dirección 

m8 

13 

RTCsMatchdogsCount ¿Fijación de cuenta 


¿El control se recibe aquí en cada pulso de 
3 reloj de tiempo real 


psu ¿Almacenamiento de otros registros 
SHO PISUSersML 4 

PO 

DAD SP ¿Obtención de pila de usuarios 
SHO PIsUsersStack ¿Almacenamiento 

EXI SP,PI8Stack ¿Conmutación a pila Local 

PUSH B 

PusH 0 


LX M/RTOSTACkSCOUNE ¡Decrenentar La cuenta de pulsos 
DORM 
JNZ RTCSChecksMatehdog ¿No está aúna O 

¿Ha transcurrido un segundo por consiguiente 
LOA RTCSTICKsSPersSecond — puesta al valor original 
AS 


¿Actualización del reloj de tiempo real ASCII 
LAI D,TimesinsASCIISEnd ¿DE -> 1 carácter después de hora ASCII 
EXI HiUpdatesTimesEnd ¿ML => 1 carácter después de tabla de control 
RTCAUEdatesDigiti 
pex 0 ¿Decrementar apuntador a hora ASCII 
A] ¿Decrementar apuntador a tabla de control 
moy ¿Obtención del próximo carácter de control 
RA ¿Comprobación de final de tabla y por consig. 
ye 3 todos Los dig. del reloj están actual izados 
mm saltar ":" en La hora ASCIL 
Loa ¿Obtención del próximo di 
En ¿Actualización del mismo 
sax 7 almacenamiento del mismo 
¿Comparación con el valor máximo 
WNZ RTCSCIOCK8UPdated lo necesita arrastre; por tanto, actual. compl. 
mI ALTO” Juesta a cero del dígito a ASCII y almacenar 
sTax  D de nuevo en hora ASCII 
MP ATCRUpdatesDigit: ¿Vuelta atrás para el próximo dígito 


RICSCIOCKSUPdated: 


RTCsMatchdogsCount ¿Obtención de cuenta centinela en curso 
a 


did ¿Comprobación de si es OFFFFH 
A 


RTCSDOGeNOtASet ¿Ha debido ser cero La primera vez 
L ¿Comprobación de si ahora es O 
RTCSDOGANZ ¿No, no está fuera de tienpo 
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¿El tiempo de centinela ha transcurrido; 
por tanto, “LLamar” La rutina adecuada 
M,RTCeMatchdogéReturn ¿Fijación de La drreccion ge retorno 
pl 5_ preparada para el retorno 
RTCOMatchdogsAdar 'ransferir control como para CALL 
Po 
RTCHMatchdog8Re turn ¿El control volverá aquí desde La rutina 
7 de centinela del usuario 
MP RTCADOGONOtASet ¿funciona como cuando el cent. no está activo 


RTCSDOGONZ: 
SHLD_ RTCeMatehdogsCount ¡Almacenamiento de La cuenta decrementada 
RTCADOgéNOt$Set: 3 Cla cuenta permanece inalterada) 
NVI AL ICAEOL ¿Puesta a cero del chip de control de inter. 
1CSOCHZSPOt 


D ¡Realmacenamiento de registro de La pila lol 
a 
PIeUrereStack ¿Commutar a pila de usuario 


POUR SHL «cuperación de registros de usuario 


¡Reactivación de interrupciones 


¿Elimina acarreo 


¿Bt O se introduce en el acarreo 
¿Vuelta a su sitio del byte MS desplazado 
¿Obtención del byte LS 

¿Bit 7 = bit O del byte MS 

¿Puesta en resultado 


ORA 
moy 
RAR 
moy 
moy 
RAR 
mov 
RT 


Controladores de alto nivel para disquete 
Estos controladores realizan Las siguientes funciones: 


Seleccionan un disco específico y devuelven La dirección 
a la cabecera de parámetros del disco apropiada 

ción del número de pista para La próxima Lectura o escritura 

ción del número de sector para La próxima Lectura o escritura 
Fijación de direc. de DMA (Lec./esc.) para La próxima Lect, o escritu 
Traduce un número de sector Lógico a fisico 

la pista a cero de forna que La siguiente Lectura o escritura 
se encuentre en La pista 0 


Además, Los controladores de alto nivel son responsables de hacer 
que Los disquetes flexibles de 5 1/4" que utilizan sectores de 512 bytes 
aparezcan ante (P/N como sí utilizaran sectores de 128 bytes. Lo hacen 
utilizando un programa de bloqueo/desbloqueo. Este programa de 
bloqueo/desbloqueo se describe con más detalle más adelante en este 
Listado, exactamente antes del propio programa. 


Tablas de parámetros de disco 


Como se explicó en el capítulo 3, describen las características físicas 
de las unidades de disco. En el B105 del ejemplo 

existen dos tipos de unidades de disco: estándar 8" una sola cara 

y de una simple densidad y minidisquetes de doble cara, doble 
densidad 5 1/4". 


Los disquetes estándar 8" no necesitan utilizar el prograna 
de bloqueo/desbloqueo, pero sí Las unidades de 5 1/4”. Por consiguiente, 
se ha prefijado un byte adicional en el bloque de parámetros de disco 
para indicar a Los controladores de disco qué disco físico corresponde 
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06295 + a cada disco Légico y si necesita o no desbloqueo. 
0633s 3 
06337 
06330 + Tablas de definición de disco 
06339 + 
Ds30o + consisten en cabeceras de parámetros, con una entrada por controlador 
06341 de disco Lógica, y bloques de paránetro de disco también 
De242 con un bloque de parámetros por disco Lógico, o el misno bloque 
De; de paránetros para varios discos lógicos” 
Des; 
D6s0o ;e 
D6s0r + 
06402 — DirkBParametertieade ¿Descrito en el capítulo 3 
D6s02 + 
D6a0s ¿Disco légico A: (disquete de 5 1/4) 
00€ AzO9 — 0600S DU FlopayeSeSiavtabia ¿Tabla de desplazamiento de 5 1/4" 
0E3 0000000006408 Du 0,0/0 Ineservado para CP/N 
0080 Boz2 06807 DU Diractorsbutíe 
0080 3409 06008 DU PLoPPyeS8ParamenersBlock 
CBE DOz3 06409 DA DisKRANMOrKa 
COF1 1024 06810 DA DA EKRASAIlocation8Vector 
Des 
Desi ¿Disco Lógico B: (disquete de 5 1/41) 
vera AEO9 06413 DU FloppyeSeSkeutable — ¿Comerte La misna tabla de desplaz. que A: 
DOES DO00O000000$A14 Du 0/00 Jneservado para CP/M 
D9r8 B0zz 06415 DU DirectorysButter —— ¿Comparte La misna memoria intermedia que A: 
00D 3409 0641é DU PLOPPyOSIParametersBlook e 000 e da 
ORFF 0023 06817 DU DAsKBBMOrKa Area de trabajo particular 
0701 2624 06818 DU DISKBBSALlocaLionsVector Vector de situación particular 
Des9 + 
06420 Disco lógico €: (flexible de 8 
0903 F6o9 06421 DU FlopprsbNSkewiable ¿Tabla de desplazamiento de 8" 
0703 0000000000622 O ¿reservado para 6P/N 
0708 Bozz 06423 DH DiractoreButter —— ¡Comarte La misma menoría intermedia de A: 
0700 8409 06828 DU lOPPYSONParametersBicck 
OR0R Fo23 06828 DA DiekeCamoriares ¿Ares ide: trabajo particular 
om 3024 o6Aze DA DAsKeCOADlocationeVector ¿lector de stúlación particular 
Dear 
Seto ¿Disco lógico D: (fexible de 8% 
0713 Agos 06429 DU FlopPyeSeSkaWtable — ¡Comparte La misna tabla de Ai 
0913 00000000000643o Du 0.0/0 ¿neservado para (P/N 
ODIA 1022 06431 DU DiractoryeButíe ¿Comparte Lo misma memoria intermedia de A: 
DYID 4409 06432 DU FloPPySBIParametersBiock ¿El misno DPO de €. 
DYIF 0028 08433 DU DiskeDeMorkar: JAres de trabajo particular 
DU DirkeDeADlocationeVector ¿Vector de situación particular 
¿Disco lógico M: (disco de menoria) 
ODA 0D dl 
Du ¿No se necesita desplazamiento 
Da ¿Reservado para CP/A 
Da 
Du ek 
Du ¿El disco no puede cambiarse; por tanto, 
7 no se necesita área de trábajo 
DA MODISKBALLocationeVector 
; Equivalencias para bloque de parámetros de disco 
; 
; Tipos de disco 
Froepyss Eu 1 ¿Mintflexible de 5 1/4" 
se EU 2 ¿Flexible de 8% (sc SD) 
Eu 3 Íbisco de memoria 
Indicador de bloqueo/desbloqueo 
06458; o 
0080 06437 — MesdeDeblocking EQU 1000800008 — ¡Tamaño del sector > 128 bytes 
D6ase + 
D6s00 18 
06601 + 
Dés0z + Bloques de parámetros de disco 
06603 + 
D6s0s + Miniflexible de 5 1/4% 
D6sos + 
Deseos ¿Prefijado un byte extra para indicar el tipo de disco 
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¿_ y el bloqueo requeridos 
FloepySS + NeediDeblocking 
El bloque de parámetros ha sido corregido para 
5 reflejar La nueva distribución de una pista por 
5 Lado del disquete, mejor que ver una pista 
como ambos Lados en una posición determinada 
7 de la caveza. 
¿también se ha ajustado para reflejar 
5 una "nueva" pista más que se utiliza 
para La imagen del CP/M, 
con el cambio resultante en el núnero 
7 de bloques y el núnero de pistas 
7 reservadas. 


FloppyeT8ParametersBlocks 
De 


¡sectores de 128 bytes por pista 
¿Desplazamiento de bloque 

15 5 

1 

17 

127 

1100800008 ¿Mapa de bits para reservar un bloque para 

000000008 el directorio de ficheros 

32 ranaño del área de trabajo de disco cambiado 

3 ¿Número de pistas antes del directorio 


Estándar flexible de 8" 
¡Prefijado byte extra para DPS para esta 
7 versión del BIOS 

pe Floppys8 ¿Indica el tipo de disco y el hecho de que no 
7 se requiere desbloqueo 

)sPar ame ter sBlock: 

De 26 ¿Sectores por pista 

0 

DE 


242 

$e ¿Número de entradas del directorio - 1 

1100800008 — ¿Mapa de bits para reservar dos bloques para 

0090900008 el directorio de fichero 

16 “anaño del área de trabajo de disco cambiado 
'Nimero de pistas antes del directorio 


¿El MSDISk supone que hay disponibles 4 x 48K bancos 
de memoria. La tabla siguiente describe 
el disco cómo si tuviera 8 pistas: dos 
de ellas para el banco de memoria 
con cada pista de 192 sectores 
de 128 bytes. 
El número de pista dividido por dos se utilizará 
para seleccionar el banco. 
De heDi sk FEU tipo es MSDISk, no desbloqueo 
MODiskAPar ameter8BLock: 
ES 192 ¿Sectores por "pista". Cada pista es 
24K de memoria 
esplazamiento de bloque (situación del byte 1024) 
Máscara de bloque 
Máscara de extensión 
lunero máximo de bloque 
De lúmero de entradas del directorio - 1 
En ¿Mapa de bits para reservar dos bloques para 
Da 5 el directorio de ficheros 
De ¿El disco no puede cambiarse; por tanto, 
no existe área de trabajo 
o ¿Ninguna pista reservada 





Number 801 SLogicaleDisks Eu a 
, 
o 


Senso ¿Disco seleccionado en registro € 
U para Unidad A, 1 paro B, etc. 
Inetorno de La dirección de La" cabecera de 
7 parámetros de Gisco aoecuada en AL, o 00004 
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06806 si el disco seleccionado no existe 
06807 
0963 210000 06808 Lomo ¿Supone un error 
0966 79 08809 mov A/C ¿Comprobación de sí es disco solicitado válido 
oso 
087 Fe0c 06811 en cas ¿Comprobación de sí es disco de menoria 
096) CAPSO9 06812 Ji SELOSKOMeDIsk Si 
06813 
098c FEOA 06814 CPI Numbersof8LogicaleDiske 
OE DO. 06815 RNC ¡Retorno si > núnero máximo de discos 
06818 7 
O9SF 322004 06817 STA SelectedsDisk ¡Almacenamiento núnero de disco seleccionado 
06818 ¿Fijación para volver a la dirección DPH 
0972 6 06819 moy LA ¡Componer disco en valor palabra 
0973 2600 06820 mur O 
06821 ¡Cálculo del desplazamiento de La tabla cabecera 
06822 7 "de parámetros del disco multiplicando por La 
06823 7, Longitud de cabecera de parámetros (16 bytes) 
0975 29 06824 DAD ¿nz 
0978 29 06825 DAD A e] 
097 29 06828 DAD +0 
0978 29 06827 DAD 116 
0979 11E308 06828 LXI — D,DiskBParametersHaaders — ¿Obtención de dirección base 
0970 19 06829 DAD 0 ¿DE => DPH adecuado 
0970 ES 08830 Pus ¿Almacenamiento de La dirección DPH 
068317 
06832 ¡Acceso al bloque de parámetro de disco para extraer 
06833 el byte especial de prefijo 
06834 5 que identifica el tipo de disco y si se 
06835 5 requiere el desbloqueo 
06836 ¿ 
OPTE 1LOAGO 06837 O ¿Obtención del desplazamiento del apuntador DPB en DPH 
o981 19 06838 DAD DD ¿DE -> dirección DPB en DPH 
0982 5E 06839 moy Em Obtención dirección DPB en DE 
083 23 06840. E 
0984 56 06841 moy Dm 
0985 EB. 06842 xcHo. ¿DE -> DPB 
06843 
06844 — SELDSKASetSDisk8Types 
0986 28 ES ¿DE > byte de prefijo 
0997 7€ mov ¡obtención del byte de prefijo 
0988 ESOF 06d ANI ¿Aislamiento del” tipo de disco 
OPBA 32360A 06848 STA ksTyRe imac. para uso en control. de bajo nivel 
0980 7E 06849 mov Obtención de otra copia del byte de prefijo 
058€ Esso 06830 ANI ;AisLamiento indicador de desbloqueo 
0990 32350 06851 STA SelectedeDisksDeblock — ¡Alnac. para uso en controlador de bajo nivel 
0993 El 06852 A] ¡Recuperación de apuntador DPH 
099 09 06833 Rer 
06834 y S 
06833 — SELDSKSMBDi ski Disk seleccionado 
0973 212309 06836 XI MoMBDASK8DeN ¿Retorno de La cabecera de parám. correcta 
0998 C38S09 08837 JM? SELDSKESeteDisi8Type — ¿Reanudar proceso normal 
06838 7 
07000 +M 
070014 
07002 + Fija La pista lógica para La próxima Lectura o escrítura 
070037 
07004 — SETTRK: 
0998 60 07005 moy ma 'n entrada pista seleccionada en BC 
0990 69. 07008 mov Lie 
0990 222E04 07007 SHLO SelectedsTrack ¡Almacenamiento para controlador de bajo nivel 
0%A0 C9 07008 RT 
07009 1 
07100 3 m 
O710L + 
07102 + Fijación del sector lógico para La próxima Lectura o escritura 
07103 + 
07104 7 
07108 — Serseci ¿En entrada sector Lógico en € 
09A1 79 07106 moy AC 
PAZ 323004 07107 STA SelectedsSector ¡Almacenamiento para el controlador de bajo nivel 
09AS C9 07108 RT 
07109 1 
07200 10 
0720 + 
07202 y Fijación dirección DMA del disco (E/S) para La próxina Lectura o escrítur: 
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09A8 
09AS 
SAR 
O09AD 





O9AE 
0982 
0986 
09BA 
098€ 
0902 
0906 
09cA 
OSCE 


0902 





O9DA 
09DE 
092 
09 
OSEA 
09 
092 


ose 


DADA 


oA10 
ALI 
OA12 
0A13 
0R15 


0a16 








$ 
$0 
224609 


90010203 
10111213 
20212223 
OCODOEOF. 
ICADIELE 
0S090A0B 
18191A18 
04050807 
14151617 


24232627 
¿353637 
44454647 
30313233 
40414243 
2020282 
ACADAES 
28292428 
38393438 
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07203 
07204 
07205 
07206 
07207 
107208 
07209 
07210 
072 
07300 
07301 
107302 
07303 
07304 
07305 
07306 
07307 
07308 
07309 
07310 
07311 
07312 
07313 
07314 
07315 
07318 
97317 
07318 
07319 
07320 
07321 
07322 
07323 
07324 
07323 
07326 
07327 
07328 
07329 
07330 
07331 
107332 
07333 


01070D131907334 


07335 
07336 


090F13020807337 


07338 
07339 


1219040A1007340 


ES 
09 
$e 
2600 
0? 


3AZCOA 
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07341 
07400 
07401 
07402 
07403 
07404 
07403 
074068 
07407 
07408 
07409 
07410 
07411 
07412 
07500 
07501 
07502 
07503 
07504 
07505 
07508 
07507 
07508 
07509 
07510 
07311 






pu o ¿Dirección DMA 





¿En entrada, dirección en BC 


















































nov Ibosplacar' 4 ML para almacenamiento 
Ley 
SILO DMAsacóress ¿Almacenamiento para controlador de bajo nivel 
a 
; 
3 traducción número de sector Lógico a físico 
; 
Do Tablas de traducción de sector 
g Estas tablas están indexadas utilizando el número de sector lógico, 
Fo Y contiene el húmero de sector fisico correspondiente: 
Proepyssestavtables ¡Cada sector físico contiene cuatro 
Ietctores de 128 bytes 
E Fisico 1480. Lógico 1280 Fisico 512 byte 
Vu/olsoz.03  100101,02,03 20 
DE desizide/1o  oa/05,08,07 2 
De egos oec09ciÓ.n AA 
Do Ibias HagaciasdS 5 5 cabeza 
Dr eds O 
DE Osos cio. IROcZAc220zS 2 
De ACSI2SZ7  I2a025i2e027 E 
NE EEE Do 
E EE 33 
DB 36,37,38,29 — 136,37,38,09 03 
DB S2ISA,5S  140,41,42,43 A 
DE EDO I DaArAD/d6.a7 $3 
E 5 3 cabeza 
e EEE 33% 
DE RAsASIRSIA7  136,37:58,5> 23 
DE SeeneR ds leoncicósies 23 
De Moralcaz AS Dearónis6rer 13 
DE Ses7isa SS eeceivo: 53 
Prompyseeskevtaber ¿Controlador estándar de 8" . 
A ol.02,03,04.03-08/07.08.09,10 — Sectores lógicos 
Do O cOaa AS I2R OS: 1 LI7 23.09 ¡Sectores Hsicos 
; 
H 11,12,13,14,15,16,17,18,19,20 — Sectores lógicos 
Dm OB ASi21/0208,14:20,28,06,12 — ¡Sectores físicos 
: 
; 21,22,29,20,25,26 Sectores lógicos 
De deszacon/1O,n6/22 ¿Sectores físicos 
. 
: 
Secrran ¿Traducir sector Lógico a físico 
E emiradas BÉ = minero de sector Lógico 
DE > tmbla de desplazamiento adecuada 
-n salida, HL = núnero de sector fisico 
xCHO. HL -> base de tabla de desplazamiento 
Po JAñadir al número de sector Lógico 
moy hen Footención mero de sector físico 
mi ¿Poner en un Valor de “16 bits 
Je 
homes ¿Situar el disco lógico seleccionado en La pista 0 
Antes ds hacerlo, deber comprobarse si La memoria 
intermedia del disco fisico tiene Información en elta qu 
Moya de ser escrita. Esto se Indica por medio de un 
Dd adore MustsurItesBuffer, Que este situado 
Pm eUprograma de desbloqueo. 
LOA mustetrilesBurter ¿Comprobación de sí La memoria intermedia 





OS 
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física ha de ser escrita en un disco 
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GRA C22004 07512 N2 O momEsnosUriL 
GRID 522004 07513 A DatasinsDiakeBurtar — ¿No, quiere decir que La memoria intermedia 
ora ¿está ahora desocupada 
S73IS— MonEsMor tes 
enzo 0500 O7Sle CA ¿Fijar en La pista O (lógicamente, no sucede 
0AZ2 CO9BO? 07317 CALL SETTRK 2 ninguna operación práctica del disco) 
o 07318 mer 
0739 
07320 
07800 
07801 Los datos escritos o Leidos por La unidad de disquete se transfieren 
Sje02 por medio de una memoria intermedia sica que es una pista completa 
07e03 Oh 1ongitud, 9 a 512 bytes, Se dectara al final del 8105, 
O7eos $ tiene un fequeño prograns de inicialización "escondida en él. 
07eos 
Sréos El programa de bloqueo/desbloqueo intenta minimizar La cantidad 
97607 de entrades/saLidas del disco real almacenando el disco y la pista 
27808 Sh Curso que residen en La memoria intermedia física. 
07809 Sí sucede una petición de Lectura en un "sector" CP/M de 128 bytes 
07610 y si está en la memoria intermedia física, no se realizará 
07611 mingún acceso al disco a menos que el BDOS indique 
07612 Que está escribiendo en el directorio. La escritura 
07813 Sn el directorio provoca una escritura inmediata 
07614 en el disco de pista entera en La memoría 
000 E0u 2048 
00 0781 Pnyaicalesecararerraci E0U 9 ¿AJustada para reflejar que una 
07820 Padevo" pisto es sólo una cara 
Sen del disco 
0000 2 OPEL emparcarmsectoresize sou si2  Ífstees el tamaño del sector real para Los 
Sreza sguetes 317 
ore LoS dlaquetes de 8" y Los discos de nenoría 
Ses ¿ocilizen sectores de 128 bytes 
Dee Inectaración de La menorta Intermedia de disco 
07827 7 hialeo para los diequetes de 5 1/4" 
0004 O7S2b  CPMBSECIPersPnysical EQU Physical8SectorsSiza/120 
02 07e2> Eo CPMISRCIPer Deny e IcalmPny a 1caLeSecsPer Track 
1300 07820 ES raciabny a lcalaSectoraSize 
0009 Sres E CemeSecaPer analice 
o Dres Sectores Em OOZIcPmeSecaPersPnysica1) 
Dress > 
o7e2a ¿Estos son Los valores transmitidos por el BD0S cuando Llana 
07es ¿la operación de escritura. 
07e3s ¿el asignado/no asignado Indicó si el 8005 desea 
29] escribir en un bloque no asignado (sólo indica esto 
97es 7 Gara La primera escritura de sector de 128 bytes) 
7 Sen un Bloque que ha. sido ya asignado 
o7eao Son Hleneros a 
07641 'L BDOS indica también si desea escribir en el directorio 
97643 del fichero. 
Desa H 
Dress to o 
Seas En 
2002 O7ess — MritedUnallocated EQU 2 ¡ce lonarado para La mem. Ínt. de pista 
Dres 
0126 00 07848 NritesTrpes pe 0 ¿contiene el tipo de escritura indicado 
0789 ¿or el 600s 
9reso 
TO 
07852 — IneButtersDKetrka ¿Variables para sector físico en nenoria 
07853 sister 
0427 00 075 ineButtereDsst ma DE) Som movidos y comparados cono grupo, 
DA 0000 07835 IntButfereTracko DO ED de forma que no se alteren 
07858 7 estas Litas 
o42a 00 0757 IneButtersDiskeTyper DB O Tipo de diaco para sector en La mem. inte 
ones 
omar 00 ONES) DatasineDisKaBufferi DB O ¡Si es distinto de cero, La memoria intermedia 
07660 5 del disco tiene datos del disco en ella 
one 00 O7801 — musteWritesBurtera DB O no cero cuando Los datos se han escrito 
o7és2 Pentel Distsnufter pero an no se han 
078sa $ Sctito en el disco 
Sesa 
07865 Setectecooierrío ¿Nariables para el disco, la pista y el sector 
07666 ; seleccionados (selec. por SELDSK, SETTRK y SETSEC) 
Figura 8-10. (Continuación.) 
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DB 5) Se mueven y se comparan cono un grupo de 
SelectedeTracks De 5) forma que no se altere el orden 


Selectedasector: De ¿No forma parte del grupo, pero se 
necesita aquí 

SelectedsPhysicaloSectors DB jector físico seleccionado derivado del 
sector (CP/M seleccionado mediante 
desplazamiento a La derecha del núnero de 
bits especificado por SectorsaitSshift 


, 


DisksErrorsFlags ¿No cero para indicar un error que podrá 

7 no ser recuperado por Los 

5 controladores del disco. El BDOS Llevará a 

3. La salida un mensaje de "Sector defectuoso" 
DiskoHungaF1. ¿No cero si ocurre un tiempo excedido 

del centinela 

úimero de 16,66 cono pulsos de reloj para wn 
exceso de tiempo de 10 segundos 


Disk8Timer 


' 
;Indicadores utilizados dentro del prog. de desbloqueo 


Reads0peration: o ¿No cero cuando hay que Leer un sector 
5 de 128 bytes del CP/M 
SelectedaDisk8Deblock o ¿No cero cuando el disco seleccionado necesita 
5 "desbloqueo (fijado en SELDSK) 
SelectedaDiskoTyper o jIndica el disco flexible de 8" o de 51/40 


ANSDisk de seleccionado (fijado en SELISO 


Lee en el sector de 128 bytes del CP/M especificado por Llamadas previas 
de selección de disco. Fija La pista y el sector. El sector se leerá 
en La dirección especificada en La Llamada previa de Set DMA. 


SÍ se Lee de una unidad de dísco utilizando sectores mayores 
de 128 bytes, el programa de desbloqueo se utilizará para "desempaquetar” 
un sector de 128 bytes del sector físico. 


LDA— SelectedsDisksDeblock ¿Comprobación de sí es necesarjo desbloqueo 
DRA A Cindicador fijado en La Llamada a SELOSK) 
ye ReadanosDeb Lock ¿No, utilizar no desbloqueado nornaies 


El algoritmo de desbloqueo utilizado es tal 
que una operación de Lectura puede ser vista 
hasta que Los datos en curso se transfieren 
como sí fuese La primera Lectura 
a un bloque no astanado 
At ¿Indica que debe realizarse prácticamente 
ReadsDperation 5 una Lectura 


A/MritesAllocated ¿Simula programa de desbloqueo donde se desee 
MritesTyos que éste sea una escritura 

en un bloque asignado 
PerforméReadiirite — ¿utiliza programa común para ejecutar la lec. * 
Escritura de sector de 128 bytes de La dirección DMA en curso, 
al disco, pista y sector seleccionados previamente. 


AL Llegar aquí, el BDOS tendrá fijado el registro € para indicar 

si esta operación de escritura es para un bloque ya asignado 

(Lo que significa que puede ser necesaria una Lectura previa del sector) 
o para el directorio (caso en el cual Los datos serán escritos 
inmediatamente en el disco). 


Sólo la escritura en el directorio tiene Lugar inmediatamente. En todos 
Los demás casos, Los datos se trasladarán de la direce 
intermedia del disco, y serán escritos sólo cuando Las circunstancias 
obliguen a La transferencia. El número de operaciones fisicas 

de disco, por tanto, puede reducirse considerablenente. 





SelectedeDiskaDeblock ¿Comprobación de sí se requiere desbloqueo 
A 3 Gndicador fijado en La Llamada SELDSK) 
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0452 
0As3 
0456. 
0AS7 


24 


07 
7 


ona 
077 
DATA 
07D. 


0n80 
049 


0097 


ñ5E 


op 
1057] 
0493, 
0497 
078 
099 
DADA 
0] 
DAYC 
DADO 


OASE 
oAML 


omAZ 
OMA 





cAzaoB 


Ar 
323404 
7 
Eso1 


322604 


ña 
323204 


3A300A 
1 

1 
EsaF 
ESOS 


212804 
TE 
3601 


97 
CAB7OA. 


11270A 
212004 
COEJOR. 
CASIOA 


3AZCOA 


CAESOB. 


EDCEoA 
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5 


2600 
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07919 JO MritesMosDeblock 
07920 
07921 xRA ¿Aadica que se requiere una operación de 
07922 STA 3 escritura tes decir, NO una Lectura) 
07923 moV salvar tipo de escritura del BDOS, pero 
07924 An distinguiendo únicamente entre 
07925 escritura en el bloque o escritura 
07926 sra en directorio 
07927 + 
0790 + 
08000 ia 
08001 + 
08002 — PertormiReadelrite: — ¿Programa común para ejecutar tanto Lecturas 
08003 ¿cono escrituras de sectores de 128 bytes 
08004 ÍRA A Suponiendo que no ocurran errores de 
0800s STA DisksErrorsFlag 7 dicco 
00006 
08007 LOA Selectedssector ¿Conversión del sector seleccionado de 128 bytes 
29008 RAR ¿EU éf sector físico dividiendo Por 4 
08009 RAR 
o801o ANI 3 Elimina cualquier bit no deseado 
08011 STA SelectedsPnysicalssector 
08012 , 
09013 LXL O Hi DatasIneDisk8Buffer — ¿Comprobación de si La memoria intermedia del 
o001a MOV ADA isco ya tiene datos en ella 
08015 mui a ¿camdica Incondicionalmente que La nenoría 
08018 3 Intermedia tiene ahora datos en ela) 
08017 or A ¿irtene datos efectivamente en ella? 
08018 yz Read8Track8into8Buffer  ¿No, procede Leer una pista fisica en la 
08019 ¿memoria intermedia 
08020 
08021 JLa memoria intermedia tiene en su interior una pista 
08022 1 éica. Comprobación de si es La correcta 
08023 : 
08024 LIL D,ImbButfersDisTrk ¿Comprobación de si La pista de La nen. int. 
08025 LXI O Hi SelectedeDiaTrk 5 es La misma que la selec. previamente 
08026 CALL ComparesDkeTrK ¿compara SOLO disco y pista 
08027 SE Tracks ImSBUter ¿Si? está ya en la memoria intermedia 
0s0zo 
08029 No, habrá que leerla en Los contenidos 
S8030 ¿en curso de La menorta intermedia 
09031 LOA musteWritesBurter ¿compronación de sy La memoria intermedia 
08032 OR A ¿tene datos Que deban escribirse antes 
08033 ENZO MrstesPmysical ist) escribirse 
08034; 
08035 — ReadeTracksimtosBut fer 
08036 CALL SeteInADUEteroDk8Trk ;Fija en La memoria intermedia variables 
08037 ; del disco seleccionado y pista 
08038 7 para reflejar cuál de éstas está ahora 
08039 en la memoria intermedia 
08040 CALL ReadePnysical ¿Lee la pista en La nenoría intermedia 
08041 XRA A ÍPone a cero el indicador para reflejar Los 
08042 STA Mustowritesdufter % Contenidos de La memoria intermedia 
08043 y E 
08042 — TracksIneButier ¿La pista seleccionada y disco están 
08045 ¿ya en La memoria internedia 

omversión del sector seleccionado 
06047 7 de 128 bytes CPÍM en una dirección relativa 
08049 7 bajo La menorja intermedia 
08049 LOA SelectedeSactor ¿Obtención del núnero de sector seleccionado 
08030 HOY LA ¿multiplica por 128 desplazando valor de 16 bits 
08051 A ¿7 osts a la izquierda 
08052 DADA nz 
08053 Deo ma 
08054 Da 
08055 Da 
08056 pao. 
08057 A] 
00059 A] 
08059 + 
o8oso LEE D.DisKksBuffer — ¡Obtención de dirección de base de nen. nt. de dísco 
08081 DAD 0D ¿Suna al núnero de sector * 128 
08062 IMC => dirección de comienzo del núero de sector de 
08063 77128 bytes en la memoria intermedia de disco 
08068 x0no Joe 5> sector en la menoria Intermedia de disco 
0808s ÚRICO omasaddress ¿Obtención de direc. DMA fijada en La Llanach SETOMA 
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3A2004 
322704 


2A2E0A 
222804 


3AJS0A 
322404 


co 
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LOA 
CPI 
LDA 
RNZ 


ORA 
RNZ 


xRA 
STA 
CALL 
LDA 
Rer 


¿Supone una operación de Lectura, de forma que 
DE -> dirección de DMA 
3 HL -> sector en la menoria intermedia de disco 
¿A causa del método rápido utilizado para introducir 
F y sacar datos de La memoria intermedia 1 
del disco (ocho bytes movidos por bucle 
de iteración), el contador necesita 
sólo ser 1/8 de Lo nornal 
En este punto, 
€ = contador de bucle 
DE -> dirección de DMA 
HL -> sector en La memoria intermedia del disco 
¿Determina si Los datos deben ser sacados de la 
memoria intermedia (Lectura) o introducidos 
en La menoria intermedia (escritura) 
¿Escribe en La memoria intermedia 
¿(A debe ser O obtenido aquí) 
¿Fija indicador para forzar una escritura de 
la mem. int. del disco más adelante 
face DE => sector en La mem. int. del disco 
5 ML => dirección de DMA 


¿Transferencia de 8 bytes * C veces 
5 de (HL) a CDE) 


' 
¿Si escribe en el directorio, escribir 

MritesDirectory 5 inmediatamente La memoria intermedia 

DisksErrorsFlag ¿0bt. del indicador de error en caso de esc./Lec, retar. 
¿Retorno si hay algún retraso en Lectura o escritu 


¿Comprobación de si han ocurrido errores de disco 
¿Si, abandona el intento de escribir en el directorio 


A ¿Borrado de indicador de que La menoria intermedia 
MustaWrstesButter indica debe ser escrita 

WritesPhysical ¡Escritura de La aenoria intermedia en La pista fisica 
Disk8ErrorsFlag ¿Retorno de indicador de error al LLamador 


, 
1 
SeteIneBUfferaDkeTrks ¿Indica el disco y La pista seleccionados que 


LDA 
STA 


Lao 
suo 


LOA 
STA 


Rer 


DK Teka 
mur 


a menoria intermedia 
SelectedeDisk 
InbBuf fer Disk 


SelectedeTrack 
INSBUffertTrack 


SelectedeDisksType — ¡Refleja también el tipo de disco 
INSBUffersDisk8Ty 


Jompara precisamente disco y pista 
3. apuntados por DE y ML 
c3 ¿Disco (1), pista (2) 


DKSTrkeLOop+ 


LDAX 

cue 
RNZ 
1NX 
1Nx 
DCR 
RZ 

me 


1 
MovesDk8Trko 


(Continuación.) 


¿Obtención comparado 
¿Comparación con comparando 
¿Abandono de comparación sí se encuentra una desig. 

ictualjzación del indicador del comparado 
ictualización del indicador del comparando 
¿Decrenentar en La cuenta de bucle 

¿Retorno (con indicador puesto a cero) 

ComparesDkeTrksLoop 





¿Transferencia de las variables disco y pista 
¿ apuntadas por HL a las apuntadas 
7 por DE 











OAED 0E03 


DEF 7E 
DAFO 12 
DAI 13 
DAFZ 23 
DAFI 0D 
oAFA CS, 
OAFS CIEFOA 


OAFS 7E 
DAS 12 
OAFA 13 
OAFB 23 


OAFD 12 
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mur isco (1), pista (2) 


Moves Dk8TrkBLoop: 


€. 
CAE] ¡Obtención del byte fuente 
STaXx  D ¿Alnacenamiento en destino 

INE DD ¿Actualización de indicadores 

1 

DR C ¡Decremento de La cuenta de bytes 

AZ ¿Retorno sí todos Los bytes han sido transferidos 
IMP MovesDKSTrk8LO0p 


Transferencia de ocho bytes 


Esta rutina transfiere ocho bytes en un bloque, C veces, de (ML) 
a (DE). Utiliza un programa "de salto-a-través" para acelerar 
la ejecución. 


Parámetros de entrada 
€ = número de bloques de 8 bytes a transterir 


DE -> dirección de destino 
HL => dirección de fuente 





3 


¿Obtención de byte de La fuente 
¿Introducción en destino 
Zactual ización indicadores 


¡Obtención de byte de La fuente 
¿Introducción en destino 
FActualización indicadores 


z 


¿Obtención de byte de La fuente 
¿Introducción en destino 





¿Obtención de byte de La fuente 
¿Introducción en destino 
¿Actualización indicadores 





¿Obtención de byte de La fuente 
¿Introducción en destino 
¿Actualización indicadores | 


ES 


¿Obtención de byte de La fuente 
¿Introducción en destino 
FActualización indicadores 


2 


¡Obtención de byte de La fuente 
¿Introducción en destino 
¿Actualización indicadores 


¿Obtención de byte de La fuente 
¿Introducción en destino 
¿Actualización indicadores 


¿Decrenenta en el contador de bucle 
¿Repetición hasta completar operación 


30 IOD?TOO?IOOPIDO IDO IDO)IOOAIOOA 





Introducción a Los controladores físicos de disco en este sistema de cálculo 


Hay dos controladores de disco "inteligentes" en este sístena, 
uno para Las unidades de disquete de 8" y otro para las unidades 
de 5 1/4, 








Los controladores están "conectados fisicamente" al monitor en ciertos 
Lugares en La memoria para detectar cuándo debe realizarse alguna 

operación de disco. Monitor-controlador de 8" posición O040H. 
Monitor-controlador de 5 1/4" posición 0045. Son Los Llamados bytes de control 
de disco. Si el bit más significativo del byte de control de disco está a 1, 

el controlador examinará La palabra que sígue a Los bytes de 
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control respectivos. Esta palabra debe contener La dirección 
de una tabla de control de disco válida que especifique 
la operación exacta a realizar. 


Una vez que La operación ha terminado, el controlador pane 
su byte de control a 00H, Lo que indica al programa que La tarea 
se ha completado. 


El controlador activa también un código de retorno en el bloque de estado 
de disco -- ambos controladores utilizan para ello La misma posición 003W. 
Si el primer byte de este bloque de estado es menor que 80H, significa que 
ha ocurrido un error, No hay más detalles relevantes respecto a La fijación 
de estados de este BIOS símple. Nótese que el controlador de disco tiene 
construidos =- en Lógica de varios intentos =- Lecturas y escritura que se 
intentan diez veces antes de que el controlador dé un error. 


La disposición de La tabla de control de disco se muestra a continuación. 
Nótese que Los controladores tienen La capacidad de encadenar tablas de 
control de manera que pueden Lanzarse operaciones de disco en cadena, Esta 
característica no se usa en este BIOS. Él controlador precisa, sin embargo, 
que Los apuntadores de cadena en La tabla de control de disco sean 
apuntadas por Los bytes de control principal para indicar el final de la 
cadena. 


, 
Disk8Controls8 EQU 40H ¿Byte de control de 8" 
CommandsBlcckss E0U A ipuntador a tabla de control 


DiskeStatussBlock EQU 43H ¿Bloque de estado de 8" y de 5 1/4" 


Disk8Contro185 EQU 45H ¿8yte de control de 5 1/4% 
CommandsBlockas EQU 46H ¿Apuntador a tabla de control 


; Floppy Disk Control Tables 

FloppysCommand: De ¿Orden 

FloppySReadiCode Eau 

FloPPy8WritesCode Eou 

FloPRySUnit: CS ¿Unidad número 0 $ 1 

Floppy8Head: DE ¿Cabeza número 0 6 1 

FlopPySTract: De ¿Número de pista 

Floppy8Sectors De lúmero de sector 

Floppy8By tesCount: Du ¿Número de bytes a Leer/escribir 

FloPRySDMASAdaress: De ¿Dirección de transferencia 

FlopRy8Nert8StatusaBlocki Da ipuntador a bloque de estado sig. 
7, sí existen órdenes encadenadas 

FloppysNextsControlsLocation: DH ipuntador a byte de control sig. 

sí existen Órdenes encadenadas 


Uri tesnosDeb lock: sEscrátura del contenido de La memoria intermedia 
5 en el sector correcto 
2802 FUI A, FloppysWritescode _ ¿Obtención de código de función de escritura 
ca3108 WMP O CommonsNo$Deblort  * ¿Ir a programa común 
ReadanosDeb Locke ¿Lectura previa del sector seleccionado en la 
7 memoria intermedia 
20 AVI A/FlompySReadstode ¿Obtención código de función de Lectura 
CommontNo$Deb Lock: 
221008 STA. FlogmysCommane ¡Activación código de función de orden 
Activación tabla de Ordenes no desbloqueadas bytes 
7 por sector 
3A380a LDA— SelectedeDisksType ¡Comprobación de si operación de disco de 
FE03 cer Ls 5 memoria 
CA7AoS 3 MSD1SkSTranster ¡sí, es MSDISk 


NasbeblocksRetr ys Punto de reentrada para intento después de error 
218009 EXI ML128 ¿Bytes por sector 

222208 SHO FlopaysBytescount 

LA Sn 8 ¿El disquete de 8" tiene únicamente La cabeza 0 
321FOR STA FloppySHead 








3A2DOA DA SelectedeDisk ¡El controlador de disquetes de 8" sólo tiene 
3 información en unidades O y 1 de manera que 
Y SelectedSDisk debe convertirse 
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09 
o 


ome 
SL 


osa 
0857 


oesa 
0850. 


060 
06 


087a 
0870 
0B7E 


0881 
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Eso1 
32E0R 


3AZE0A 
322008 


3A3004 
322108 


244609 
222408 


214300 
222608 


214000 
222008 


211008 
224100 


214000 
3600 
ca3e0c 


3AJO0A 
se 
2600 


0683 29 


0887 


2 


3AZEOA 


088A 47 
OBeB ESO1 





08727 
08728 
08729 
08730 
08731 
08732 
08733 
08734 
08735 
08736 
08737 
08738 
08739 
08740 
08781 
08742 
08743 
08744 
08745 
08748 
08747 
08748 
08749 
08750 
08751 
08752 
08753 
08754 
08755 
08756 
08757 
08900 
08901 
08502 
08903 
08904 
08905 
08906 
08907 
08908 
08909 
oe910 
08914 
08912 
08913 
08914 
08915 
08916 
0891 
08918 
08919 
08920 
08921 
08922 





08924 
08925 
08926 
08927 
08928 
08929 
08930 
0893) 
08932 
08933 
08934 
08935 
08936 
08937 
08938 
08929 
08940 
08941 
08942 
08943 
08944 














01m ranstormación a 160 
STA FlompysUnit ¿Fijar número de unidad 
LOA SelectedsTrack 
STA FloppysTrack ¡Fijar número de pista 
LOA SelectedaSector 
STA FloppyiSector ¿Fijar número de sector 


LHLD DMAsAddres iransferencia directa entre dirección DMA 
SHLD FloPpySDMASAddress 7 y controlador de 8" 


¡El controlador de disco acepta tablas de control de 
disco encadenadas, pero en este caso no se 

7 utilizan, de manera que Los apuntadores al 

7 "siguiente" deben apuntar a Los bytes de control 

% inicial en La página base 











LXI O M/DisksStatussBiock 5Apuntar estado siguiente al bloque 
SHO Floppy8MextsStatustBlock 7 de estado principal. 

Lx ¡Apuntar byte de control del 

SHO FloppyeNextaControlsLocation 7 siguiente al byte de control prínc. 
LXI Mm. FlopaysCommand ¿Apuntar controlador a tabla de control 

SHO CommandsBlocisS 

LX M-DisksControls8 ¿Activar controlador para realizar 

MUI mM 80n, 3 La operación 

MP Mai t8FOrSDiSKSCOMPlete 


Controlador de disco de memoria 


Esta rutina debe utilizar una memoria interna intermedia, 

ya que La dirección DMA del banco ("pista") O ocupa el mismo Lugar 
en el espacio completo de direcciones que el propio MSDisk. 

El MsDiskSButfer está sobre La marca de 48K y, por tanto, 
permanece en el espacio de La dirección cualquiera que séa 

el banco/pista seleccionado. 





Para escritura, debe ser procesado un sector de 128 bytes: 


1. Trasladar sector DMASAddress -> MSDiskSButter 
2. selección de pista correcta (+1 para obtener núnero de banco) 
3. Traslado de sector MSDiskSBuffer => MSDisk Ínagen 

%: Seleccionar banco O. 


Para Lectura, el proceso es: 





1. Selección písta/banco correcto 
2 Trasladar sector MSDisk imagen -> MSDiskSButter 
3. Seleccionar banco 0 

4: Trasladar sector MSDiskSBuffer -> DMASAddress 


Si existe el riesgo de que una interrupción sea La causa de que el control 
se transfiera a una dirección por devajo de 48K, Las interrupciones 
deben ser deactivadas cuando se selecciona un banco distinto de O. 


(6DisKkSTransters 











LDA  Selectedesector ¡Calcular dirección en menoria multiplicando 

moy LiA 7 sector * 128 

mr HO 

DAD mM 12 

DAD > ma 

DAD mM ma 

DAD mis 

DAD 2932 

DAD OM 1. <% 

DADA 12 128 

LOA SelectedeTrack ¡Calcular de qué mitad de sector de banco se trata 
7 “utilizando el bSt LS de La pista 

moy BA ¿Almacenar copia para uso posterior 

ANI 1 ¿AisLar indicador primera/segunda 
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OBBD CA94OB 08945 ye MODI sk 8L0uer 8H 
08746 
OBO 110060 08947 LX DD, (48 9 1024) / 2 ¡Primera mitad, actuar en dirección 
0B93 19 0894 DAD DD 
0891 
08950 — MEDI sk8LowersMalfs ¿HL -> sector en menoría 
0894 78 08951 CN ¿Recuperación pista seleccionada 
0893 1F 08952 RAR ¿División por dos para 33 núnero de banco 
0B9e 30 08953 INR A ¿Banco 1 es La primera pista y 
0B97 47 08954 moy BA Preservar para utilización posterior 
08935 
0B98 3AIDOR 08936 LOA FloppySCommand ¿Comprobación de si se trata de lectura o escritura 
0898 FE02 08937 CEL FloppysMritescode 
OB?D CABEOB= 08938 3 MDI k8Mrite ¡Escritura 
08939 ¿Lectura 
08960 
OBAO CDDDOB 08961 CALL SelectsBank ¡Seleccionar banco de memoria correcto 
OBA3 113023 08962 pos] ¿DE -> MSDiskSButfer, HL => MSDisk inagen 
OBAS 0E10. 08963 m1 lúmero de bloques de 8 bytes a trasladar 
OBAB CDF8SOA 08964 CALL 
08963 
0600 08986 TO ¿Muelta a banco de menoría normal 
CODO 08987 CALL SelectaBank 
0898 
ZAASOS 08969 LMLD Diasaddress Obtención dirección de DMA de usuario 
113023 — 08970 EXI DI MRDIskBDUtter 
E) 08971 xcHo. ¿DE -> DMA de usuario, ML -> MSDIsk memoria ínternedia 
010 08972 MI c.128/8 ¿Número de bloques de 8 bytes a trasladar 
COFSOA 08973 CALL Moves 
08974 
AF 08978 xRA A ¿Indicar no error 
co 08976 Rer 
08977 
08978  MeDiskBWrite ¡Escritura 
OBBE Es 08979 PUSH imacenamiento de direc. de sec. en la imagen NSDisk 
OBBF 2AA609 08980 Lao ¡rasladar sector a MSDISKSBuffer 
0BC2 113023 08981 un 
OBCS 0ELO, 08982 mur ¿Número de bloques de 8 bytes a trasladar 
0BC7 COFSOA 08983 CALL ¿(No utilizar el registro 8) 
08984 ¿8 = banco de menoria a seleccion: 
OBCA CODDOB— 0898s CALL SelectaBank 
089es 
08987 o] ¡Recuperación de dirección de imagen de sector MSDisk 
08988 EXI MiMBDISkaBUtter 
08989 wYI O C/128/8 
08990 CALL Moves ¿Trasladar a inagen MSDisk 
08991 
08992 mr Bo ¿Seleccionar banco 0 
08992 CALL SelectaBank 
08994 
08995 xa A ¿Indicar no error 
08996 Rer 
08997 5 
09100 70 
TS Selección de banco 
09102 +; 
09102 + Esta rutina conmuta al banco de menoría deseado. 
09104 7 Nótese que el puerto hardware que controla la selección de bancos 
09105 7 tiene también otros bits; éstos se preservan a Lo largo 
09106 7 de las selecciones de banco. 
09107 + 
09108 + Parámetros de entrada 
09109 7 S 
09110 7 B = núnero de banco 
TEA 
09112 Bank8Control8Port EQU om a 
09113 Bank8Mask EQU 1111810008 ¡Para preservar Los otros bits 
9114 7 
O91IS Select 
09118 1N Bank8ControlsPort ¿Obtención configuración de puerto en curso 
09117 ANI BankaMask reservar Los demás bits 
09118 DRA B ¿Fijación código de banco 
09119 OUT BankSControlsPort ¿Seleccionar banco 
09120 RT 
O9121 7 
09200 7m 
09201 











Figura 8-10. (Continuación.) 





oBES 3502. 
OBE7 C3ECOB 


OREA 3501 


DEC 321D0B 


DBEF 3AZADA 
OBF2 FEOL 
OBFA CAFDOB 
OBET 3501 
OBF) 323204) 
oREC Co 


2A270A 
ESo1 
321E0R 


2A2804 
7D 
Eso1 
32IFOB. 


7 
1 
322008 


EN 
222108 


210012 
222208 


21A40F 
222408 


214300 
222608 
214500 
222808 


211008 
224600 


214500 
3680 


M3 
223304 


21s70C 
015802 
cosDo8 


TE 
87 
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2A330M 
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09261 
09262 
09263 
09264 
09265 
09266 
09267 
09268 
09289 
09270 
09271 
09272 
09273 
09274 
09275 
09278 
09277 
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WritesPhysicalo ¿Escritura del contenido de La menoría en disco 
7 en el sector correcto 
MUI A, FloppysMritesCode — ;Obtención código función de escritura 
JP CommonsPhysical ¿Ir código común 
ReadsPhysicali Lectura previa del sector seleccionado 
¿ en La memoria en disco 
MUI A,FloppySReadsCode ¡Obtención de código de función de Lectura 
1 
CommontPhysicals 
STA FloppySCommand ¿Fijación tabla de órdenes 
DeblockáRetrys ¡Punto de reent. para nuevo intento después de error 
LDA  IneBuffersDisk8Type — ¿Obtención tipo de disco en curso en memoria 
CPI FloppysS ¿Confirmación que se trata de disa, de 5 1/4% 
ye CorrectaDiskaTy ¿Si 
mI ¿No, indicación error en disco 
STA DisksErrorsFlao 
Rer 
CorrecteDiskeTypes 1Activación tabla de control de disco 
, 
LOA InsBuffersDisk ¡Conversión número de disco a 160 
ANI A + para controlador de disco 
STA FloppysUnit 
LHLD InsBuffersTrack ¡Fijación de número de cabeza y de pista 
NS ¿Pistas con número impar estarán en cabeza O, 
ANI Las restantes en cabeza 1 
STA FloppyiHead ¿Fijación número de cabeza 
moy AL ¿Nota: Se trata de un valor de 1 solo byte 
RAR /2 para pista (acarreo a O desde ANI anterior) 
STA FloppysTrack 
TE] ¿Comienzo con sector 1 de La pista completa 
STA FlospyeSector ¿a transferir 
LXI_— MiBytestPersTrack ¿Fijación contador de bytes para pista 
SHO Floppy8BytesCount 7 completa a transferir 
XI MiDisksButter ¿Fijación de acción de transferencia para 
SHO FloppySDMAsAdare: menoría de disco 
somo sólo se utiliza una única tabla 
5 de control, cerrar el estado y dirigir 
La cadena de apuntadores a Los bytes 
de control principal 
LXI O H/Disk8StatuséBlock 
SHO Floppy3MeNteStatus$Block 
EXI My DiskSComtrols5 
SHO Floppy8MeNt8ComtroleLocation 
LAI M/Flopmy8COmmand ¡Fijación apuntador bloque de conandos 
SHO CómnandsBlociss 
XI MoDiststontrolss ¿Activación controlador de disco de 5 1/4" 
mr eo 
Hai t8FOreD1sLsCompletes ¡Espera hasta que el bloque de estado de disco 
Andique operación finalizada, entonces 
5 comprobación de ocurrencia de errores 
¿En entrada, HL -> bytes de control de disco 
XRA A sastgurar indicador de suspensión a 0 
STA DisksMunosFlag 
LXI O M.Disk8Timeds0ut ¡Fijación de temporizador centinela 
EXI B:DisksTimer ¿Retardo de tienpo 
CALL SetsMatchdog 
DiskeMait8Lcops 
] ¡Obtención byte de control 
Ora A 
y DiskaComplete ¿Operación realizada 
LOA ¿Comprobación de tiempo excedido 
GRA 


(Continuación.) 





y 











0051 


Desa 


007 
059 


ocsc 


ocso 
ocso 


oca 
0cés 
ore 


ocsa 
CSC 
cr 





oc7o 
0071 
0073 
0c74 
0C76 
0c77 
0c7s 
oc7a 
0c7e 
0c70 
C7F 
0cso 
0cez 
oce3 
ocas 
ocas 
oces 
oca? 
ocea 
ocec 
3 
acer 
os 
0c92 
ocga 
095 
0097 
0cse 
OCA 
oc 


0003 


con 
OcAZ 
OcAc 
ocec 
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caeson UNZ O Disk8Error ¿Se fijará a 404 
caasoc UP DiskaMait8Loop 
DIsk8T1meda0ut: ¿El control [Lega a este punto desde La rutina de 
temporizador centinela -- esto forma parte 
5 efectivamente de La rutina de servicio de interno. 
3E90, MUI ao ¿Fijación código de error de disco suspendido 
323304 STA DisksMungsFlag 7 en indicador de error para envíar 
7 control fuera del bucle 
5d Rer letorno a rutina de temporizador centinela 
DisksCompletes 
010000 (ES ¿Puesta a O temporizador centinela 
¿HL es aquí irrelevante 
chepos CALL SetsMatchdoo 
3aa300 LDA— DisksStatussBlock ¿Finalizado, comprobación de estado 
FESO cer 0 ¿Comprobación de si han ocurrido errores 
PARGOD Je DisksError iS 
DisksErrorslgnores 
AF xa A ¿No 
323204 STA DiskSErrorsFlas ¿Borrado de indicador de error 
> REr 
e 
: Manejo de mensajes de error de disco 
DisksErrorsMessas je examina La tabla comparando el estado de error 
del disco y con Los de La tabla. 
Cuando hay coincidencia o cuando se alcanza 
el final de La tabla, La dirección 
siguiente al valor del estado apunta 
al texto'del mensaje correcto. 
20 De am 
300c Du Diskemsgeso 
a Da ar 
A2OC De Disramsosal 
a2 DE 42H 
ACOC De Dishsms9eaz 
21 DE 216 
E De Distams98z1 
22 DE 22m 
Cloc De Dishsms9ez2 
22 DB 23m 
Ceoc De Diskemsgsza 
24 DE 29m 
DADC De Diskemsgeza 
25 DE 25% 
Esc De Dishemege2s 
1 DB 11% 
Foc De Diskemsos11 
12 DB 12H 
0700 Du Diskamsge12 
13 De 
1400 Du 
14 De 
2200 De 
15, De 
100 E DisksMsge15 
16 De 16H 
00D De DiskeMs9s16 E 
00 DE o +€== Terminal 
aDOD Du DisksMs9SUnknown 1Código no enparejado 
- DEMSENtry8Size EQU 2 ¿Tamaño de entrada de La tabla de mensajes de error 
7 de disco 
texte 
09494 
A9736E670009445 De “Hang-,0 ¡Mensaje de tiempo excedido 
AESF74205209446 DB ZNot Ready 
577269746509447 — DiskeMs98A2: DB “Mrite Protected”,0 
A96174610009448 — DiskaMsgeZis DB “Data”,0 
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occ 
oca. 
OcDA 
ces 
cto 
0007 
14 
0022 
ona 
ono 
57] 


0058 
onse 


006 
ones 
007% 
0077 
o07E 
07 
oDe7 
0089 
0092 
0094 
oDAZ 


onas 
oDAS 


0080 
ona 


0084 
0085 
0088 


0088 
one 
onco 


00ca 
00cé 
onc8 


once 
once 
omD1 


0004 
0007 
0004 


Doo 
oDEO 


oDES 
oDES 
DES 
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ASEF726DS109449 
ADE973736909450 
A27573205409451 
ARÉFSE747209452 
A47269766509453 
A86561642009454 
547261626809455 
53ES6I7ASFO9AS6 
427573204109457 
ADECECE5S709458 
SSSESBEESFO9AS9 
09960 
09461 
D7ODOA 09462 
446973682009463 
09464 
09483 
09486 
09467 
204572726F09468 
5000. 09469 
290D0A202009470 
00 09471 
2C204B656109472 
00 09473 
2C2054726109474 
9000, 09475 
2C2053656209476 
0000, 09477 
2C204F 706509478 
00 09479 
09aso 
S26561642E09481 
377269746509482 
09483 
09484 
09485 
00 En 
ODOADO 09487 
0988 
0989 
09490 
09491 
09992 
09953 
09494 
09495 
09496 
99497 
09498 
FS 09499 


21660D 098500 
CDAAOE 09501 


09502 
2A270A 09303 
cos 09504 
32760D 09505 

09506 
AMFOB 09507 
cs3o 09508 
327E0D 09509 

09s10 


342008 09511 
21670D 09512 
CDAGOE 09513 

09514 
3AZ10B 09515 
219200 09516 
EDAGOE 09517 

09518 


21550D 09519 
EDS30s 09520 

09521 
Fr 09822 
7 09523 


216DOC 09524 





Disksenest 
DisksEmsDrives DB 


DisksEMeTracks DB 
DisksEmsSector 





Capitulo 8: Escritura de un BIOS mejorado 305 




















DisksActicnSCOnf Arm 





As kBErCOrS 











De “Format”,0 
Da “Missing Data Mark",0 
De “Bus Timeout”,0 
Da “Controller Timeout”,0 
De “Drive Address”,0 
Da “Mead Address",0 
De Track Address”,0 
08 “Sector Address”.0 
De 
De -11legal Command”, 0 
DisksMs98Unknown: De “Unknoun"0 
DisK8EneL ¡Mensajes de error de disco principal == parte 1 
pe BELL,CR,LE 
De Disk 0 
¡Salida siguiente de texto de error 
DiskeEns2e ¡Mensajes de error de disco principal =- parte 2 
De e Error Í 
us: 08 0,0. ¿Código de estado en hexadecimal 
De SS LORES brive 
o ¿Código de unidad de disco AB. 
De , Mea 
DisksEmmead: — DB o ¿Número de cabeza 
De + Track 
0,0. ¿Número de pista 
De sector 
De O ¿Número de sector 
De 7 Operation 
De o ¿Terminal 
DisksEMsRead: — DB 'Read.*,0 ¿Nombres de operación 
DisksEneurites DB “Hrate.,0 
De o ¿Fijar a carácter entrado por el usuario 
De CRL, O 
¿Procesador de errores de disco 
Esta rutina construye y Lanza un mensaje de error. 
Se plantea entonces al usuario La oportunidad de elegir entr 
R-- Intentar de nuevo La operación que ha causado el error 
1 - Ignorar el error e intentar La continuación 
A -- Abortar el programa y retornar a CP/M 
PusA PSA ¿Preservar código de error desde controlador 
LXI O M,DisksEmbStatus ¿Conversión del código del mensaje 
CALL CAM ¿Conversión de A a hexadecinal 
LOA IneBuffersDisk ¡Conversión de identif. de disco para mensaje 
ADT As ¿Composición de La Letra correspondiente 
STA DisksEmsDrive 
LOA FloppySMead ¿Conversión del núnero de cabeza 
AD os 
STA DisksEnstead 
LOA FloppySTrack ¿Conversión del núnero de pista 
EXI IM DAsKSEMBTrack 
CALL CÁM 
LOA FloppysSector ¿Conversión del número de sector 
EXT M¿DiSk8EMBSeCtor 
CALL CAM 
EXI M.DisksEmes ¡Salida de La primera parte del mensaje 
CALL OUtputsErrorstessage 
A] 'ecuperación código de mensaje de error 
OY BA ¿Para comparaciones 
EXI MiDisksErroriMessages — DEMSENtry8Size 
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en entrada 
XI DD DEMBENtry8Size bt. de tamaño de La ent. para bucle post. 
Disk8ErrorsNextacodes 
DAD D ¿Movimiento a La siguiente (o prinera) entrada 


moy am ¡Obtención número de código de La tabla 
rs ¿Comprobación de final de tabla 

SE Bisxoerrormmatenes ¿5 coimcidancia 

oe JComoarar a £ódigo real 

SE Bustogrroranatcnes ¿Saa iias del Bucle 

Je DlnidErroraneniniode — [tongrebación cásigo siguiente 


Disk8ErrorsMatched: 
mA ¿HL -> dirección de texto 
moy EM ¿Obtención dirección en DE 
mo 
moy DAM 
E xcHo. ¿ML => text 
Cosa0s CALL OutputsErrortMes, ¿Visualización texto explicativo 


215€0D EXI MoDisksEne2 ¿Visualización segunda parte del mensaje 
Cosaos CALL DUtpUtsError Wes: 


214300 LL M,DiskSEMSRead ¿Elección operación de texto 
3. suposición de Lectura) 
3A1008 LOA FloBpysComnand ¿Obtención orden de controlador 
Feo CPI FlcpmyIReadacode 
CA1g0E JT DSRkBErroriRead 
21A500 LEI A DiSDEMUr te ¿No, cambio de dirección en HL 
Disk8Error8Read: 
cosas BALL OutputsErrorames ¿Visualización cambio de operación 
, 
DisksError8RequestBActions ie 
CALL RequesteUserschoice — ¿Visualización de indicación y espera pa 
7 entrar retorno con A=carácter en mayuscula 
cer 


1 ¿inuevo intento? 
37 Disk8Error8Retry 

cer cas 

N3 SystemsReset 
ers ¿Ignorar 
wa DisksErrorslgnore 

UP DANKBErrorSRequesteAction 


¿Abortar 


DisksError8Retrys ¿La decisión de dónde volver depende 

de sí La operación falLida 
ha ocurrido en una unidad desbloqueada 
9 mo desbloqueada 

LOA SelectedsDisk8Deblock 

DRA A 

JNZ DeblocksRetry 

MP NORDeblOCKBRetry 


Systemtresets ¿Esto es una decisión radical, pero causa 
2 el reinicio de CP/M 
mur ¿Reinicialización del sistena 
CALL 


Aa mayúsculas 


Convierte el contenido del registro A a mayúsculas sí está 
en minúsculas. 


Parámetros de entrada 
A = carácter a convertir 
Parámetros de salida 
A= carácter convertido 
ATOsUPper 
Er ¿Comparación con Limite inferior 


RO ¿No hay necesidad de convertir 
cPr ¿Comparación con Límite superior 
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oEso DO, 
041 ESSE 
30654 


0EsA ES 
0E4s OF 
DEA Or 
047 O 
DES Or 
EAS CDADOE 
DESC FI 


DEAD ESOF 
DEAF C630. 
DESI FEA 
0ES3 DASSOE 
DESé 0607 


0658 77 
DES? 23 
DESA C9 


0ES0 0010 


0E69 00 


DESB 00 
DESC OL 

DESD 0006 
DESF 0004 
DEA 4200 
DE7a 4500 





0€75 318000 


Figura 8-10. Continuación.) 


09601 
09602 
09603 
09604 
09605 
09606 
09607 
09608 
09609 
09610 
0981 
09612 
09613 
09614 
09615 
09618 
09617 
09618 
09619 
09620 
09621 
09622 
09823 
09624 
09823 
09828 
09627 
09628 
09629 
09630 
09631 
09632 
09833 
09634 
09838 
09836 
09637 
09638 
09635 
09640 
09700 
09701 
09702 
09703 
09704 
09705 
99708 
09707 
09708 
09709 
09710 
09711 
09712 
09713 
09714 
09715 
09716 
09717 
09718 
09719 
09720 
09721 
09722 
09723 
09724 
09725 
09726 
09800 
09801 


09803 
09804 
09805 
09808 
09807 
05808 


grrr 


CAHeConver te 


ANI 0000S1111B ¿Aislamiento de Los 4 bits LS 
ADI sos ¿conversión a ASCII 
cel o .s ¿Comparación con el máximo 
Je CAHeNumerao lo hay necesidad de convertir a A => F 
AD 7 conversión a Letra 

CaHeNumer ct 
mo MA ¡Almacenamiento de carácter 
mom ictualización de apuntador a carácter 


sa 
1 
; Imagen de La tabla de control de disco para arranque caliente 
A 
BootsControlsParte1: 
1 unción de Lectura 
o unidad 

DB o cabeza 

DB o pista 

DB 2 Sector de comienzo 

Du ers12 ¿Número de bytes a Leer 

Du CCPsEntry ¿Lectura en esta dirección 

Da DiskeStatuseBlock ¿Apuntador al bloque de estado siguiente 

ES DisksControles Sapuntador a tabla de control siguiente 
BootsComtrolsPart2s 

DE 1 ¿Función de Lectura 

DB o mero de unidad 

De 1 de cabeza 

De o de pista 

DB 1 de sector de comienzo 

E 312 de bytes a Leer 

Du CCPSEntry + (8rD12) ectura en esta dirección 

Du DiskeStatuseBlock SApuntador al bloque de estado siguiente 

De DisksControle3 Apuntador a tabla de control siguiente 





A 
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Rnc ¿No hay necesidad de convertir 
ANI SEM ¿Conversión a mayúsculas 
REr 


Conversión del registro a hexadecimal 
Esta subrutina convierte el registro A en hexadecimal 
Paránetros de entrada 


A = valor a convertir y lanzar salida 
HL -> área de memoria intermedia para recibir dos caracteres de salida 


Parámetros de salida 


HL -> byte siguiendo al úLtino byte hexadecimal Lanzado 





PusH PS lacer copia del valor a convertir 
RR 'splazamiento de A cuatro Lugares a La derecha 
RRC 

RRC 

AR le 

CALL CAMBCOnvert ¿Conversión a ASCIL 

POr PSA ¿Obtención valor original 





¿Salto a rutina que convierte y retorna 
5 a quien efectúa La Llamada 


















¿Entrada de arranque caliente 
¿En arranque caliente, el CCP y el BDOS son cargados 
de nuevo en La memoria. En este BIOS 
¿ sólo se utilizan disquetes de 5 1/4", con Lo que este 
¿ programa es específico del hardware del controlador. Se 
¿ Utilizan dos tablas de control prefabricadas. 
LxI SP.60m 





078 
0E78 


DE7E 
oES1 


0E34 
087 


DEBA 
oESD 


0E92 
0E93 
0894 
0E93 
0896 
0E97 





DESA 
0E9D 


DESF 
OEAO 
DEAL 


DEA 
DEAZ 
DEAD 
DEAC 


OEAD 
EBRO 
EBa 


0E86 
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11580E 
CDBADE 
11680E 
CDBADE 
CODFOE 
C36co2 
211008 
224600 
oE0D 
18 
77 
23 
13 
0D 
029208 
214500 09835 
3680 09836 
09837 
7e 09838 
87, 09839 
C29FOE 09840 
09891 
3A4300 09842 
Eso 09843 
DAADOE 09844 
> 09848 
09846 
09847 
21BS0E 09848 
COSFOZ 09849 
03750 09850 
09851 
09832 
ODOAS7617209833 
09854 
09858 
10000 
10001 
10002 
10003 
10004 
10005 
10008 
ES 10007 
220 10008 
DaDe 10009 
Fl 10010. 
co 10011 
10012 
10013 
10100 
10101 
10102 
10103 
10104 
10105 
10106 
10107 
10108 
10109 
10110 
10111 
10112 
10113 
10114 
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a 


LXI D,BootsComtrolsPart1 — ;Ejec.de la primera Lec. del arranaue caliente 
CALL MarmeBootsRead ¿Cargar unidad O, pista O, 
¿cabeza D, sectores 2-8 
LXI  D,BootsControlsPart2 — ¡Ejecución segunda Lectura 
CALL MarmbBoctsRead ¿cargar unidad D, pista O, 


5 cabeza 1, sectores 1-3 
Lización de modificaciones personalizadas 
jar página base y entrar en CCP 


CALL Patehscem 
JmP Enterscen 





harmencotsRead: ¿En entrada, DE -> imagen tabla de control 
JESta tabla de control se transfiere a la tabla 
¿de control del disco principal y 
7 entonces se activa el controlador 
LXI  mM.FLoPpysComnand h => tabla de control 
Sto Comnandsbiocias ¿lneicar al controlador su dirección 
¿Iranstarencia de La imagen de La tabla de 
¿control en La propia tabla de control 
1 ¿Fijar contador de bytes 





c, 
D ¡Obtención byte imagen 
ma ¿Almacenamiento en tabla de control real 
E] ¿Actualización de apuntadores 

D 

c 


¡Decrenentar contador de bytes 
MarmsBootsMove ¿Continuar hasta transferencia de todos Los bytes 







LAI M/DiskSCONtrolsS ¿Activación controlador 
CAL) 

Has taFOr SBo0tsCompLeter 
mo AM ¿Obtención byte de estado 
RA A ¿comprobación de finalización 
JNZ MaiteFOrsBootsComplete ¿No 


4, comprobación de errores 





Loa (ASLaLuséBl0ck 
cer 
se BootsError. ¿Si, ha ocurrido un error 
Rer 


7 
Marm8Bo0tBError! 





LXI Mm, MarmaBootBError Message 
CALL DisplaySMessage 
ame BOOT ¿Reinicio de arranque caliente 


1 
Marm8Bo0t8Error Ses sages 








De CR,LF> Marm Boot Error — retrying...".CR,LF,O 
, 
e 
OhostsInterrupt: 1 El control lLagará a este punto sólo en circunstancias 
1 "excepcionales, tales como que el controlador 
1 haya sido programado para suprimir 
1. Anterrupciones no usuales 
1 
PUSH Pee ¿Almacenamiento de registros de preinterrua. 
MVT A, ICHEOL ¿Indicación de final de interrupción 
OUT 1ESOCMZAPOrt 
POr PSA 
Rer 
, 
; 
, Modificaciones a CP/M 
, 
; Esta rutina representa algunas modificaciones al CCP y al BDOS para 
, realizar algunas modificaciones personalizadas 
; 
' Ficheros públicos: 
3 En sístenas con grandes discos duros es extremadamente útil 
1 La partición del disco utilizando Las posibilidades del número de 
1 usuario; sin embargo, significa un derroche de espacio y disco, 
1 puesto que deben almacenarse múltiples copias de programas comunes en 
, Gistintas áreas de usuario. Esta modificación hace público al 
, usuario O -- accesible desde cualquier otra área de usuario. 
; ex ATENCION eee 








DEFA 3A4200 
DEF 87, 
DEFA CADBOF. 


DEA 78 
DEC 87. 


EFD C20BOF 


000 A, 
OFOL FEES 
0FO2 CAOBOF. 


006 7E 
007 87. 
OFOB CAICOS 
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Los ficheros en el usuario O deben fijarse a modo sistema y estado 
de sólo Lectura para prevenir que sean averiados accidentalmente. 
Debido a Los efectos Laterales asociados con Los ficheros públicos, 
La modificación puede ser activada o inhibida utilizando 

un indicador en el bloque de configuración a Largo plazo. 


Indicación de usuario; 


Cuando se utiliza La orden USER de CP/M, y en 
general núneros de usuario, es fácil confundirse y 
olvidar en qué núnero de usuario se esta. Ésta | 
modificación hace que el CCP visualice una indicación 
que muestra no sólo el disco por defecto, sino 

también el núnero de usuario en curso y Úna w 
indicación de sí están disponibles los ficheros públicos: 


Pa o 36 


Cuando Los ficheros públicos están disponibles 


Equivalencias para ficheros públicos 


EQU BDOSHEntry + 758m 


PFSBDOSSChariMatches EQU BDOSSEntry + 776H 
PFSBDOSSResumesPoint EQU BDOSSEntry + 758H 
PFSBDOSSUnusedsBytes EQU 13 


1 Equivalencias para indicación de usuario 


1 
UPSCCPAEASLAPO nt EQU CCPREntry 
UPACCPAResumesPoint EQU CCPSEntry 


UPSCCPIGetSUser 


UPSCCPAOSL8D1 ske IO: EQU CCPeEMtry 


UPSCCPSCONOUT 


EQU CCPSEntry + 


EQU CCPREntry 


+ Fijación de punto de intervención 


5 

Patenecem 
mur 
STA 
STA 
16% 
SHLO 
La 
suo 


Rer 


, 


PublicaPatehs 


(Continuación.) 


Ame +Fijación de código de operación 
PESB0OSHE xs taPosnt 

LPSCCPIEN APO LNt 

H,PublicsPatch 

PE9BDOSHEXiL8PO int + 1 

H.PrometsPatch ¿Obtención de dirección del programa de intervención 
UPSCOPSEXitáPosnt + 1 


¿Retorno para entrar CP/M 


¿El control Llega a este punto desde el BDOS 
¿EL BDOS está en proceso de examinar el nombre 
5 de fichero que se desea en La función 

de búsqueda del siguiente 

HL -> nombre del fichero buscado 

DE => entrada del directorio 
5 B= contador de caracteres 


omprob. de si Los ficheros públicos están activados 
A 
NosPublicAFi Les ¿No 


A.8 ¡Obtención de cuenta de caracteres 
A ¿Comprobación de si se examina el primer byte 

3. Cque contiene el núnero de usuario) 
NosPublicaFiles ¿No, ignorar modificación 


5 ¿Obtención núm. de usuario desde entrada al directorio 
OESH ¿Comprobación de entrada al directorio activa 
NosPublicsrates ¿Si, Tgnorar modificación 


am tención número de usuario 
A ¿Comprobación de si usuario 0 
PreBDOS*CharsMatches  ¿Forzar emparejamiento de caracteres 








OFOB 
OFOC 


FO 


oFI1 
oF1A 
oF13 


ore 
OFIA 


oF1D 
020 
0F22 
0F25 


0r27 
OFZA 
0F20 


oF30 
0F32 
0F33 


oras 
0F39 
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78 
FE0D 


cas10a 


3A4200 
CALDOF 
2Eso 

Coscca 


coracs 
FEA 
D2300F 
cé30 


EDecca 


coDOCS. 
Ceac 


cea 
FS 
3E31 
Coecce 


c3270F 


2600 
29 
114FOF 


AN 





10191 
10192 
10193 
10194 
10195 
10196 
10197 
10198 
10199 

10200 
10201 
10202 
10203 
10204 
10205 
10206 
10207 
10208 
10209 
10210 
10211 

10212 
10213 
10214 
10215 
10218 
10217 
10218 
10219 
10220 
10221 

10222 
10223 
10224 
10225 
10226 
10227 
10228 
10229 
10230 
10300 
10301 
10302 
10303 
10304 
10305. 
10306 
10307 
10308 
10309 
10310 
10311 
10312 
10313 
10314 
10315 
10316 
10317 

10318 
10319 
10320 
10321 
10322 
10323 
10324 
10325 
10326 
10327 
10328 
10329 
10330 
10331 
10332 
10333 
10334 
10335 
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NosPubliceFiLesr 


moy 
cel 


a 


PromstsPatchi 





ADI 

UPSISDigita 
CALL 
CALL 
sm. 


, 

UPS2ODigites 
ADI 
PUSH 
mur 
CALL 
Pop 
me 





AB 


PFBDOS9UNUNedABy tes 


PFABDOSARe sume: 


CBAPUbIACIFL Les 
A 
POP iVatesFan 















¿Programa de modificaciones reemplazado 
¡Comprobación de sí el contador indica que los 

7 registros apuntan a campos de bytes 

7 del FCB no utilizados 


'oAmt ¿Retorno al BDOS 





.£l control Llega a este punto desde el CCP 
¿EL CCP acaba de obtener el 4d. de unidad 
cuando el control Llega a este punto 

¿La versión CCP de CONOUT se utiliza, 
puesto que el CCP mantiene información 
5 de La posición del cursor 





;Comprob. de sí están activados Los ficheros públicos 


¿No 


a 
UbsccpscomouT — ¡Utilización de La rutina CONOUT del cc 
Lpsccreoetsuser ¿Obtención del número de usuario en curso 
+1 ¿Comprobación de si uno o dos digitos 
UeS2eDL9 tte 

20 ¿Conversión a ASCIL 

UPSCCPACONOUT ¡Salida de carácter 


UPACCPAOetODiskaÍa 


UPSCCPARe 








¿Obtención de identificador de disco 
¿Retorno al CCP 








20-10 1 10 y conversión a ASCIL 
Ps “ALnacenamiento segundo dígito convertido 
A71r ¿Salida primer digito *1" 

UPSCCPACONOUT 

psu Recuperación de segundo dígito 
MON ida del resto de indicación y retorno 


Dirección de obtención del 


Parámetros de entrada 








al cor 


bloque de configuración 


Esta rutina es Llamada por Los programas de utilidad que se están 
ejecutando en La TPA. Dado un número de código específico, devuelve La 
dirección de un objeto específico en el bloque de configuración. 


Utilizando esta rutina, Los programas de utilidad no necesitan conocer 
exactamente La distribución del bloque de configuración. 







































€ = código identificador del objeto (en efecto, esto es 
el subindice de La dirección del objetó 
en la tabla que sigue) 









(Continuación.) 


3 
o 

CBAODjecteTable 
” 


SIMOpIIT Um 





Punto de entrada al BDOS (privado) 


¿Almacenamiento registros de usuario 


¿Composición en una palabra 


¿Conversión del código en desplaz. de palabra 
¿Obtención dirección base de tabli 

FAL —> dirección del objeto en la tabla 
¿Obtención byte LS 


¿Obtención byte MS 
¿HL = dirección del objeto 


¡Recuperación de Los registros de usuario 
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10336 

10337 

10338 

10339 

10400 58 

10801 + 

10402 — CBS0bJeCtaTables 

10403 código 

10404 vv 
OFAF BFOF 10805. +01 fecha en ASCIL 
DFSI 990 10406 +02 hora en ASCII 
053 A3OF 10407 103 indicadores de hora, fecha activos 
OFSS 6DOF 10408 +04 apuntador de entrada forzada 
DFS7 4300 10409 CBeStartue 305 mensaje de inicio del sístema 

10810 1 palabra de redireccionamiento 
DFS9 5800 10412 CBsCOnsolesInput 106 
OFSB5A0O 10412 107 
OFSD 5COO 10413 108 
DFSF SEO 10814 109 
0FÉ1 6000 10415 310 
OFé2 6200 10416 An 

10417 
oFES $400 10418 
067 8500 10419 
0FE9 BDO 10420 
OFSB BFOO 10421 
OFÉD CIO 10822 
OESF C300 10423 
OF 1B02 10420 

10425 
0F73 8400 10826 
OF7S 9100 10427 
OF77 9400 10428 
OFJ ALO 10429 
OF7BA400 10430 
OF7O B10O 10831 
OFF 4002 10432 
OFB1 890 10433 
OF83 Bor 10434 
OBS 4200 10435 
087 A421 10436 

10437 

10500 

10501 Bloque de configuración a corto plazo. 

10502 E 

10503 Contiene variables que serán fijadas una vez 

10804, iniciado CP/M, pero que no serán perservadas de una carga 

10505 de CP/M en La siguiente; esta parte del bloque 

10506 de configuración forma Los Últimos bytes inicializados 

10507 en el BIOS. 

10508 

10509 Los dos valores posteriores se utilizan por Los programas de utilidad 

10510 que necesitan Leer en el bloque de configuración a largo plazo 

10511 del disco. El BIOS comienza al principio de una página de 256 bytes 

10512 y, sín embargo, estará siempre al comienzo de un sector de 128 bytes 

10513 en el área reservada del disco. Un programa de utilidad puede 

10514 entonces, utilizando La Llamada privada al BIOS, determinar cuántos 

10515 sectores de 128 bytes es preciso Leer a partir de La fórmula: 

10516 

10517 (LCTBAONfset + LTCBSLENOtM) / 128 

10518 

10519 EL LICBSOffset es el desplazamiento desde el comienzo BIOS, 

10520 donde comienza el primer byte del bloque de configuración 

10521 a largo plazo. Utilizando el desplazamiento y La Longitud, La utilidad 

10522 puede copiar la versión RAM del LTCB sobre La imagen del disco 

10523 Que ha Leído y escribir entonces el LTCB actualizado 

10524 en disco. 

10525 

10526 — LICBROf set: DM BIOSHENtry - LongsTermscB 

10527 — LTCBeLengthi DW LongsTermsCBsEnd — LongsTermsce 

1os28 5 

10529 Apuntador de entrada forzada 

10530 

10531 Si CONIN encuentra que este apuntador apunta a un byte no nulo, 

10532 este byte será inyectado en el flujo de entrada de consola 

10533 cono si hubiera sido pecanografiado en ella. El apuntador 


112 
11] Selec. del formato de reloj 12/24 horas 

RTCSMatchdog$Count 115 

RTCsMatchdogsAddress 116 

CBsFunctionsKeysTable 117 

CONOUTsEscapestable 518 


DOSInitializesStream 119 
DOSBaudeRatesConstant 520 
DiSInitializesStream 521 
DisBaudéRateSConstant 522 
123 
124 
125 
126 
127 
ASA 130 
MultisCommandeBufter 531 


BRLLRZRRRRZ? PRLLEERZ ERERRE ZERRZ 
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10534 + es desplazado entonces al siguiente byte de La menoria. 
10535 
OF8D 4300 10536 — CBsForcedsInputs Du CBeStartup 
10537 7 
10538 5 
10539 — Dates ¿Fecha en curso 
OFF 31302F313710540 De “10/17/82",LF ¡A menos que se diga Lo contrario, esta es la 


































10541 fecha del sistena actual izada 
10592 lormalmente Será fijada por La utiLidad DATE 
orse 00 10593 ” o Jeyte terminal 00 
10592 
10545 — TimeSInbASCI1: ¿Hora en curso 
DE99 3030 10545 mA 2007 ¿Horas 
DES Sn 10547 De is 
OFSC 3030 10548 mMmME DB 00* ¿Minutos 
DEE SA 10349 De e 
OFSF 3030 10880 Ss: DB “00 ¿Segundos 
10331 — TimesinsASCIISEnd? ¿Utilizado para actualizar La hora 
OFAL OR 10552 OS 
oFAZ 00 10553 Do 0 ¿Byte terminal 00 
10559 > 
10555 > 
10558 — TimesDatesF1 ¿Este byte contiene dos indicadores que se utilizan 
10857 3 para indicar cuándo La hora y/o La fecha 
10559 7 han sido fijadas por programa o Utilizando Las utilidades 
10559 3 TIME y DATE. Estos indicadores son consultados 
10560 3 por progranas de utilidad que necesitan conocer 
10561 5 La fecha y la hora en curso. 
oraz 00 10582 ooo 
000% 10563 — TimesSet EU 0000800018 
0002 = 10564 — Datesset EQU 0000R0010R 
10368 
10568 1 
10700 78 
10701 Areas de memoria intermedia no inictalizadas 
10702 
10703 Con excepción de DiskSButfer, que contiene unos pocos bytes de código, 
10708 3 el resto de variables no iniciaLizadas está en esa área. 
10708 3 Lo que tiene cono efecto reducir el núnera de bytes necesarios 
10708 3 para almacenar, en disco, La imagen de CP/A ya que las áreas 
19707 + no inicial izades no necesitan mantenerse en el mismo. 
19708 3 
10709 3 
10800 70 
10801 3 
10802 7 El prograna de inicialización de arranque en frio es necesario únicamente 
10803 + una vez. Puede ser reescrito destructivamente Una vez que ha sido ejecutado. 
10804 + Sin enbargo, está "escondido" en la memoria intermedia principal del disto. 
10608 7 
10808 
oras 10807 — Disksbuffert DS PhrsicaleSectorsSize ” PhysicaleSecsPersTract 
10808 + 
10809 ¿Mmacenamiento contador de posiciones 
2104 > 10810 — AMLereDisk8BUt fer Eu $5 = valor en curso del cont. de posteiones 
10811 
oras 10812 ORG DisksBufter ¡Puesta a cero del contador de posiciones 
10813 
10814 ¡Este flujo de datos se utiliza por la 
10815 Y subrutina de inicialización: Fiene el 
10816 7 Siguiente formato: 
10817 ; 
10819 ; DB Número de puerto a inicializar 
10819 ; DB Múmero de byte a Lanzar a salida 
10820 ; DB xp xx pxx x% datos a Lanzar a salida 
10821 ; : 
10822 : : 
10823 ; DB Número de puerto terminal 004 
10824 ; 
10825 ; 
10828 7 
pe 1007 Tigo de inicialización declarado aquí 
As De 10929 8 ICSICHISPOrt ¿Programa el controlador de interrupciones 
OFAS 01 10829 DB 1 qero Le SeoLadorE ia bid 
OFAS 56 10830 De tcs 
10831 
OFA7 109 10832 DE 1CSICMRRPOrt 
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or 
19 


€ 
ora 
ora 


orAD 
Oña 
oa 


080 
or 
082 


oras 


oras 
173 
oo. 
al 
oca 
oca 
006. 
007 
oo 
occ 
oF0c 
03 
1011 
1030 
104€, 
1080 





1080 


m1 
1114 
107 
1114 


m0 
1120 


129 


L 





or 10833 De 
02 10834 De 
10835 
09 10838 De 
al 10837 De 
FO 10838 Da 
10829 
es 10840 De 
or 10841 De 
EN 10842 De 
10843 
so 10894 Da 
02 10845 De 
oras 10886 5) 
10847 
00 10848 De 
10849 + 
10850 
10851 
43502FAD2O10852 
3030 10853 De 
20 10854 DB 
3032 10855 E] 
ea 10856 De 
3236 10857 Du 
3 10858 De 
E 10859 De 
ODOADA 10860 De 
ASSESS61GE10861 De 
446973682010862 Da 
202020202010863 DB 
202020202010864 DB 
202020202010865 Dr 
202020202010866 Ds 
202020202010867 DB 
10888 
00 10869 De 
10870 + 
10871 + 
10872 
10873 
202020202010874 DB 
10975 — MBDISK8NOLSSetup8Mess. 
202020202010876 De , 
10877 1 
10979 — MBDISKBDirSENtrys 
10879 
or 10880 a 
AD2444697310881 DI 
ADAOZO 10882 DB 
00000000 10883 De 
000000000010884 De 
10883 + 
- 10886 — DefaultaDisk 
10887 5 
10888 — BOOT: 
10889 
10890 
10891 
10892 
10893 
10894 
10895. 
Fa 10898 pr 
10897 
Z1A40F 10898 Le 
CD1POZ 10899 CALL 
10900 
10901 
EDEEOZ 10902 CALL 
10903 
2ABSOF 10908 ba 
COSFOZ 10905 CALL 
10906 + 
CODFOE 10907 Cati 
10908 
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Mensaje para MSDisk 








1 
1cs1cu2 
1CSOCHLSPOrt 
1 
1csocH 
sam ¿Programa el generador de reloj 8253 
1 
008118010808 ¿Contador O, interrupción periódica, modo 2 
som ¡ATC utiliza canal O 
2 
17921 19721 « 930 nanosegundos = 
16,666 milisegundos). 60 pulsos/seg. 
o ¿Número de puerto terminal O 


.cprm 2.2. 

VERSION ¿Número de versión en curso 

mon ¿Fecha actual 

ena 

Day 

bis 

YEAR 

AA 

“Emanced BIOS” ,CR,LF/LE 

“Disk Configuration 17, CR,LE-LE 

0 200.35 Moyte 3% Floppy", CR.LE 
BI 0.33 Mayte 5% Floppy ¿CALELLA 
Cr 0.24 moyte 8" Floppy" /CR/LE 

2 m1 0024 moyte 8" Florpy",CR:LF 

2 MA 0049 Mayte Memory Disk, CRLE.LE 














o 


MeDisk already contains valia information. ”,CR.LF,O 
MODisk has been initialized to empty state.”,CR,LF,O 





¡Entrada ficticia al directorio utilizada para 
7 determinar 5í MSDisk contiene información válida 


15 ¿Usuario 15 
HeDs Sk 

"280H, 7 “+80H," ¿Modo sistema y sólo Lectura 
9,0,0,0 


0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 
EQU 0004H ¿Disco por defecto en página base 


¿Entrado directamente desde el vector JMP del BIOS 
¿El control será transferido a este punto por el 
7 cargador de CP/M 


¿Inicialización del sistena 
¿Esta rutina utiliza InitializeSStream 
declarada anteriormente 





¡Desactivación de interrupciones para prevenir 
7 efectos Laterales durante la inicialización 
M,InstralazesStream ¿ML > flujo de datos 
DUtPUtAby LesStream ¿Salida a Los puertos 
7 especificados 





General8CIOSInitialization —¿Inicialización de Los dispositivos de 


7 carácter 
H,Signonsitessage ¿Visualización de mensaje de funcionando en 
Displayitessage 5 La consola 


Patenscem Realización de Las modificaciones necesarias al CCP 


y 805 para mejoras particulares 








—_ 





Figura 8-10. 
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¿Inicial ización de MSDisk 
¿Si el directorio MSDisk contiene el nombre 
7 especial reservado MSDisk (con minúsculas 
y fijado a modo sistema y sólo Lectura), 
se supone que MSDisk contiene datos 
váLidos 
¿si el fichero MSDisk no figura, La entrada 
al directorio MSDisk es transterida 
a La inagen de MSDisk y el resto del 
directorio puesto a OESH 
1126 0801 miooo ¿Selección del banco 1 
1128 CODDOR CALL SelectóBank ¿que contiene el directorio MSDisk 


¿Comprobación de presencia de entrada MSDisk 

¿Dirección de comienzo para el priner directorio 
DIS kODir SEN y 

¿Longitud a comparar 


1128 210000 Lxr 
112E 11F31O. Lx 
1131 0E20 mu 

MeDIskeTest 
1133 14 LDAX 
1134 cue 
1135 UNT 
1138 10 
1139 1NX 
113A 0D. DCR 
1138 CAs111 ye MeDisk8Setup — ¡Comparados todos Los bytes 
113€ C33311 MP MeDAsk Test 


poz 
CS 


¿Obtención de byte de variable inicialízada 
¿Comparación con Imagen HSDISk 
DI EKaNot8Setur No commeidencia 


ozozzo 


1 
MOD sk8Setuos 
1141 21810 LAT HI MBDISK8SetupeMe: ¿Información al usuario 


1 
MDI sk8SetupsDones 
1144 COSFO2 CALL Displaymess, 


147 AF xao A ¿Fijación de unidad de disco por defecto a A: 
1148 320400 STA DefaulteDisk 
1148 FB El ¿Pueden activarse ahora Las interrupciones 


114C C36cO2 SP Emterscen ¿ira cP/A 
, 
MODA sk 8NOt8SOtups 
114F 110000 EXI D,O, ¿Transterár a La entrada del directorio MSDisk 
1152 21F310 LX HI MBDASKBDirSEntry 7 a la imagen MSDISk 
1155 0804, mx c/32/8 lúmero de bloques de 8 bytes a transferir 
1157 CDF80A CALL Movesa 
¿DE -> byte que sigue a La entrada MSDisk 
5 en La imagen 
¿Activación rellenado de memoria 
¿Almac. del primer byte en área "fuente 
¿Fijación de ML a DE + 


(12 5 1024) - 32) / 8 ¿Dos bloques menores de 32 bytes 
7 para entrada MSDisk 
¿Utilización de MoveSB para oper. de rellenado 


M¿M9DI sk BNOt8SetupSMe ss a00 
MODA Ak ASE tup8DOne" Lida de mensaje y entrada en CP/M 
, 
DB o ¿Ficticio 
LastelnitializedóByter ¿<= dirección último byte inicializado 
1 
Y Final de programa de inicialización de arranque en frio 
+ 
ORO ANtereDisksButter ¿Puesta a cero controlador de posiciones 


1 
Multi8COmmand8Buf ers DS 128 ¿Puede utilizarse para insertar secuencias 
5 Largas de órdenes en el flujo de entrada 
¿ de consola fijando a este punto el 
3 apuntador de entrada forzada 





, 
DOSBuf fer8Length EU 32 ¿Debe ser un número binario 
DORBUt fer: ps DOSBuUf fer8Length 

1 
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0020 . 
20 


2% 


383 


33 


200 
20 
2400 





10985 
10986 
10987 
10988 
10989 
10990 
10991 
10992 
10993 
10994 
10995 
10996 
10997 
10998 
10999 
11000 
11004 

11002 
11003 
11004 
11005 
11006 
11007 
11008 
11009 
11010 
11014 

11012 
11013 
11014 
11015 
11018 
11017 
11018 
11019 
11020 
11021 

11022 
11023 
11024 
11025 
11026 
11027 
11028 
11029 
11030 
11031 
11032 
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DISBUffersLength Eu 32 ¿Debe ser un número binario 
Dieter Ss Di8BufersLengtn 
D28Buf ferdLength Eu 2 Debe ser un número binario 
D2eBut era »s D28Buf fer 8Lenoth 
, Areas de datos para control de dispositivos de caracteres 
, 
PIsUsersStacki DS 2 ¿Area de almacenamiento para apuntador a pila 
PISUSersHLs DS 2 
pS 40 Area de pila para uso de Las rutinas de servicio 
PIBStacko 5 de interrupciones para prevenir desbordamiento 
7 del área de pila de usuario 
, 
DirectorysBut fer: »s 128 intermedia de directorio de disco 
, 
MODAS K8BUN faro »s 128 ¿Menoría intermedia para 
7 MSDÍSk 

, 
+ Areas de trabajo de disco 
; El BD0S La utíliza para detectar cambios inesperados 
, de Los disquetes. El BDOS fijará automáticamente 
, el disquete cambiado a estado de sólo Lectura. 
Disksaiorkarear pS 32 Ar 
DiskeBemorrarea: Ds 22 7 Ba 
DiskscaMorkarea: ES 16 10 

FS 16 7 Dr 





Dis reDeMorhar e 


Vectores de asignación de disco 


EL 8005 Los utiliza para mantener un mapa de bits 
de cuáles son Los bloques utilizados y cuáles están Libres. 
Utiliza un byte por cada ocho bloques, de ahí 

La expresión de La forma (bloques/8+1). 





DiSKkSA9AlLocationsVector ps (174/87+ rar 

DIsK8BSAl locationtVector 19 7/8 1 Br 

1 

DisK8CSAl locationsvector Ds as 10 

Disk8D8A1 o: FS (242/81 1 Ds 

MODISK9A1locationsVector ps 192/80) + MODIsk 
END ¿Final de Listado del BIOS mejorado 
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Clases de errores 
Funciones de manejo de errores del BIOS 
Manejo práctico de errores 

Errores de entrada/salida de caracteres 
Errores de disco 

Mejora de mensajes de error 










Procesamiento de errores 


de hardware 












Este capitulo describe las mejoras que pueden hacerse para mejorar de 
alguna forma el manejo primitivo de errores del CP/M. Cubre las clases de 
errores corrientes que el BIOS puede tener que manejar. Describe algunos 
de los aspectos filosóficos en los que se originan los errores, cómo detectar 
éstos y cómo corregirlos o cómo sacar el máximo partido de la situación. 

Al final del capítulo se presentan algunas subrutinas de ejemplo de 
procesamiento de errores. Algunas de éstas se han mostrado ya en el 
capítulo anterior como parte del BIOS mejorado (figura 8-10); aquí se han 
repetido para que se puedan estudiar aisladamente. 





Clases de errores 











Básicamente, el usuario percibe sólo dos clases de errores —los que son 
corregibles por el usuario y los que no lo son—. Existe una tercera clase, 


37 
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casi invisible, de errores —aquellos que son recuperables por el hardware 
el software sin la intervención del usuario. 

Las fuentes posibles de error de hardware varían ampliamente de un 
computadora a otra, ya que la detección de errores depende en gran manera 
de la lógica particular del hardware. El BIOS puede detectar algunos error 
relacionados con el hardware —principalmente errores provocados cuando 
algo tarda demasiado en ocurrir, como, por ejemplo, cuando una impreso 
recalcitrante no reacciona en un tiempo específico. 

El BDOS no tiene incorporado ningún programa de detección de 
hardware. Puede detectar errores de sistema, tales como un intento de: 
escribir en un fichero de disco que esté marcado “sólo lectura” en el 
directorio de ficheros o intentar acceder a ficheros que no se encuentran en. 
el disco. Estos errores detectados por el BDOS, sin embargo, generalmente. 
no están relacionados con el estado satisfactorio del hardware. Por ejemplo, 
un controlador de disco con un problema de hardware podría escribir 
fácilmente sobre un sector del directorio, borrando con ello algún fichero. 
Este error no se notaría hasta que el usuario intentase utilizar uno de los 
ficheros estropeados. 











ñ 















Funciones de manejo de errores del BIOS 





Detección del error 





El programa de manejo de errores del BIOS deberá servir para las 
siguientes funciones: 


e Detección. 
e Análisis. 
e Indicación. 


e Corrección. 


Obviamente, antes de tomar las medidas indicadas, hay que detectar el 
error. Esto puede hacerse sólo con el software o mediante la interacción del 
BIOS con lógica de detección de errores en el hardware. En general, los 
únicos errores que puede detectar el BIOS sin asistencia están causados 
cuando ciertas operaciones tardan en completarse más de lo que se 
esperaba. Puesto que el autor del BIOS conoce la forma de operación de los 
elementos periféricos específicos del sistema, el programa puede predecir 
cuánto tardará en llevarse a cabo una operación particular y puede señalar 
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un error cuando el tiempo excede al previsto. Esto incluiría el problema de 
que las impresoras no reaccionen dentro del periodo de tiempo especificado. 

El BIOS puede trabajar en colaboración con el hardware para determi- 
nar si éste ha detectado un error. Armado con las especificaciones del | 
hardware, el BIOS puede introducir información en el controlador o en el 
estado del dispositivo para disparar la lógica de detección de errores. Cómo 
se realiza esto depende en gran manera de los periféricos de cada computa- 
dora y del grado en que estos dispositivos han “activado” a los controlado- 
res para que sean capaces de procesar independientemente de la computa- 
dora. Desgraciadamente, muchos fabricantes documentan el significado de 
los bits de estado individual que indican errores, pero no combinaciones de 
errores, o la forma de actuar cuando ocurre un error particular. 


Análisis de errores 


Suponiendo que el BIOS ha detectado un error, lo primero que tiene que 
hacer es determinar la clase de éste; es decir, si el error puede ser corregido o 
no simplemente intentando de nuevo la operación. Algunos errores parecen 
ser corregibles, pero al reintentar la operación varias veces siempre queda 
inacabada. Un ejemplo seria el error de control de suma (check-sum) al leer 
un sector del disco. Si se hacen varios intentos para leer el sector y todos 
terminan en error, se convierte en error “fatal”. El programa del BIOS ha 
de ser capaz de realizar una clasificación inicial y luego de una clasificación 
subsiguiente si falla la acción llevada a cabo para corregir el error. 

Otros tipos de errores pueden ser clasificados inmediatamente como 
errores fatales —no puede hacerse nada para salvar la situación—. Por 
ejemplo, si el controlador de disco indica que no puede encontrar un 
número de sector particular en un disquete (debido a un error en el 
formato), el BIOS no puede hacer nada más que informar al usuario del 
problema y suministrarle otra información que pueda servirle de ayuda, 

El análisis de errores puede requerir algunas búsquedas básicas, tales 
como introducción de fallos en el hardware y observación de las combina- 
ciones de indicadores de error. Por ejemplo, algunas impresoras (con una 
interfase paralela) indican que están “fuera del papel” u “ocupadas” 
cuando, de hecho, están desconectadas. El BIOS debería detectar esta 
condición y comunicar al usuario que debe conectar la impresora y no 
cargar más papel. 





Indicación de errores 


Un mensaje de error incompleto o críptico es enloquecedor. Es el 
equivalente funcional de la frase “se ha cometido un error. ¡A ver si aciertas | 
lo que está mal!” 
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Un mensaje de error, para ser completo, debería informar al que lo 
recibe de lo siguiente: 


e El hecho de que ha ocurrido un error. 


e Si se ha intentado o no la recuperación automática y si ésta ha 
fallado. 


e Los detalles del error, si es necesario en términos técnicos para que 
sirvan a un ingeniero de hardware. 


e Cuáles son las posibles soluciones que tiene el usuario. 


Para enfocar estos puntos, hay que considerar el mensaje de error que 
puede ser enviado por el CP/M después de que se haya intentado cargar un 
programa introduciendo su nombre en el CCP. Lo que aparece en la 
consola es el siguiente diálogo: 


A>myprog<cr> 


BAD LOAD 
A> 


Lo único que se sabe es que hay un error, y hay que adivinar cuál es, aun 
cuando la causa especifica del error fuera conocida para el CP/M cuando 
envió el mensaje. Este mensaje de error es enviado por el CCP cuando 
intenta cargar un fichero “.COM” mayor que el área de programa transito- 
rio actual. El mensaje “BAD LOAD” es únicamente inteligible después de 
saber cuál es el error. Aun entonces, no explica qué es lo equivocado, si se 
puede hacer algo para solucionarlo y cómo se ha de hacer. 

Para ser completo, este mensaje de error podría decir algo asi como: 


A>myprog<cr> 
"IMYPROG.COM" exceeds the available memory space by 
1,024 bytes, and therefore cannot be Loaded under the 
current version of CP/M. 


Obsérvese la forma en que el mensaje indica cuál es el problema y lo 
valora, de forma que se pueda decidir su gravedad (se necesita obtener IK 
más de memoria o reducir el tamaño del programa). También indica cómo 
se encuentra —no se puede cargar este programa con la versión del CP/M 
actual; por tanto, es inútil reintentar la operación. 

A muchos programadores de sistemas no les agrada que surjan mensajes 
como el del ejemplo. Arguyen que tales mensajes son demasiado largos y 
trabajosos para algo que no ocurre muy a menudo. Admitido que el 
mensaje sea demasiado largo, podría reducirse para leerlo en la forma 
siguiente: 





(131) Program 1,024 bytes too Large to load. 
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Este lleva la misma información; el número entre paréntesis sirve como 
referencia para un manual en el que haya que describir el impacto total del 
mensaje. 

El problema mayor con la forma en que se diseñan los mensajes de error 
es que usualmente se escriben por programadores para ser leídos por 
usuarios que no poseen conocimientos técnicos, y los programadores, como 
es sabido, no tienen ni idea de lo que necesitan saber los no expertos. 

Las indicaciones de error que se diseñen han de poseer las siguientes 
indicaciones, desde el punto de vista del usuario: 


e La causa del error. 
e La gravedad del error. 


e La acción correctora que se ha llevado a cabo o que se ha de 
emprender. 


Examiínense los mensajes de error en el procesador de errores para el 
BIOS ejemplificado en la figura 8-10, desde la linea 03600 en adelante. 
Aunque éstos son una mejora del BDOS de propósito general 


BDOS Error on A: Bad Sector 


tampoco este mensaje responde realmente a todos los requerimientos de un 
buen sistema de mensajes de error. 

Otro aspecto de los errores que se descuida a menudo es que la mayor 
parte de los errores de hardware forman un modelo. Este modelo sólo es 
discernible normalmente al ojo entrenado de un ingeniero de mantenimien- 
to de hardware. Cuando estos ingenieros se consultan para investigar un 
problema, harán preguntas al usuario para determinar si un fallo dado es 
un incidente aislado o parte de un modelo repetido. Esta es la razón por la 
que un mensaje de error debería contener detalles técnicos adicionales. Por 
ejemplo, un mensaje de error de disco debería incluir la pista y el sector 

ados en la operación que acabó en error. Sólo con estos detalles puede 
el ingeniero reconstruir el contexto de un fallo o un grupo de fallos. 





Corrección de errores 


Suponiendo que en la consola haya aparecido un mensaje de error claro, 
el usuario se enfrenta aun con la cuestión: “Y ahora, ¿qué hago?”. Esto no 
sólo puede ser difícil de contestar para el usuario, sino que incluso la 
decisión que se haya tomado para una solución particular puede ser difícil 
de ejecutar para el BIOS. 
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Normalmente existen tres posibles opciones en respuesta a errores: 
e Intentar de nuevo la operación. 

e Ignorar el error e intentar continuar. 

e Abortar el programa causante del error y volver al CP/M. 


Para algunos errores, el reintento puede ser efectivo. Por ejemplo, si se 
olvida poner la línea de conexión de la impresora y se obtiene un mensaje 
de error de “impresora fuera de tiempo”, es fácil poner la impresora en 
línea y pedir al BIOS que intente de nuevo enviar los datos a la impresora, 

Pocas veces se puede ignorar un error y esperar obtener resultados 
apreciables de la máquina; muchos controladores de disco no transfieren 
tampoco datos entre sí mismos y la unidad de disco si se ha detectado un 
error. Sólo los usuarios ignorantes o los valientes desesperados ignoran los 
errores. 

Abortar el programa causante del error es una medida drástica, aunque 
permite salir de una situación que de otra forma podía calificarse de “punto 
muerto”. Por ejemplo, si se asigna erróneamente la impresora a un puerto 
serie inactivo y se conecta la impresora para que repita (con CONTROL-), se 
envía al sistema a una serie infinita de mensajes “impresora fuera de 
tiempo”. Si se aborta el programa, el mecanismo del BIOS que maneja el 
error ejecuta una función de puesta a cero del sistema (función 0) del 
BDOS, arranque caliente del CP/M y el control se devuelve al CCP. En el 
proceso, el conmutador de la impresora se pone a cero y el circulo se rompe, 





[ Manejo práctico de errores 





Esta sección trata acerca de algunos errores, describiendo sus causas y la 
forma en que el BIOS y el usuario pueden manejarlos cuando ocurren. 








Errores de entrada/salida de caracteres 








A nivel del BIOS, los errores más detectables relacionados con la 
entrada o salida de caracteres se encontrarán en los chips del hardware. 


Error de paridad 


Paridad, en este contexto, se refiere al número de bits puestos a 1 en un 
carácter de 8 bits. El octavo bit no utilizado de otra forma de los caracteres 
ASCII puede fijarse para hacer este número siempre impar o, alternativa 
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mente, siempre par. El hardware de la computadora puede programarse 
para que cuente el número de bits 1 en cada carácter y para que genere un 
error si es número impar (paridad impar) o, alternativamente, si es par 
(paridad par). Si el hardware al otro lado de la línea se programa para 
operar en la misma forma, el control de paridad proporciona un mecanis- 
mo de detección de errores primitivo —puede decirse que un carácter es 
malo, pero no cuál debería haber sido. 

El CP/M no procura un mecanismo estándar para informar de un error 
de paridad, por lo que la única opción es volver a poner a cero el hardware 
y colocar un carácter ASCII DEL (7FH, borrado) en el lugar del carácter 
erróneo. 

Si el BIOS opera en un entorno altamente especializado, puede necesi- 
tarse contar el número de dichos errores de paridad, de forma que un 
programa de utilidad pueda informar del rendimiento general del sistema. 


Error de construcción 


Cuando un carácter ASCII de 8 bits se transmite sobre una línea serie, 
los ocho bits se transmiten en serie, uno tras otro. Primero se transmite un 
bit de arranque, seguido por el carácter de datos y después por un bit de 
stop. Si el hardware no consigue encontrar los bits de arranque y de stop en 
las posiciones correctas, ocurrirá un error de construcción. Nuevamente, la 
única opción disponible para el BIOS es poner a cero el chip del hardware y 
sustituir un ASCII DEL. 


Error de exceso de datos 


Este error ocurre cuando la introducción de caracteres de datos llega 
más de prisa de lo que el programa puede manejarlos, de forma que los 
últimos caracteres se superponen a los que están siendo procesados por el 
chip de hardware. Este error puede evitarse normalmente con el uso de 
protocolos de línea serie, como los del BIOS ejemplificado en la figura 8-10. 

Un error de exceso de datos implica que el protocolo se ha roto. Al igual 
que con los errores de paridad y de construcción, casi la única opción 
existente es volver a poner a cero el hardware y sustituir por un carácter 
DEL. 


Error de impresora fuera de tiempo 


Este es uno de los pocos errores en los que el BIOS puede intentar 
sensiblemente una recuperación de error. El error ocurre cuando el BIOS 
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intenta enviar un carácter a una impresora serie y se encuentra con que la 
impresora no está dispuesta durante más de 30 segundos, por ejemplo. La 
causa más corriente de este error es que el usuario olvida poner la 
impresora en línea. Muchas impresoras requieren estar desconectadas 
mientras se las alimenta de papel manualmente, y los usuarios olvidan a 
menudo pulsar el botón para ponerla en línea después. 

Después de un retraso de 30 segundos, el BIOS puede enviar un mensaje 
al dispositivo(s) de la consola informando al usuario del error y pidiendo al 
usuario que elija el curso de acción adecuado. Obsérvese que la salida de la 
consola puede dirigirse a más de un dispositivo. 


Impresoras paralelo 


Las impresoras conectadas al sistema por medio de un puerto paralelo 
pueden indicar su estado a la computadora mucho más fácilmente que las 
impresoras serie. Pueden comunicar estados de error tales como “fuera de 
papel”, “final de cinta” y “fuera de línea”. 

Estos indicadores de un solo error pueden usarse también combinados 
para indicar si el cable de la impresora está conectado, o bien si la 
impresora recibe corriente. Se necesita experimentar, poniendo deliberada- 
mente la impresora en estos estados y leyendo su estado para identificarlos. 
Es equivocado indicar a los usuarios inexpertos que la impresora “está 
fuera de papel” cuando el problema es que el cable de datos se ha 
desconectado inadvertidamente. 

Sin embargo, cada uno de estos errores puede tratarse de la misma 
forma que el problema de fuera de tiempo de la impresora serie: componer 
un mensaje de error y requerir la elección de una forma de acción del 
usuario. 


Ejemplificación de rutina de error de impresora 


La figura 9-1 muestra un ejemplo de programa que trata los errores de 
impresora. Consiste en algunas subrutinas que incluyen: 

e La rutina de clasificación e indicación de detección de errores. 

e La rutina de corrección de errores. 

Utiliza otras subrutinas que se han omitido de la figura para evitar el 


oscurecimiento de la lógica. Estas subrutinas están listadas totalmente en el 
BIOS ejemplificado en la figura 8-10. 
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Este ejemplo muestra en forna explicita cómo manejar el caso 
de que una impresora permanezca ocupada durante demasiado 
tiempo. Con este ejemplo se intenta explicar de forma 
genérica cóno tratar esta clase de errores, 


El ejemplo presupone La existencia de una interrupción de 
reloj cada 16,666 milisegundos (1/60 segundos) y que el 
control se transferirá a La rutina de reloj de tiempo 
real en cada pulso de reloj. 


La figura 8-10 muestra un ejemplo nás completo instalado 
en un BIOS real. 


E0u ¿Función del BDOS de puesta a cero del sistena 
EQU ¿Punto de entrada al 8005 


PrintersTimecutóFlagi DB ¡Este indicador es puesto a uno por La subrutina 
del servicio de interrupción que es LLamada cuando 
el contador de La subrutina de tempor. centinela 
alcanza el O (después de haber realizado La 
cuenta atrás durante 30 segundos) 


Printer8DelaySCount ¿Con un período de reloj de 16,666 ns 
A 5 éste representa un intervalo de 30 segundos 


CR ¿Retorno de carro 
LE ¿Salto de Linea 
1 
PrintersBusy eMe: 

pa 





10003 5072696E74 Ím busy for too Long,“,CR,LF 
0028 4368636368 Ane and read». “,CR,LF,O 


ñ 
004 00 PrimtersCharacters ¿Area de almacenamiento para datos carácter 


7 a Lanzar a salida 
1 


Punto de entrada principal del BIOS 
U programa de redirec. de E/S viene aquí 


3 ¿Almacenamiento de dato carácter 
STA PrimtersCharacter 


Primtersñetrys 
LXI  B,PrinterSDelaySCount — ¿Cuenta del número de pulsos de reloj 
antes de Llamar a La rutina de 
temporizador centinela 
LXI M,PrintertTimededut 7 <= dirección 
EA *patéliatoidos: ¿Llama a rutina de temporizador centinela 


PrimtersWaste 
CALL OstaPrintereStatus ¿Ver si impresora preparada para aceptar. 
¿ salida de caracteres. Incluye La comprobación 
¿ de si está ocupada debido a 
7 que el controlador está esperando 
7 UN XON, ACK o que DTR se 
7, haga alto 
PrimtersReady ¿Impresora disponible 
PrimtersTimecutsFlag — ¿Comprobación de si contador de centinela 
ha alcanzado el cero (si Lo ha hecho, 
La rutina centinela LLamará al 
programa PrinterSTinedS0ut que fija 
este indicador) 


RA A 
ÚNZ DA: ¿5i, visualización de mensaje para 
wdicar situación de error 
MP Primteremalt ¿En caso contrario, comprobar si La 
$ impresora sigue Ocupada 
PrimtertReadys ¿Inpresora preparada para escribir carácter, 
5 pero antes de hacer Lo debe ponerse a cero 
el temporizador centinela 
008c Fa pr Asegurar que no suceda un falso tiempo excedido 


0060 010000 Lx BO Se hace poniendo a cero 
0070 CDAJ00 CALL SetsMatehdos 5 el contador 


Figura 9-1. Manejo de error de impresora 
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en 


LDA — PrintersCharacter ¿Obtención de carácter para salida 
EXI D,PrintertDavicesTable ¿DE -> tabla de dispositivo para impresora 
CALL OUtputeDatasBy! ¿Salida de carácter a La impresora 


Rer ¿Retorno al LLamador del BIOS 
, 


, 
PrimtersTimedsduti ¿El control Llega a este punto desde La 
rutina de temporizador centinela 
si su contador Llega a cero. 
Es una rutina del servicio 
de interrupción 
¿Antes de que el control Llegue a este punto 
7 han sido aLnacenados todos Los registros 
A, OFF ¿rijación de indicador de tiempo excedido en impresora 
PrimtersTimecuteFlac 
Rer ¿Retorno a La rutina de temporizador centinela 


y ¿Rutina de servicio de interrupción 
Display eBury8mes: ¿Impresora ocupada durante más 


7_ de 30 segundos 
XRA A ¿Puesta a cero indicador de tiempo excedido 
STA PrintersTimeoutsFlag 


LXI— M,PrimtertBusydMessage ¡Salida de mensaje de error 
CALL OUtput8Error te: 


CALL RequestsUrerschoice ¿Visualización de: ¿Nuevo intento?, 
dAbortar?, ¿Ignorar? Aceptación 
de un carácter del teclado y retorno 
“ácter convertido a 
en el registro A 
ceras ¿Comprobación de sí es Nuevo intento 


yz PrimtersRetry 
cer As ¿Comprobación de si es Abortar 
Ni Primtersabort 

ce 1 ¿Comprobación de si es Ignorar 
AZ 


PrintersAborte 
MUI C,BOSystembResel ¿Lanzamiento de una puesta a cero del sistena 
ume DOS. ¿No es necesaria La realización de una Llamada 
7 ya que el control no vuelve a este punto 


Subrutinas ficticias 
Se muestran para completar en figura 8-10. Los números Línea 
en la figura 8-10 se muestran en el campo de comentarios que sigue 


(ejemplo de distribución) 


¡Line 03500 
Line 03900 (programa similar) 
05400 (programa similar) 

SetéMatchdog: 





Figura 9-1. (Continuación.) 





Errores de disco 








Los discos son mucho más complicados que los dispositivos de entrada] 
salida de caracteres. Son posibles los errores en las partes electrónicas y en 
el propio disco. La mayoría de los errores relacionados con partes 
electrónicas necesitan solamente ser relacionados con el suficiente detalle 
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como para proporcionar al ingeniero de mantenimiento información sobre 
el problema. Esta clase de error es difícilmente corregible reintentando la 
operación. En contraste, los errores debidos al medio a menudo pueden ser 
remediados reintentando la operación o mediante la construcción de un 
software especial de procesamiento de errores en el BIOS. Este capítulo se 
ocupa de esta clase de errores. 

Los errores debidos al medio ocurren cuando el BIOS intenta leer un 
sector del disco y el hardware detecta un fallo de control de suma en los 
datos. Esto se conoce como error de control de redundancia cíclica (CRC). 
Algunos controladores de disco realizan un control de lectura después de 
escritura, de forma que un error CRC puede también ocurrir durante un 
intento de escribir un sector en el disco. 

Con disquetes, el controlador de disco deberia reintentar la operación al 
menos diez veces antes de comunicar el error al usuario. Entonces, como 
éstos son baratos y reemplazables, el usuario puede elegir el retirar el 
disquete y continuar con uno nuevo. 

Con discos rígidos, el medio no puede cambiarse. La única manera de 
tratar los sectores malos es reemplazarlos lógicamente, sustituyéndolos por 
otros sectores que se colocan en su lugar. 

Existen dos maneras fundamentales de hacerlo. La figura 9-2 muestra el 
esquema conocido como “repuesto de sectores” (sector sparing) —sustitu- 
yendo sectores de una pista más exterior por sectores que están estropeados. 

La ventaja de este esquema es que es dinámico. Si un sector resulta ser 
malo después de un control lectura-después-de-escritura, incluso después de 









Pista n 


Directorio de 
sectores ““de repuesto” 






Controladores dirigidos para Sector dañado 
utilizar este sector de 


repuesto en lugar del dañado 


Sectores 
“de repuesto” 





Figura 9-2. Sectores de repuesto. 
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varios intentos, entonces los datos que se destinaban al sector que fe 
pueden escribirse en un sector de repuesto. El número del sector que falla 
sitúa en un directorio de sectores de repuesto del disco. Después de esto,l 
controladores de disco volverán a ser dirigidos al sector de repuesto 
vez que se intente leer o escribir en el sector dañado. 

El inconveniente de este sistema es que las cabezas de lectura/escri 

del disco deberán desplazarse al sector de repuesto y luego volver a 
posición anterior para acceder al próximo sector. Esto puede ser 
problema si se intenta hacer a gran velocidad en un controlador de cinta 
escritura en continuo (streaming tape) (una en la que se escriben datos 
forma continua en vez de hacerlo en bloques discretos). El retardo caus 
por la lectura del sector de repuesto interrumpe el flujo de datos a la unidad 
de cinta. 
Se necesita un programa especial para manipular el directorio de 
sectores de repuesto, tanto para sustituir un sectór que falla de forma 
manual como para intentar volver a escribir un sector de repuesto de nuevo. 
en el sector dañado. 

La figura 9-3 muestra otro esquema para tratar con sectores dañados. 
En este método, los sectores dañados se saltan en lugar de tener sectores 
que los sustituyan. 

La ventaja de saltar los sectores es que las cabezas no tienen que realizar 
ninguna indagación larga. El sector que falla se salta, y se utiliza el próximo 
sector en su lugar. Por ello, el salto de sector puede dar mucho mejor 
rendimiento. Los datos pueden ser leídos fuera del disco casi con la 

































Figura 9-3, Salto de sector. 





Salto 


104 105 _——+> 106 107, 
Sector 
dañado 


Directorio de 
sectores de repuesto 





103 

















[106 ] Marca de sector dañado. Añadir 1 a los números 
de sector mayores o iguales a 106 con el fin 
207 de obtener el sector fisico correcto. 





Añade 2 (esta es la segunda entrada 
del directorio) a todos los sectores mayores 
o iguales que 207. 
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suficiente velocidad como para mantener la unidad de cinta de escritura en 
continuo “alimentada” con datos. 

El inconveniente de saltar sectores es que no conduce por si mismo a 
operaciones dinámicas. La tabla de sectores dañados se construye mejor 
durante el formateo. Una vez se han escrito los datos en el disco, si un 
sector se estropea, todos los sectores siguientes del disco deben ser 
“desplazados uno hacia abajo” con el fin de hacer sitio para el salto del 
sector dañado. En un disco rigido grande, esto podría llevar varios minutos. 


Ejemplo de manejo de sectores dañados 


El repuesto y el salto de sectores utilizan una lógica similar. Ambos 
requieren un directorio de sectores, en cada disco físico, que contenga los 
números de sector de los sectores dañados. Este directorio se lee en la 
memoria durante la inicialización del arranque en frio. Después de ello, el 
disco lee y escribe operaciones referidas a la tabla de memoria residente 
para ver si están a punto de acceder a un sector dañado. 

Para el repuesto de sector, si el sector a punto de ser leído o escrito se 
encuentra en el directorio de repuesto, su posición en él determina cuál ha 
de ser el sector que se lea. 

En el caso de salto de sector, todos los accesos al disco hacen que el 
controlador compruebe el directorio de sectores dañados. El directorio se 
utiliza para saber cuántos sectores dañados existen entre el principio del 
disco y el sector dañado que ha fallado. Este número deberá ser añadido a 
la pista y sector requeridos para compensar a todos los sectores dañados. 

Los controladores fisicos de bajo nivel necesitan cuatro puntos de 
entrada: 


e Leen el sector especificado sin utilizar ningún tipo de procesamiento 
de sectores dañados. Este se usa para leer en el propio directorio de 
repuesto. 


e Escriben el sector especificado sin utilizar ningún tipo de procesa- 
miento de sectores dañados. Este se usa para escribir en el directorio 
de repuesto en el disco, tanto para inicializarlo como para actuali- 
zarlo. 


e Leen y escriben el sector utilizando procesamiento de sectores 
dañados. Estos puntos de entrada se utilizan para entrada/salida 
normal del disco. 


La figura 9-4 muestra el programa necesario para sectores de repuesto y 
salto de sector (utilizando una condición inicial). 
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Este ejemplo muestra Las modificaciones a hacer para implementar 
el manejo de sectores erróneos utilizando la técnica de sectores 
de repuesto y el salto de sectore 


EQU 
EQU 


E0u 
SectorsSkipping EQU 


, Equivalencias adicionales y definiciones 


, 
SparesDirectorien: ¿Tabla de direcciones del directorio de repuestos 
¿Nota: El propio directorio se 
declara al final del 
BIOS 
SparesDirectoryso ¿disco físico 0 
¿Disco físico 1 


¿Indicadores para indicar cuándo se ha cargado en la 
menoria el directorio de sectores de repuesto de un 
disco físico dado. Fijado por SELDSK 


o Pista conteniendo el directorio de sectore 
5_ de repuesto 

s ¿Sector que contiene el directorio 

SparesSector + 1 


¿Apuntador a directorio 
SelectedeDiske ¿Número de disco Lógico 

Disk8Tyr ¿Disco flexible/duro 
DeblockingéRequired: ¿Indicador de desbloqueo 
SelectedePnysical8Di ske ¿Número de disco físico 

1 

Disk8Trackr DH 7) Estas variables forman parte del bloque de órdenes 
DisksSector: DB 3) manejadas por el controlador de disco 


MaximumsTrack 32768 — ¡Utilizado como terminal 
SectorssPersTrack 18 

FArst8SectorSOnsTrack o 

1 


0008 
0008 
0009 
0004 
0008 
0000 
000€ 
8000 


ES 


A 
Disk8ParametersHeaders1 


Y 
¡Declaraciones DPH estándar 
1 


Equivalencias para bloque de parámetros del disco 


El byte especial de parámetros del disco que precede a cada 
bloque de parámetros del disco necesita ser redispuesto, 
ya que debe añadirse el número de Unidad. 


Tipos de disco 


E0u Jete 5 1/4% 
EQU 8 (SC 5D) 
EQU :0 memoria" 

HSDiskB LO. Eu isco duro - 10 megabyte 

, 

Disk8Typesstas O$111900008 ¿Máscara para aislar valores 

Phys ical8DisksMask 08000811118. 

, 


1 Blocking/deblocking indicator 


, 
NeedsDeblocking EQU 18000800008 ¿Tamaño de sector > 128 bytes 


Disk parameter blocks 





Figura 9-4. Manejo de sectores dañados. 











voLo 


001 
0014 


0015 
0017 
0018 


0018 
oo1c 


o01E 
1113 


0021 
0022 


0026 


0027 
002A 





co 


210000 
7 


Feos 


320800 


ES 


3333 


11OF00 
19 


110400 
19 


23 
El 


28 
a 
ESTO. 
320900 
TE 
E680. 
32000 
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DPB estándar para 








¡Disco Lógico 
¿Byte extra indicando tipo de disco, 
; necesidad de desbloqueo y unidad 
de disco 
De HeDisKk81O + NeediDeblocking + O ¡Unidad física O 








y Formato estándar del bloque de paránetros 
; 





De HeDiskB1O + NeedsDeblocking + O ¡Unidad física O 
HardsSeParameter8Block8D: 
a e 
3 Formato estándar del bloque de parámetros 
1 








NumberSof8Logical8Disks Eu 
, 


ñ 
SELDSK+ ¡Seleccionar disco en registro € 

.C = O para disco A, 1 para B, etc. 
Devuelve la dirección de la Cabecera 
; de parámetros del disco en WL o 00004 
¿ si no existe el disco seleccionado 























armo suposición de error 
moy AC ¿Comprobación de disco relecciona válido 
CPI Mumbersof8LogicalaDisks 
RNC ¡Retorno si número máximo de disco 
STA SelectedeDisk — ¡Almacenar número de disco seleccionado 
ictivación para devolver dirección DPH 
moy LA ¿Composición de valor en palabra 
mI O 
¡Cálculo del desplazamiento en la tabla 
7 cabecera de parámetros del disco multiplicando 
7 por La Longitud de la cabecera (16 bytes) 
pao A 102 
DAD mM 19] 
DAD mM 198 
DAD 116. 
LXI — D,DiskSParameterSieaders ¡Obtención dirección base 
DAD E > DPH apropiado 
Pus MA ¿Salvar dirección de DPH 
¿Acceso al bloque de parámetros del disco 
5 para extraer el byte especial de prefijo 
¿ que identifica el tipo de disco 
7 y si se precisa desbloqueo 
LXI dy dO, ¿obtención desplazamiento apuntador a DPS en DPH 
DAD O ¿DE -> dirección DPB en DP 
moy En ¿Obtención dirección DPB en DE 
E] 
A] 
xcHO. ¿DE => DPB 
SELOSKASeLIDisk8TyDes 
Dx mM ¿DE -> byte prefijo 
MOYA ¿Obtención byte prefijo 
ANI DisksTypesMask ¿Aislar tipo de disco 
STA Disk8Type ¿Alnac. para utilización en controlador de bajo nivel 
A] ¿Obtención de otra copia del byte prefijo 
ANI NeedsDeblocking ¿Aislar indicador de desbloqueo 
STA DeblockingWRequired ¿Salvar para utilización en controlador de bajo 
5 nivel 


¿Programa adicional para comprobar si ha sido 
7 Leido el directorio de rectores de repuesto 
5 para un disco dado 





Figura 9-4. (Continuación.) 





004€ 


004 
0052 
0053. 


0054 


005é 
0087 


0058 


0058. 
005€ 
0081 
0062 
0088 
0086 


0089 
008 
00SF 
0070 
0073 
0074 
0075 





0077 
0078 


0079 


007c 
0070 


0081 
0082 













0083 


0087 


008n 
0088. 
0080 






332  CP/M Manual para programadores 


Figura 9-4. 








































moya ¿Obtención de número de disco físico 
ANI PhysicalsDisksMask 
STA SelectedsPhysicalsIisk ¡Salvar para controladores de bajo nivel 
moy EA ¡Puesta en palabra 
A] 
LXI — MiSparesDirsInsMenory — ¡Puesta de apuntador en tabla 
DAD DO 
moy Am ¡Obtención de indicador 
Ora A 
JNZ DirsinsMenory — ¿Directorio "de repuesto" ya en memoria 
38 Ir ¿Fijar indicador 
210000 LXI O M,SparesDirectories — ¿Creación de apuntador 
19 DAD 0 5 a directorio "de repuesto" 
19 DD 0 5 (añadido dos veces) 
¿HL -> palabra conteniendo dirección del directorio 
se moy Em 
23 1Nx A 
se moy Dom ¿Dirección del directorio de repuestos en DE 
Es xcHo. ¿ML => directorio de repuestos 
220600 suo “esDirectory ¡Guardar para utilización por Los controladores 
+ físicos más adelante 
110000 Lxr ¡Pista conteniendo el directorio de repuestos 
3A0800 Loa 
27 mov ) A 
3504 mur ¿Sector que contiene el directorio de repuestos 
oEL8 mur ¿Número de bytes del directorio de repuestos /8 | 
£DDS00 CALL ¿Lectura en el directorio de repuestos = sin | 
7 utilizar La administración de sectores erróneos 
240600 Luo Directory ¿Fijar marca de final 
11C000 LAT DiSparesLength +. al final del directorio de repuestos 
19 paD 0 
110080 LXI D,MaximumbTrack ¿Utilización del número náxino de pista 
73 moY mE 
22 TA 
3602 CA 


DirsInsmenory: 
El Pr ¡Recuperación apuntador a DPH 
cs Rer 


En Los controladores de disco de bajo nivel puede insertarse 
el siguiente programa antes de activar el controlador para ejecutar 
una orden de lectura o de escritura. 







2A0c00 LMLD O Disk8Track ¿Obtención del núnero de pista de La tabla 
de órdenes del controlador de disco 

En xcHo. E= pista 

240800 LHLD SelectedaSparesDirectory ¿HL => directorio de repuestos 

2 Dx Juelta a entrada anterior 

28 A] ¿6 bytes) 

28 A] 


2ADE00. LOA DisksSector ¡Obtención núnero de sector 
ae AS ¿Salvar para uso posterior 


ua MUI BLOFFM ¿Fijar contador 


ChecksNextsEntrys 
22 10 ¡Actualización para entrada siguiente (o primera) 
ChecksNextsEntry ts 
23 A) 
CheckaNextsEntryz2s 
22 mA 


04 meooB ¡Actualización contador 


1 SectorsSparing 
¿Sí se utiliza la técnica de sectores de 
5 repuesto, se indica el final de la tabla 








(Continuación.) 
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¿ con una entrada con el número de písta 
7 al número máx io de pista 
laximua Trac ¿obtención húnero máxino de pista 
o ¿Comparación DE con (ML), (HLe1) 
SE etenacesector ¿final de tabla alcanzado 
ENDIF 


¡Nota: Si se utiliza La técnica de salto 
? de sectores, el bucle de búsqueda siguiente 
7 terminará cuando La pista requerida 
$ es menor que La de la tabla 
Ello ocurrirá siempre cuando se encuentra 

el número máxino de pista al final 
5 de la tabla 


¡DE -> entrada de tabla 
Disk8Tr ack ¿Obtención pista requerida 
¿DE = pista requerida, HL -> entrada de tabla 
cen ¿Comparación de La pista requerida con la entrada 
7 de tabla 


Sectorssparino Utilicese el programa siguiente 
para sectores de repuesto 

ChecksNextsEntry ¿pista no coincidente 

a ¿ML —> byte MS de La pista 

A ML => sector 

AC Obtención sector requerido 

" ¿Comparación con entrada de tabla 

Check8NextsEntry2 ¿Sector no coincidente 


¡Pista y sector coincidentes, 
sustituir, por tanto, pista de repuesto 
y sector apropiado 


M,SparesTrack ¡Obtención núnero de pista utilizado para 
7 sectores de repuesto 
DiskeTrack ¿sustitución de pista 


A,First8SparesSector — ¡Obtención primer número de sector 

e ¿Añadir el número de entrada al 
¿directorio que corresponda 

DiskeSector ¿sustitución de sector 


Sectoreskippino ¿Utilícese el siguiente programa para 
salto de sectores 
¡su objeto es encontrar La entrada 
5 en la tabla que es mayor 
% o igual que el sector/pista 
% requeridos 


TrackséMatch ¡Posible coincidencia para pista y sector 
ComputesIncrenent ¿Pista requerida < entrada de tabla 
CheckeNextsEntry ¿pista requerida > entrada de tabla 





¿HL -> byte MS de la pista 
GMC > sector 
Fobtención de sector a partir de La tabla 


Comparación con sector requerido 
Sector saten ¿Coincidencia pista/sector. 
ComputesIncrement ¿Pista/sector requeridos < pista/sector de repuesto 
CheckenentaEntry2 ¿Trasladar a entrada de tabla siguiente 


coinciden pista y sector con entrada 
de tabla, puede saltarse entonces 
5 el sector adicional 





¿8 contiene el número acumulativo de 
7 sectores a saltar 
tención sector requerido 
7 103 ¿saltar número de sectores requerido 
80 E ¿Determinar número de sector final 
0612 B,SectorssPertTrack — ¿e incremento de pista 








Figura 9-4, (Continuación.) 
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DIVSASBYSB. evolver € = cociente, A = resto 
DiskeSector = nuevo número de séctor 


Ec ¿Componer palabra con incremento de pista 
D, 

DiskeTrack ¡Obtención de pista requerida 

D ¿Añadir con incremento 

DiskeTrack ¿Almacenar pista actualizada 


¡Pista/sector no erróneos 
3 o pista y sector han sido 
5. actualizados 
ReadoWritesDisk ¿Realizar Lectura/escritura de disco físico 
Sectoreskippino 
¿Subrutina necesaria para La rutina 
$ de salto de sectores 


DIVSASDYAS. 
Dividir A entre 8 


Esta rutina divide A entre B, devolviendo el cociente 
en C y el resto en A. 


Parámetros de entrada 


'ividendo 
B= divisor 


Parámetros de salida 


A = resto 
B = cociente 


DiveAeBreB: 
mI co ¿Inicializar cociente 
DIVSASBYSBALO0p+ 
IRC ¿Incrementar cociente 
sue E ¿Sustraer divisor 


e DIVSASBYeBeLOOP ¡Repetir sí resultado todavía positivo 
DR Cc cociente correcto 
ADD ¿Resto correcto 


Rer 
ENDIF 





cren 
Comparación menoría 


Esta subrutina compara el contenido de DE con (ML) y (ML+1), 
devolviendo Los indicadores como si La sustracción (ML) = DÉ 
se hubiese realizado. 





Parámetros de entrada 


HL > palabra en memoria 
DE = valor a comprobar 


Parámetros de salida 


Indicadores fijados por (NL) - DE 


¿Obtención byte MS 


¿Retorno sí bytes MS distintos 
¿HL -> byte LS 
¿Obtención byte LS 





¿Retorno sin cambiar HL 





Figura 9-4. (Continuación) 





A 


1 
AbsolutesRead: 


IAH teSDL ske 














00co SparesLength EQU 


SparesDirectorys0s 


SparesDirectorysl 
0197 pS 
0257 ps 


_—— 








Parámetros de entrada 


| 
ML -> menoria intermedia 
DE = pista 
A = sector 
B = núnero de unidad de disco 


€ = núnero de bytes a Leer / 8 


Fijar bloque de conandos del controlador de disco con 
parámetros situados en registros, inicializar entonces la 
operación de Lectura yendo al programa ReadSWriteSDisk. 





resto del programa de Los controladores de bajo nivel 
Leyendo la pista y sector requeridos. 





Declaraciones del directorio de repuestos 


Nota: La utilidad de formateado de disco crea un directorio 
L de repuestos con entradas de pista/sector 

para aquellos sectores que encuentra erróneos. Llena el 

resto del directorio con OFF (Lo que sirve para terminar 
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¿Las rutinas de Lectura (y escritura) absoluta acceden 
al sector y pista especificada sin util 





? de administración de sectores erróneos. 





La búsqueda en el directorio). 


5 para mayor seguridad. La utilidad FORMAT pone 
5 el número máxino de pista en las entradas 
5 no utilizadas del directorio de repuestos. 





¡Directorio de repuestos propiamente dicho 
ÍMarca de final 





Figura 9-4. (Continuación.) 





Mejora de mensajes de error ] 





La ampliación final al manejo de errores del BIOS que se trata aquí se 
encuentra en el manejo de mensajes de error del controlador de disco. La 
subrutina mostrada en el BIOS ejemplo de la figura 8-10, aunque es una 
mejora significativa de los mensajes enviados normalmente por el BDOS, 
no advierte al usuario del curso de acción más adecuado para cada error. La 
figura 9-5 muestra una versión mejorada del procesador de mensajes de 


error. 


.e.a ¿64 entradas, 3 bytes cada una 
7 Byte 0,1 < pista 
5 Byte 2 = sector 
0008 pS SparesLength — ¿Directorio de repuestos 
0195 ps 2 ¿Fijación por SELDSK del número máximo de pista 
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Muestra muy brevemente el procesador de errores con 
ayuda-al-usuario para Los errores de disco que se han 
mostrado en el BIOS mejorado de La figura 8-10. 

Esta versión presenta unas recomendaciones de la acción 

a seguir dependiendo de La naturaleza del error detectado. 
Las partes que permanecen del programa de La figura 8-10 
se han abreviado. 


Equivalencias ficticias y declaraciones de datos necesarias 
para obtener un ensamblaje de errores de este ejemplo. 
FloppySReadsCode 
FlopRy3WritesCode 


A 

DiskeMungsFlag: ¡Fijar NZ cuando temporizador centinela 
fuera del Límite 

DisksTimer ¡Retardo de 10 segundos (16,66 ms pulsos) 


DisksStatuséBlock ¡Dirección de memoria donde devolver estado 
5 del controlador 
¿Valores de La tabla de órdenes del controlador 


FloppySCommand: 
she 


DeblockingsReauired: ¿Fijación de indicador por SELDSK de acuerdo 
5 con el tipo de disco seleccionado 
DisksErrorsFlags DB indicador de error devuelto al BDOS 


, 
InsButtersDisks De ¿Idem de disco en relación con el sector de disco 
5 en curso en La memoria intermedia de desbloqueo 


1 Equivalencias para mensajes 
BELLO EQU 07H ¿Indicador sonoro del terminal 
CR EQU ODM ¿Retorno de carro 

ue EQU 0AH ¿Salto de Línea 

BDoS 


Eu ¿Punto de entrada al 8D0S (para puesta a cero del sistena) 


, 
NosDeblocksRetr ys 


, 
* Programa omitido para fijar La tabla de órdenes del 
1 Lador de d ieiar ón de disco 


ÚMP O Mai t8FOrSDisHSCOmPlete 
, 


, 
UritesPhysicalo ¡Escritura del contenido de La memoria intermedia de disco 
7 “en el sector correcto ] 
MUI A FloppysUiritesCóde — ¡Obtención código de función de escritura 


UMP  ComnomsPhysical ¿Ir a programa común 
ReadsPnysicals ¿Lectura del sector seleccionado previamente 
5 “en La memoria intermedia de disco 
MUI ALFloPPySReadsCode ¡Obtención código de función de Lectura 
CommonsPhy 5 ca15 
STA FloppySCommand ¡Fijar tabla de órdenes 


DeblocksRetrys ¿Punto de reentrada para intento después de error 


3 Programa omitido para fijar el bloque de órdenes del 
+ controlador de disco e iniciar la operación de disco 
+ = 


MaitsForsDisk8Completer ¡Espera hasta que el bloque de estado del disco 
5 indique que se ha completado La operación, 
¿_ entonces comprobación de ocurrencia de errores 
¿En entrada, HL -> byte de control de disco 
¿Asegurar borrado del indicador de suspensión 





Figura 9-5, Procesador de errores de disco de ayuda al usuario. 
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voré 320000 STA DisKatangsFlas 
vo19 212100 LIT HDI M8TImeasout ¿Activar temporizador centinela 
cole dlsso2 LE BiDisks Timer ¿Actardo de Elena 
SalF Co3sos CALL Setaiatendso 
DiskaiasLbLoop+ 
022 7 ma ¿obtención byte de control 
022 87 7 4 
esa Charo 0 Distscomptete ¿operación realizada 
027 2a0c00 LOA DEskatanasra comprobación de tiemso excedido 
cuan 87 RRA 
029 C29roz SNE Diststrror ¿se fijará a 400 
028 caz200 AP DiskaMastóLooo 
DIskeTimeSsout ¿La rutina de temporizador centinela dewuelye el 
¿Peomtrol areste punto == por tanto, esto forna parte 
Pirata de servicio de imterrunción 
0031 2eao mur aros ¿Fijar <dalgo de error e suspensión 
0033 320000 da Ditestanosras Paco en et máfcador de error 
7, para control fuera del bucle 
036 cs her netormo"a Futina de temporizador centinela 
Diskscompletes 
037 010000 ao ¿Puesta a cero temporizador centinela 
nl irrelevante 
09n como CALL Setmiatendos 
4200 LOA DrsK8Statussbrock ¿completar -- comprobación de estado 
dono Eeso O] ¿conorcbación de ocurrenera de errores 
0042 Da9roZ So Dimserror s 
DiskeErrorslgnore: d | 
"e A ¿No 
Gosé Szosoo A Diststrrorr IBorrado de indicador de error 
009 07 ser : 
, 
, hanejo de mensajes de error del disco 
: 
Disiaerrorames le examina esta tabla comprobando el estado 
de error del disco con los de la tabla. Cuando 
7 May comeidenctas o se ha alcanzado 
ECO eine de la taolar La arrección 
7 Sue sigue nl valor del estado apunta 
7 SU sexto del mensaje de “aviso Correcto. 
7 Inmediatamente después está la Olreceión de un 
mensaje de descripción del error» 
0084 40 Ds ao 
0048 80019500 Di Diersnavicel,Disktre9s9o 
E De 
0050 C3o19a00 DN DisksRdvice2,Diskem 
c05s 82 De 
0055 Esoraoo DN DERK8Advice2,Diskero 
ca E 
S05A dJozea0o Du Disesnavices,Diskereoszl 
005 22 EE 
003% 18028900 Di DIssAdViceSiDiskaMr9s22 
008 23 ES 
0064 1B02c000 De DIeLAdViceSDisiars982o 
0088 24 E 
0069 30020200 DN DISK8AdviceS,Diskatosza 
0068 25 ES 
ose 3pozocoo DN DISESAdViCES,Dirkimigs2S 
00 Ds A 
073 S302r100 Di DENsRdvice7,Diskeros11 
EURO Ds ia 
cora SSo2rro0 De Dia rsndvice7,Diskam9s12 
core 13 Dian 
6075 Soz0co1 DN DISK8AdVice7,DisKMgs13 
GRO De AN 
0082 53021401 DN Disksdvice7,Diskamosta 
c08s 13 De SN 
0087 53022901 ES 





Disk8Advice7,Disk8Ms9815 | 


Figura 9-5... (Continuación.) 
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16 DE 16m 
53023501 Du Disk8Advice7,Disk8Me9816. ] 
00 De o 1 €= Terminal 


53024501 DH DisksAdvice7, DiskSMsgsUnknoun — ¿Código sin coincidencia 


, 
DEMSENtry8Size EQU Ss ¡Entrar tamaño en tabla de mensaje de error 


Message texts 





“Data”0 
¿Format”,0 

“Missing Data Mark”,0 
“Bus Tímeout”,0. 
“Controller Timeout”,0 





“Track Address”,0 
“Sector Addres1",0 
“Bus Address",0 

“Tllegal Command”, 0 
SSSESBSESFDI sk 8ME98UNknown: Da “Unknown”; 0 





1 
DiskeEnes: ¿Mensaje de error disco principal —- parte 1 
BELL, CR, LE 
Disk 0 





¿Siguiente salida texto de error 





Diskeenezs Mensaje de error dísco principal —= parte 2 
204572726F 
9000 DisksEMeStatus: 


290D0A2020 
0 Disk8EMSDr ¿ves 
2020486561 

00 


2020547261 
0000 DisksEMSTracks ¿Núsero de pista 
2020536563 Sector > 

9000 DiskeEneSectors ¿Número de sector 
2C204F7065 z 

00 





¿Código de estado hexadecimal 
¿ORALES rave > 
¡Código de unidad de disco A/B... 


Disk8EMMead: ¿Número de cabeza 





¿Terminal 


526561642ED1 sksEMSRE ac ¿Nombres de operación 


577259746301 sk OEM lt 





, 
ODOA202020D1 sk8Adviceor 20 

A3ESESGIGBDA SkBAdvice 11 “Check disk loaded, Retry",0 
SO4F737369D1 sktAdv 1ce2i “Possible hardware problem”,0 
577269746501 sk 9Adv ice: Ask, Retry",0 
3526574727901 sk8Adviceá3 

5265666F72D1 skBAdviceS: 
406172647701 5k8Adviceó1 
AR61726477D15k8Advice7: 


sk or use another disk",0 
larduare error, Retry",0 
“Harduare or Software error, Retry".0 





; 
20206F7220D4 sk8Advice9: “, or call for help 41 error per 





stsCR,LE 





1 
Disk8Action8Conf Ar: 
o ¿Fijado a carácter entrado por el usuario 


De CR.LE, O 


00 





Procesador de errores de disco 
Esta rutina construye y Lanza un mensaje de error. 

Se plantea entonces al usuario La oportunidad de elegir entre: 
Intentar de nuevo la operación que ha causado el error 


Ignorar el error e intentar La continuación 
Abortar el programa y retornar a CP/M 





, 
, 
, 
, 
A 
Di 


Ask8Errora 
PUSH ¿Preservar código de error desde controlador 





Figura 9-5. (Continuación.) 
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240700 IN8BUtfersDisk ¿Conversión de identificador de disco para mensaje 


css zar oposición de La Letra correspondiente 
326E01 DISKSEMSDr ive 


3A0200 FloppytHead ¿Conversión del número de cabeza 
cé3o 207 


327601 Disk SEMSHead 


340300 Floppy8Track ¿Conversión del núnero de pista 
217501 H, DISK GEMA Track 
Cb3BO3 Can 


3A0400 Floppy$Sector ¿Conversión del núnero de sector 
218A01 M,DIskSEmbSector 
C03Bo3 can 


214001 H.DisKsEmes ¡Salida de La primera parte del mensaje 
Cnapoa DUAAULIErTOr Me 


Fr PoR PS ¿Recuperación código de mensaje de error 
47 MOV BA ¿Para comparaciones 
214500 LX HiDiskSErroriMessas 


110500. EXI D,DEMSENtry8Size ¿Obtención de tamaño de La entrada para bucle 
7 posterior 
Disk8ErrorsNextsCodes 
DAD DO ¿Movimiento a La siguiente (o primera) entrada 


moy AM ¡Obtención núnero de código de La tabla 
orRa— A omprobación de final de tabla 

y DisksErrorsMatched 4, coincidencia 

meooB 'omparar a código real 

3 DisksErrorsMatched 1, salida del bucle 

2MP O DisksErrorsNextaCode — ¿Comprobación código siguiente 


, 
Disk8ErrorsMatcheds 
Tux ¿ML => dirección mensaje de aviso 
mov 
1Nx 
moy 
PUSH 


¿DE -> test de aviso 
YALmacenar para utilización posterior 
1ux 
mov 
1NX 
moy DAM 


¿HL -> dirección de texto mensaje 
¿Obtención de La dirección en DE 


xcHo IL > texto 
CALL OutputsErroróMessage isualización texto explicativo 


LX Hi DisksEmez ¿Visualización segunda parte del mensaje 
CALL OUtputsErroreme: 


219801 EXI H,DisksEMBRead ¿Elección operación de texto 
¿_ (suposición de Lectura) 
3AD100 LOA FlopRySCommand ¿Obtención orden de controlador 
FEOL CPI, FlobpySReadéCode 
CA0403 wa Disk8ErrortRead El 
ENS EXI Mi DISKSEMSMrAte ¿No, cambio de dirección en HL 
DisksErroriRead: 


co3B03 CALL OutputsErrorsMessage — ¡Visualización tipo de operación 


218801 LXI M.DisksAdviceo +Visualización blancos encabezamiento 
coaroS CALL OutputsErrorame: 


E A] +Recuperación apuntador a texto 
co3803 CALL OutputsErrorsMessage 


217502 LXI M-DisksAdvices 


isuaLización segunda componente 
cn3mO3 CALL OUtputsErrorsMe id 'ón segunda components 





Figura 9-5, (Continuación.) 

























0317 


031A 
031c 
OF 
0321 
0324 
0326 


0320 
0327 
0330 
0333 

















0336 
0338 


0338 
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co3gos 


Fes2 
cA2coS 
FEA 

CA3603 
FEa9 

CAasoo 
c31703 


30500 
27 

c21500 
c30800 


0E00 
cD0S00 


co 





DiskSErrorSRequestsAction: 


'regunta usuario acción siguiente 


¿Visualización de indicación y espera 








CALL RequestsUsersChoice 
7 para entrar retorno con A = carácter 
7 en mayúscula 
Cer as FiNuevo intento? 
Je DisksErrorsRetry 
A ¿Abortar 
3 SystemReset 
er ¿Ignorar 
3 DisksErrorslgnor: 
TP DARK 8ErrOrSRequesteaction 
ñ 
DIsksErrorMRetrys La decisión de dónde volver depende de 
si La operación fallida ha 
ocurrido en una unidad desbloqueada 
0 no desbloqueada 
LOA DeblockingsRequired 
RA A 
ÚNZ DeblocksRetry 
MP NeseblocksRetry 
SystentReseti ¡Esto es una decisión radical, pero 
7 causa el reinicio de CP/M 
mr co ¿Reinicialización del sistena 
CALL BDOS 


: Las subrutinas omitidas están completas en La figura 8-10 


Setsiatendog: 


¿Fijar temporizador centinela (al número de pulsos en BC y para 





Cama he 


transferir control a (HL) cuando el temporizador alcanza el cero) 
:onuersión de A a dos caracteres hexadectmales ASCIL, almacenando 
La salida en (ML) y (Le 





OutputsError ses: 





¿Visualización del mensaje de error terminado por byte 004 


“apuntado por ML, El mensaje se dirige 
3 a las consolas Que no se están usando 
7 Además COÑO Impresoras. 








RequestsUserscnosces — ¿visualizar inidicación * y devolución 
3 de un único carácter en La discuta) en A 
rer hrieticio á 


Figura 9-5. (Continuación.) 














Técnicas básicas de depuración 
Subrutinas de depuración 
Herramientas software para 
depuración 
Puesta en marcha del CP/M 
por primera vez 
Depuración del cargador 
del CP/M 
Depuración del BIOS 
Comprobación en vivo de 
un nuevo BIOS 




















Comprobación detenida 
de un nuevo BIOS 








Este capítulo se enfrenta con algunos de los problemas que se presenta- 
rán al montar el CP/M en una computadora por primera vez o al mejorarlo 
una vez montado y funcionando en ella. 

En el primer caso, cuando el CP/M aún no funciona en la computadora, 
puede escribirse uno mismo el BIOS completo, utilizando como modelo el 
BIOS ejemplo que se suministra en el disquete del CP/M y el código de 
ejemplo del capitulo 6. 

En el segundo caso se puede ampliar el BIOS existente añadiendo nuevo 
código —de los ejemplos de los capítulos 8 y 9, programas obtenidos en 
revistas de informática o creados por uno mismo—. Para hacer esto se 
necesitará tener acceso al código fuente del BIOS —existe un problema, si 
los fabricantes de la computadora no lo dejan disponible—. En general, sin 
embargo, el código fuente del BIOS está incluido en el sistema o puede 
obtenerse a un coste nominal o sin él. Si no se puede obtener el código 
fuente, se puede, ciertamente, tomar el toro por los cuernos y reimplemen- 
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tar el CP/M en el propio sistema. Esto puede requerir muchas horas 
desensamblamiento del código máquina del BIOS actual para encontrar 
forma de acceder a todos los puertos diferentes y cómo controlar 

dispositivos a los que están conectados. 

Aunque el BIOS es el componente más importante de una m 
implementación del CP/M, recuérdese que sólo es el comienzo —se pl 
utilizar la misma cantidad de tiempo y esfuerzo obteniendo el cargador 
todas las utilidades. 





Técnicas básicas de depuración ] 





Antes de sumergirnos en los detalles de cómo se depura una implemen- 
tación del CP/M es útil considerar la naturaleza de la tarea. Se imponen 
aquí algunas observaciones: 


“La comprobación de programas puede utilizarse para mostrar la 
presencia de errores, pero nunca para mostrar su ausencia.” —Dijkstra 


“Los llamamos insectos (bugs, y de aquí debugging) porque llamarlos 
errores sería psicológicamente inaceptable.” —Hopkins 


“Las constantes no están, las variables no estarán.” —Osborne 


Depuración es el nombre que damos al proceso de ejecutar programas y 
cerciorarse de que los programas funcionan correctamente. ““Correctamen- 
te” significa de acuerdo con el modelo mental que hemos construido o 
cómo el programa debe comportarse, sujeto a las ligaduras impuestas porel 
hardware. Aquí reside uno de los principales problemas; el operador y el 
hardware son los árbitros del rendimiento correcto. El hardware es 
generalmente implacable si hay un defecto en la forma en que se ha 
programado, lo mismo se hace exageradamente “no cooperativo” que no 
trabaja en absoluto. Por lo que respecta a la forma en que se ve el sistema, 
algunos controles muy sencillos, junto con intentos de utilizar el sistema 
para trabajos útiles durante unos días, harán que se domine el sistema 
bastante bien. Los problemas más difíciles serán los fallos intermitentes o 
las contradicciones lógicas. 

Las computadoras son determinísticas. Es decir, si se empieza desde un 
estado conocido y se realiza una serie de operaciones conocidas, la 
computadora alcanzará siempre los mismos resultados. Alcanzar un estado 
conocido no es tan difícil —la puesta a cero del sistema y el borrado de la 
memoria lo harán—. Realizar una serie de operaciones conocidas no signifi- 
ca nada más que dejar correr otra vez el programa, aunque, si se están 
usando interrupciones, no se puede decir realmente que están siendo 
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realizadas exactamente las mismas operaciones, porque las interrupciones 
no ocurrirán exactamente al mismo tiempo que antes. 





La aproximación “Orville Wright” 

El papel del técnico al depurar un nuevo sistema CP/M es comparable a 
la popular, aunque falsa idea, de la forma en que los hermanos Wright 
desarrollaron sus máquinas voladoras: construir una máquina, llevarla a la 
cima de una colina, lanzarla y, cuando se rompe, examinar los restos para 
descubrir lo que estaba equivocado. 

Cada vez que se realiza un ensamblaje y se comprueba, se está 
construyendo el avión y se le está echando a volar al borde de un 
acantilado. Cada vez que se estrella, se examina la chatarra y se intenta 
determinar la posible causa. 

Este es un proceso muy inferencial. Con la chatarra como punto de 
partida, se utiliza la inferencia y la intuición para extrapolar el problema 
real y su corrección. 


Programa de depuración interno 


El concepto más importante que se puede necesitar al probar los 
sistemas CP/M es el mismo que se usa actualmente en las grabadoras de 
vuelo de las “cajas negras”. Este mecanismo es esencialmente una grabado- 
ra de cinta de varios canales que graba todo de las condiciones relevantes 
del avión, su altura, altitud, agitación, etc., incluso las comunicaciones 
verbales entre los miembros de la tripulación. Si el aeroplano se estrella, los 
investigadores pueden reproducir la información y entender lo que ocurrió 
durante el vuelo. 

Aplicando este concepto a la depuración del CP/M, significa que se debe 
construir en el programa algún método para grabar lo que está haciendo, de 
forma que si el sistema se estropea se pueda ver lo que estaba haciendo. Se 
puede lograr que el programa informe de lo que estaba equivocado. 

El programa de depuración debería diseñarse al mismo tiempo que el 
resto del programa. Hay que planificar el programa de depuración cuando 
el diseño está aún en “sucio”. El código fuente para la depuración deberia 
ser una parte permanente del BIOS. Utilicese ensamblaje condicional con 
un “IF” de la mayor parte del programa de depuración para eliminarlo de 
la versión final, o hacer el programa sensible a un indicador en el bloque de 
configuración de forma que se pueda volver a hacer utilizable el programa 
de depuración en el momento de advertir que el sistema empieza a 
comportarse de forma extraña. 

Cuanto más significativos son los datos de salida de la depuración, 
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menos habrá que adivinar qué es lo equivocado y, por consiguiente, el 
proceso será menos penoso y largo. La salida debe hacerse inteligible para 
otros que puedan usarla o para uno mismo al cabo de varios meses. Los 
datos que indican lo que está ocurriendo son más útiles que los valores 
hexadecimales internos, particularmente si alguien más ha de interpretarlos 
o transmitirlos telefónicamente. 





Subrutinas de depuración ] 





Filosofía general de diseño 











Muchos programadores realizan su depuración sobre una base de “coge 
lo que puedas coger”, porque están sobrecargados de trabajo por la tarea de 
construir las herramientas necesarias. Otros son demasiado impacientes 
para poner en marcha un nuevo programa que les lleve unas cuantas horas 
o días para construir subrutinas de depuración. 

Para ayudar a resolver este problema, la sección siguiente proporciona 
algunas herramientas prefabricadas que pueden utilizarse “tal cual”. Cada 
una de estas rutinas se han depurado totalmente (¡no hay nada peor que un. 
programa de desinsectación con insectos en él! —traducción literal—) y han 
sido utilizadas en la depuración de programas reales. 


Algunos métodos corrientes se muestran en los ejemplos que siguen. 
Estos incluyen la composición de “títulos” significativos (incluyendo la 
dirección especifica que llamó la rutina de depuración), agrupando todos 
los programas de depuración, preservando los contenidos de todos los 
registros y preparando el área de pila de forma estándar. 


Títulos del programa de depuración Cuando los contenidos de los registros o 
la memoria se envían como parte de un proceso de depuración, deberá 
componerse un título de texto explicativo describiendo los valores. Por 
ejemplo, mejor que visualizar el contenido del registro A como sigue, 


A=1F 
se puede usar un título significativo tal como: 


Transaction Code A = 1F. 





Cuando se escribe un programa de depuración adicional, especialmente 
si se necesita añadirlo a una rutina existente, es incómodo tener que escribir 
la llamada a la rutina de depuración y buscar después a través del código 
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fuente para encontrar un lugar conveniente donde poner una hilera de título 
ASCII. Una hilera de título trasladada algunas páginas desde el punto en 
que está relacionada crea problemas cuando se quiere relacionar la salida 
en la pantalla o por impresora con el propio código fuente. Por consiguien- 
te, todas las rutinas que siguen permiten declarar las hileras de títulos “en- 
linea” como la siguiente: 


1F DEBUG 

CALL DebugSRoutine 

DB "Caption string here',CR,LF,0 

ENDIF 

MUI ¿Instrucción siguiente 


Todas las rutinas siguientes que envían un título reconocen un valor 
especifico de 8 bits en la cadena del título. Si encuentran un valor VADH 
(nemónico por ADdress), enviarán la dirección del byte que sigue a la 
llamada a la rutina de depuración. Por ejemplo, 


0210 CALL DebugSRoutine 
0213 DB OADH, "Caption string',0 


ocasionará que la rutina lance el siguiente mensaje: 
0213 Caption string 
Esto identifica el punto del programa desde el que se ha llamado a la 


rutina de depuración, y evita así cualquier posible ambigiledad entre 
llamadas distintas a la misma rutina con títulos similares. 


Agrupación del programa de depuración La agrupación de todo el programa 


de depuración conduce al uso de un ensamblaje condicional con senten- 
cias IF/ENDIF. 


Fijación del área de pila Todas las rutinas que siguen preservan los registros de la 


CPU, de forma que no existen efectos secundarios cuando se usan. Todas 
ellas suponen que pueden utilizar el apuntador de pila y que hay suficiente 
sitio en esta área. Por tanto, se necesitará declarar el espacio de pila 
adecuado para el código principal y para las rutinas de depuración. Hay que 
llenar el área de pila con una configuración conocida, como la siguiente: 


DW 9999H,9999H,9999H,9999H,9999H ,9999H ,9999H,9999H 
DW 9999H,9999H,9999H,9999H ,9999H ,9999H ,9999H,9999H 
DW 9999H,9999H,9999H,9999H ,9999H ,9999H ,9999H,9999H 
StackSArea: ¿Etiqueta borde superior del “área 
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Entonces, durante la depuración, se puede examinar el área de pila 
determinar cuánta queda sin utilizar. Por ejemplo, si se mirase el área de 
pila se vería algo así como: 


Indicador de "nivel" 
v 


99 99 99 99 99 99 09 15 43 42 
10 FF FF 39 02 ED 11 01 37 44 
31 00 41 AE FE 00 01 10 70 C9 


2 
23 

Cuando se supera el área de pila pueden obtenerse errores misteriosos; el 
programa parece que salta en el espacio de forma no determinística. Al 


crear el área de pila de esta manera, se puede reconocer un desbordamiento. 
fácilmente. 





lización de la depuración Antes de que se pueda ejecutar cualquiera de las 
subrutinas de depuración mencionadas en este capítulo, deberá hacerse una 
llamada a la subrutina de inicialización, DBSInit. La rutina DBSInit fija 
algunas de las variables internas que necesita el paquete de programas de 
depuración. Se puede necesitar añadir aquí algún trozo de programa para la 
propia inicialización. 











Salida de la consola 


Normalmente, se pueden utilizar las funciones CONOUT, tanto me- 
diante el BDOS (función 2) como por medio del BIOS, llamando directa- 
mente al vector de saltos. Esto no puede hacerse cuando se necesite depurar 
las propias rutinas de consola, ni cuando se necesite depurar rutinas de 
interrupción. En el último caso, si una interrupción transfiere el control 
fuera de la rutina CONOUT en el BIOS, se tendrán reentradas no deseadas 
si el programa de depuración volvió a introducir el controlador de 
CONOUT para componer un título. Por consiguiente, las rutinas de 
depuración se han escrito para llamar su propia rutina CONOUT local, que 
se denomina DBSCONOUT. DBS$CONOUT puede cambiarse para llamar 
al BDOS, al BIOS o a una rutina de salida “particular”. 

Se proporciona la rutina correspondiente DB$CONIN para entrada de 
consola, esencialmente por los mismos motivos. 












Control de salida de depuración 


Todas las salidas de las rutinas de depuración trabadas en este capitulo 
están controladas por un único indicador maestro, DBS$Flag. Si es distinto 
de cero, se realizará la salida: si es cero, se suprimen todas las salidas. 

Este indicador puede fijarse y borrarse desde cualquier parte del 
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programa que se está comprobando. Es especialmente útil cuando se 
necesita depurar una subrutina que es llamada muchas veces desde muchos 
sitios diferentes. Se pueden escribir trozos de programa adicionales para 
permitir la salida cuando se den ciertas condiciones; por ejemplo, cuando 
una pista o sector particular está a punto de ser escrito o cuando una 
memoria de entrada de caracteres está casi llena. 

Las rutinas DB$On y DBSOfT acceden al indicador de control menciona- 
do y conectan y desconectan la salida, como su nombre sugiere. 

La conexión y desconexión de la salida desde el interior del programa 
puede crear una imagen confusa de la salida de la depuración, debido a la 
falta de continuidad aparente. BD$Off da la opción de enviar una cadena de 
caracteres para indicar que la salida ha sido desconectada. 


Contadores de pasos 


Otro método de controlar la salida de la depuración es utilizar un 
contador de pasos que permita la salida sólo después de que el control haya 
pasado un número específico de veces a través de un punto particular del 
programa. 

Se han previsto dos subrutinas para este propósito: DB$Set$Pass pone el 
contador de pasos en un valor especifico. DB$Pass decrementa esta cuenta 
de pasos cada vez que se le transfiere el control. Cuando el contador de 
pasos marca cero, el indicador de control DBSFlag no es cero y comienza 
la salida. 

Utilizando las técnicas de contador de pasos se puede ahorrar tiempo y 
esfuerzo al seguir la pista a un problema que ocurre únicamente después de 
que el programa ha estado funcionando durante algunos minutos. 


Visualización de contenidos de registros y memoria 


La figura 10-2 muestra una serie de subrutinas de visualización, la 
primera de las cuales es DBSDisplay. Utiliza varios parámetros distintos, 
dependiendo de la información que se desee visualizar. La llamada genérica 
al DBSDisplay es la siguiente: 


CALL DBSDisplay 

DB Code <- Indicada datos a 
visualizar 

Low Optional additional parameters) 

DB "Caption string',0 


Los distintos códigos que pueden utilizarse en esta llamada se muestran en 
la tabla 10-1. 








348 — CP/M Manual para programadores 


Tabla 10-1. Códigos para DBSDisplay. 
















Código Valor visualizado 





Registros de 8 bits 


DBSF Indicadores de condición 

















DBSA Registro A 

DBSB Registro B 

DBSC Registro C 

DBSD Registro D 

DBSE Registro E 

DBSH Registro H 

DBSL Registro L 

Memoria 
Los bytes empiezan y acaban en las i 

DBSMemory direcciones especificadas por los valores 


de dos palabras que siguen a la llamada 





Registros de 16 bits 





DBSBC Registro par BC 
DBSDE Registro par DE 
DBSHL Registro par HL 
DBsSP Indicador de pista 





Valores de bytes 





DBSBSBC Byte direccionado por BC 
DBSBSDE Byte direccionado por DE 
DBSBSHL Byte direccionado por HL 





Valores de palabras 








DBSWSBC Palabra direccionada por BC 
DBSWSDE Palabra direccionada por DE 
DBSWSHL Palabra direccionada por HL 
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La única función que utiliza parámetros adicionales es la DB$Memory. 
Esta permite la visualización de bytes de memoria en hexadecimal y ASCII, 
utilizando las direcciones de comienzo y final que siguen a la llamada, como 
se muestra en el ejemplo: 


CALL DBSDisplay 

DB DBSMemor y 

DW StartSAddress EndSAddress 
DB "Caption string',0 


Depuración de la lógica del programa 


Además de visualizar los contenidos de los registros y de la memoria, se 
necesita tener acceso visual a los caminos de ejecución del programa, no en 
términos de direcciones, sino en términos de problema. Se puede hacer esto 
lanzando mensajes que indiquen las decisiones que se han tomado en el 
programa que se está ejecutando. Por ejemplo, si el BIOS controla un valor 
particular para ver si el sistema lee o escribe en un dispositivo particular, la 
rutina de depuración deberá componer un mensaje como éste: 


Entering Disk Read Routine 


Esto es más significativo que visualizar exclusivamente el código de función 
de los controladores —aunque pueda desearse componer éste igualmente en 
el caso de que se haya puesto a algún valor extraño. 

Se suministran dos rutinas para componer mensajes de depuración. 
Estas son DBSMSG y DB$MSGI. Ambas componen cadenas de texto 
terminadas por un byte 00H. Se puede ver la diferencia entre dos subrutinas 
si se examina la forma de llamada para cada una de ellas. 

DB$MSG se llama como sigue: 


LXI  H_MessageSText ¿HL -> cadena de texto 
CALL DBSMSG 


DB$MSGI se llama como sigue: 


CALL DBSMSG 
DB ODH,OAH,'Message Text',0 :En-Linea 


Resulta más conveniente el uso DB$MSGLI. Si se decide que se necesita 
añadir un mensaje, se puede declarar el mensaje siguiendo inmediatamente 
a la llamada. Esto ayuda también cuando se mira el listado, porque se 
puede ver el texto completo de una ojeada. 

Utilícese DBSMSG cuando el texto del mensaje necesite ser seleccionado 
de una tabla. Obténgase la dirección del texto en HL y llámese entonces al 
DBS$MSG para lanzarlo. 
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Creación de mensajes visuales propios 


Si se necesita construir rutinas de visualización especiales propias, pl 
resultar de ayuda el incorporar algunas de las pequeñas subrutinas 
paquete de programas de depuración. Las rutinas que puede di 
utilizar son las siguientes: 


DB$CONOUT 
Visualiza el carácter que está en el registro C. 


DB$CONIN 
Devuelve el próximo carácter del teclado en A. 
DB$CONINU 
Devuelve el próximo carácter del teclado en A, convirtiendo las 
letras minúsculas en mayúsculas. 


DBSDHLH 
Visualiza el contenido de HL en hexadecimal. 


DB$DAH 
Visualiza el contenido de A en hexadecimal. 

DB$CAH 
Convierte el contenido de A en hexadecimal y lo almacena en la 
memoria apuntada por HL. 

DB8Nibble$To$Hex 
Convierte los cuatro bits menos significativos de A en un carácter 
hexadecimal en A. 


DBSCRLF 
Visualiza un CARRIAGE RETURN/LINE FEED. 


DB$Colon 
Visualiza la cadena “ : ”. 


DB$Blank 
Compone un carácter de un solo espacio. 
DB8Flag$Save$On 
Guarda el estado actual del indicador de control de salida del 
depurador y entonces lo activa con el fin de permitir la salida. 
DB$FlagSRestore 
Vuelve a situar el indicador de control en el estado en que se 
encontraba cuando se llamó la última vez la rutina DBSFlag8Sa- 
veSOn. 
DB$GHV 
Obtiene un valor hexadecimal del teclado, lanzando antes un 
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mensaje de aviso. Pueden ser especificados de uno a cuatro caracte- 
res como número máximo de caracteres a introducir. 


DB$AS$T0$ Upper 
Si el registro A contiene una letra minúscula, la convierte en 
mayúscula. 


Depuración de los controladores de entrada/salida 


La depuración de los controladores de dispositivos de bajo nivel crea 
problemas especiales. El mayor de ellos es que normalmente no se desea 
leer y escribir por medio de los puertos hardware verdaderos mientras se 
está depurando el programa —tanto porque el hacerlo causaría la aparición 
de cosas extrañas en el hardware durante la depuración como porque se 
están desarrollando y depurando los controladores en un sistema diferente 
de la tarjeta hardware en la que los controladores tienen que trabajar. 

Antes de tratar la solución, recuérdese que las instrucciones de entrada y 
salida (IN y OUT) tienen cada una dos bytes de longitud. El primer byte es 
el código de operación (ODBH para entrada, 0D3H para salida) y el 
segundo es el número de puerto para “entrar de” o “salir a”. 

Las subrutinas de los programas de depuración están previstas aquí para 
interceptar todas las instrucciones IN y OUT, visualizando el número de 
puerto y bien aceptando un valor hexadecimal de la consola y poniéndolo 
en el registro A (en el caso de IN) o bien visualizando los contenidos del 
registro A (para la instrucción OUT). 

Las instrucciones IN y OUT pueden ser “atrapadas” cambiando el 
código de operación por una o dos instrucciones RST (nueva puesta en 
marcha). Un RST es efectivamente una instrucción CALL de un solo byte, 
llamando a una dirección previamente determinada en la memoria inferior. 
Las rutinas de depuración preparan a las instrucciones JMP de la memoria 
inferior para que reciban el control cuando se ejecuta un RST correcto. El 
programa que recibe el control puede elegir el número de puerto, visualizar- 
lo y aceptar entonces un valor hexadecimal para el registro A (para IN) o 
visualizar los contenidos actuales del registro A (para OUT). Las subrutinas 
del ejemplo que se muestran más adelante en este capítulo utilizan RST 4 en 
lugar de instrucciones IN, y RST 5 para OUT. 

Siempre que se plantee usar IN, habrá de utilizarse el programa 
siguiente: 


1F Debug 

RST 4 

ENDIF 

1F NOT Debug 
DB IN 

ENDIF 


DB Port$Number 
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Depuración de rutinas del servicio de interrupciones 





















Obsérvese que se puede utilizar el código de operación IN como opet 
de una especificación DB. El ensamblador sustituye al código de operaci 
correcto. 

Utilicese el programa siguiente siempre que se necesite usar 
instrucción OUT: 


1F Debug 

RST 5 

ENDIF 

IF NOT Debug 
Da OUT 

ENDIF 

DB PortSNumber 


Cuando se ejecuta la instrucción RST 4 (IN), la subrutina de depuración 
visualiza 


1483: Input from Port 01 : _ 


El “1AB3” es la dirección en memoria del byte que contiene el número de 
puerto. Sirve para apuntar exactamente la instrucción IN en memoria. Se 
puede introducir entonces uno o dos dígitos hexadecimales, que serán 
convertidos y se pondrán en el registro A antes de que el control vuelva al 
programa principal a la instrucción siguiente al byte que contiene el número 
de puerto. 

Cuando la instrucción RST 5 (OUT) se encuentra, la subrutina de 
depuración visualiza 


1AB5 : Output to Port 01 : FF 


Esto identifica dónde estaría normalmente la instrucción OUT, así comoel 
número de puerto y los contenidos del registro A cuando el RST 5 (OUT) ee 
ejecuta. 


Puede utilizarse una técnica similar a la que describía en la instrucción 
RST para “falsear” una interrupción. Se fija previamente la dirección de la 
memoria inferior para la instrucción RST que se ha elegido para el salto en 
la rutina de servicio de interrupción que se está comprobando. 

Cuando se ejecuta la instrucción RST, el control se transfiere a la rutina 
de servicio de interrupción exactamente como si hubiera ocurrido una 
interrupción. Sin duda se necesitará interceptar cualquier instrucción IN o 
OUT como se ha descrito anteriormente —de otra forma el programa iría 
probablemente a un bucle sin fin. 
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Antes de ejecutar la instrucción RST para falsear la interrupción, hay 
que cargar todos los registros con valores conocidos. Por ejemplo: 


MI ALOAAH 

LXI B,0BBCCH 

1x1 D,ODDEEH 

1637 H,01122H 

RST 6 ¡Simulación de interrupción 
nop. 


Cuando el control vuelve de la rutina de servicio, puede comprobarse si han 
realmacenado en todos los registros los valores correspondientes. Una 
rutina de servicio de interrupción que no restaure todos los registros puede 
producir perturbaciones muy difíciles de encontrar. 

Compruébese también que el registro apuntador de pila ha sido 
almacenado de nuevo y que la rutina de servicio no requiere demasiados 
bytes de la pila. 

Se puede usar también la instrucción CALL para transferir el control a 
la rutina de servicio de interrupción para falsear una interrupción. RST y 
CALL consiguen el mismo efecto, pero RST está más cerca de lo que ocurre 
cuando se realiza una interrupción real. Como es una instrucción de un solo 
byte, también es más fácil de modificar. 


Listados de subrutinas 


La figura 10-1 es un índice funcional del listado del código fuente de las 
subrutinas de depuración que se muestran en la figura 10-2. Los comenta- 
rios del listado definen precisamente cómo se hace una llamada a cada una 
de las subrutinas. 

La figura 10-3 muestra la salida desde el banco de prueba de depu- 
ración. 





Herramientas software para depuración 








Además de la incorporación de subrutinas de depuración, puede 
necesitarse uno de los programas de depuración de programas particulares 
siguientes: 


DDT (Herramienta dinámica de depuración) 
Este programa, incluido en la edición estándar de CP/M, permite 
cargar programas, fijar y visualizar la memoria y los registros, 
rastrear el programa instrucción por instrucción o ejecutarlo a 
velocidad máxima, pero deteniéndose en ciertas direcciones (deno- 
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r Línea de arranque 


00001 
00100 
00200 
00300 
100400 
00500 
00600 
00700 
00800 
01100 
01200 
01300 
01400 
01500 
01600 
01700 
01800 
01900 
02200 
02500 
02600 
02700 
02800 
02900 
02930 
02938 
02946 
03100 
03147 
03300 
03500 
03700 
03800 





03900 
04100 


Figura 10-1. Indice funcional para la figura 10-2. 


Componente funcional o rutinas 







































Base de control de subrutina de depuración 
Composición de registro de control 
Composición de descarga control de memoria 
Composición para control de registro 
Composición indirecta del byte de control 
Control DBSOn/OfF 
Control DBSSetSPass y DBSPass 
Entrada/salida control de desinsectación 
Subrutinas de desinsectación 
Inicialización DBSInit 
DBSCONINU—obtención de caracteres mayúsculos del teclado 
DBSCONIN—obtención de caracteres del teclado 
DBSCONOUT—composición carácter en C 
DBSOn—posibilidad de salida desinsectación 
DBSOf—imposibilidad/no posibilidad salida desinsectación 
DBSSetSPas—fijación contador de pasos 
DBSPass—ejecución contador de pasos 
DBSDisplay —rutina de composición principal de desinsectación 
Subrutinas de proceso de composición principal 
DBSDisplaySCALLA—composición de dirección de CALL 
DBSDHLH —composición HL en hexadecimal 
DBSDAH-——<composición A en hexadecimal 
DBSCAH—<onversión de A en hexadecimal en memoria 
inversión de 4 bits LS de A en hexadecimal 
1 Carriage Return, Line Feed 
DBSColon—composición 
DBSBlank composición 
DBSMSGI composición mensaje en línea 
DBSMSG—composición mensaje dirigido por HL 
DBSInput—desinsectación rutina INput 
DBSOutput—desinsectación rutina OUTput 
DBSFlagSSaveSOn—salvación de superficie y posibilidad de desinsectación 
DBSFlagSRestore—nuevo almacenamiento de la superficie de control 

de desinsectaci 
DBSGHV—obtención de valor hexadecimal del teclado 
DBSASTOSUpper—conversión de A en caja mayúscula 

















minadas puntos de interrupción). Posee también un miniensambla- 
dor y un desensamblador incorporados de forma que no haya que 
ensamblar ninguno de los “añadidos” temporales que se hagan. 


SID (Depuración simbólica interactiva) 


De forma similar al DDT, el SID posee mejoras que son de ayuda si 
se utilizan MAC (macroensamblador) o RMAC (macroensamblador 
reubicado) de Digital Research. Ambos ensambladores pueden 

















00019 0100 


000210100 316BO3 
00022. 103 CDEAOA 
00023 O1OS CDI5OS 


00023 0109 3ERA 
00026 OLOB DICCEI 
00027 O1OE 11EEDI 
00028 — OLLA 2114FF 





00103 0114 B7 
00104 0115 37 

00L0S 0116 CDS205 
00L0s 0119 00 

00107 — OLIA AS6C616773 
00108. p 
00109 0120 CDS205 
dolio 0123.02 

0011 0124 4120526567 
oo1t12 , 
OOLI3 — O12F cos205 
DOLÍA 0132.04, 

OOLIS 0133 4220526567 
oo116 , 
GOlI7 013€ COS2OS 
oOLI8— O1AL OS 

GOLI9 0142 4320526567 
00120 , 
DOLZ1  014D COS2OS 
00122 0150 08 

00123 0131 4420526567 
00124 , 
00123 OIC COSZOS 
00126 — OISF on 

DO127 0160 4520526567 





Do128 , 
00129 0168 COSZOS 
00130 O16E OC 

OOL31 O1SF a820526567 
00132 , 


00133 O17A COS2OS 
00134 017D OE 
DOL3S  017E 4C2OS26567. 


00200 1. 
00201 , 
00202 

00203 0189 CDS205 

00204 O18C 18 


00205 018D 08012801 
00206 — 0191 ADSS6DSF72 


00208 O1AO COSZOS 
00209 O1A3 18 

DOZIO  OLAA ODOLIFOL 
0OZI1 OLAS ADSDSDSF72 

















NOTA: 


Subrutinas de depuración 
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Los números de Línea que están en el margen izquierdo sirven 
únicamente para referenciar el programa en el texto. 
Existen discontinuidades deliberadas en Los números 


de orden para permitir ampliaciones. 


bebido a La necesidad de comprobar estas rutinas a fondo, 
y en caso de que se prevea realizar cambios, La rutina 







de base-de-comprobación para el paquete de Programa 
de depuración ha sido suprimida de esta figura. 


Depuración de La base de comprobación 


ORG 


ter 
CALL 
CALL 


mu 
Lx 
Du 
pos] 


1004 


SP, TestaStack 
DRSInit 
DESOn 





D; ODDEEM 
MLOFFIIA 





¿Activar pila Local 


inicialización paquete de prog. de dep. 
¿Activación de salida de depuración 
¿Comprobación simple visualización del reg. A 
¿Llenado de Los demás reg. para comprobar 
visualización de La dep. y también para 
5 comprobar el salvar/restituir registros 





Comprobación visualización de registros 


ORA 
ste 
CALL 


De 





CALL 
De 
DB 


CALL 
08 
De 


DReDisplay 
DES 
“Flags".0 


DBSDIsplay 
DBsA 
A Register”,0 











DBSDISplay 
DBsB 
“B Register",0 


DBSDISp Lay 
Desc 
“0 Register 





DESDispLay 
DEsD 
“D Register”,0 


DESDisplay 
DESE 

“E Register”,0 
DBeDI play 
Den 

"H Register",0 
DBSDisplay 
Dee. 


“L Register ”,0 


Puesta a 1 indicadores M y E, a O indicador 2 


¿Fijación acarreo 
¿Llanada a rutina de depuración 


¿Llamada 


¿Llamada 


¿Llamada 


¿Llamada 


¿Llamada 


¿Llamada 


¿Llamada 


a 


rutina de depuración 


rutina de depuración 


rutina de depuración 


rutina de depuración 


rutina de depuración 


rutina de depuración 


rutina de depuración 


Comprobación visualización de volcado de menoría 


CALL 
De 
De 
Da 


CALL 
Da 
De 
De 


Das 
Das 
108, 128 





Asplay 


“Memory Dumo 417,0 





“Memory Dump 42-,0 


Figura 10-2. Subrutinas de depuración. 


¿Volcado de memoria 





“omprobación comienzo/final para no 
5 múltiplos de 104 


¿Volcado de menoria 


¿Comprobación comienzo/final sobre fronteras 


5 de Línea visualizadas 
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cosz05 DBSDisplay 
18 Diem ¿Volcado de memoria 
O1010001 1O1H, 100H -omprobación manejo de errores donde 
ADESEDSF72 “Memory Dump 837,0 ¿ dirección comienzo > dirección final 
' 
coszos DBSDISsplay 
18 De Des ¿Volcado de memoria 
00010001 De 100, 100H ¿Comprobación ÚLtimo-caso de salida 
ADESGDSF72 De “Memory Dump 047,0 de byte simple 
2” 
Comprobación visualización de par de registros 
; 
cos20s CALL DBeDispLay Llamada a rutina de depuración 
10 DB 
243205265 De 
, 
coszos CALL DBsDisplay Lanada a rutina de depuración 
12 De DESDE 
443203265 DB “DE Register”,0 
, 
cos205 CALL DBÑDisplay ¿Llanada a rutina de depuración 
14 De Demi 
ABAC209265 .e "HL Register”,0 
, 
cos205 ¿Llamada a rutína de depuración 
16 
5350205265 
013203 ¡Fijar registros para comprobación de bytes 
113303 
213403 


Comprobación visualización indirecta de byte 


cos208 CALL DBeDisplay ¿Llamada a rutina de depuración 
18 Da DesBsrc 

4279746520 Da Byte at (50 

cos205 CALL DBéDisplay ¿Llamada a rutina de depuración 
10 De DBsBsDE 

4279746520 De “Byte at (DE) 


cos20s ¿Llamada a rutina de depuración 
1E 


4279746520 “Byte at (mos, O 
013503 B,MordsBc ¡Fijar registros para comprob. de palabra 
113703 D;HordsDE 
213909 Ho Hor asmL 


cosas DBRDISplay ¿Llamada a rutina de depuración 
20 De Desmesc 
576726420 De “Mord at (BC) 
cos203 CALL DBsDisplay ¿Llamada a rutina de depuración 
22 De DasHsDE 
S76F726420 Da “Hord at (DE)",0 
cos205. CALL ¿Llanada a rutina de depuración 
24 DB 
S76F726420 Da “Hord at (HL) ",0 

e 

Test DBs0n/011 

, 
co1DoS CALL DBROrt ¡Desactivar salida de depuración 
CoDs07 CALL DBeMSOL ¿Visual izar mensaje en-Linea 
ODOAS4ES6S De ODM, OAM, “This me should NOT appear 


co1s0S CALL DBSON 
C0D807 CALL DBSMSOL 
ODOA446562 De ODM, OAM, “Debug output has been ri 
s. 
Comprobación Lógica contador de pasos 








Figura 10-2. (Continuación.) 





025 
021 
2 


026 


o2r8 
02rB. 
O2FE 
0324 
0325 


0328 


0328 
o32c 
0320 
032€ 


o32F 


0332 
0333 
0334 


0335 
0337 
0339 


0338 
0348 
0358 


2400 


53933883 





00831 





Figura 10-2. 
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co1DOS 
co240s 
1800 


ae22 














co1D0S 
E7 
1 
ER 
22 
c30000 
, 
1 
1 
BC BytesBca 
DE Byte8DE: 
Fr Brien 
A 
0coB MordsBC: 
DEOD MordsDE: 
oL0r hordsHt 
1 
9999999999 
9999999999 
9999999999, 
1 
1 
1 
- DBeBeEC 
- DBeBADE 
- Dee 
- DBsHSBC 
- DBSMSDE 
- DeL 
' 


, 
RsTA 


(Continuación.) 































CALL DBRON ¡Desactivar salida depuración 

CALL DBSSetSP: ¿Fijar contador de pasos 

Du 20 

MI As ¡Fijar contador de bucle mayor que contador 
5 de pasos 

.8Lo0p! 

CALL DBsPass Decrenentar contador de pasos 

CALL DBSMSOL ¿Visualizar mensaje en=Línea 

De ODH,OAM, “This message should display S times",0 

DORA 

UNI TestsPass8Lccp 


Comprobación entrada/salida de depuración 





CALL DBRON ¡Comprobación de que IN/OUT del programa de 
7 "depuración aunque se haya 
7 desactivado La salida 

RSTO a ¿Entrada de depuración 

De 100 Número de puerto 

RSTO 5 ¿Sal. de dep. (retorno de valor desde La ent.) 

De 22m ¿Número de puerto 

meo ¡Arranque cal. al final de base=de-comprob. 


Valores ficticios para visualización de bytes y palabras 





De oBCH 
De ODEH 
De OF 
o oBoCH 
De ODOEH 
De OFOIH 
0 9999H, 9999H, 9909H, 9999, 9999H, 9999H, 9999H, 9999H 
0 999, 9999, 9999H, 9999, 9999, 9999H, 9999H, 9999H 
1) 9999H, 9999, 9999, 9999H, 9999, 9999H, 9999H, 9999H 
ORO 40m ¡Para prevenir Listados innecesarios cuando 


5 cambia Unicamente La base de comprob. 






Subrutinas de depuración 


Equivalencias para códigos DBSDisplay 
Estas equivalencias son Los desplazamientos en la tabla de 
direcciones para varias de Las subrutinas que se utilizan. 


Eu 00 » indicadores 
Eu 02 pRegistro A 
EU 04 13 
EU 0 10 
Eu 08 1D 
EU 10 sE 
EQU 12 ”” 
EU 14 Hi 
Eu 16 +50 
EQU 18 1DE 
EQU 20 me 
E0U 22 YApuntador de pila 
EQU 24 *Menoria 
EQU 26 50, 
EQU 28 FUDE> 
EQU 30 po 
EQU 32 PUBCe1), (BC) 
EQU 34 FÍDE+1), (DE) 
EU 36 RA) 
Equivalencias 
Eu 208 ¡Dirección para RST 4 - Instrucción IN 
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ou ¡Dirección para RST 5 - Instrucción OUT 
A a 
00834 0001 = BACONIN Eu ¡Código de La función CONIN del B00s 
00833 0002 = BSCONOUT. Eu 2 ¿código de La función CONOUT del BDOS 
00836 0004 = BSREADCONS. EQU 10 código de La función de Lectura de consola del BM8. 
00837 0003 = BDOS EQU ¿Punto de entrada al BD0S 
E0u 


¡Equivalencias para especificar cómo 
Y DBSCONOUT y DESCONIN deberian 
1 realizar su entrada/salida 











EQU False » 
EQU False 1) Sólo una es cierta 
EQU True » 





+ Igualdades para entrada/sal 
9001 DBSStatussPort EQU 01M *Puerto de estado de consol 














0002 = DBeDAtasPort EQU 02H 'Puerto de datos de consola 
1 

9002 = DBSInputsReady EQU 0000800108 'Datos para entrada, a punto 

0001 = DBS0UtputsReady EQU 0000800018 *Preparado para salída 








1Datos para entrada/salida del 810S 










BIOSSCONIN: DB se 3La rutina de inicialización fija estas 
EJ o 3 dos direcciones JMP en el 8105 
BIOSACONOUT: DB nd 
De o 






Principales variables y constantes de depuración 






0406 00 









De o ¿Indicador principal de control de depuración 
; Cuando este indicador es distinto de cero debe 
7 tener Lugar toda La salida de depuración. Cuando 
es cero se suspende toda La salida de depuración, 
3 Puede ser modificado directamente por el 
usuario o utilizando Las rutinas 
DBSON, DBSOff y DBSPass. 


















0407 


é 










¿Contador de pasos 
¿ Cuando es distinto de cero La LLamada a DBSPass 
3 Lo decrementa en uno. Cuando alcanza 

7 el valor cero el indicador de control 

3 de depuración DBSFLag es puesto a cero con 

5 Lo que se activa La salida de depuración. 





¡Almacenar área para HL 





DBSSAavesSP: ¡Salvar área para apuntador de pila 







0400 DBSaveSRA: ¿Almacenar área para dirección de retorno 
040F DBsCal18Adare: O ¿Comienza Lo mismo que DBSSaveSRA, 
¿pero DBSSaveSRA se actualiza durante 
7 el proceso de depuración. El valor se lanza 
% a la salida antes del título 
DBeStartéAddresar ¿Dirección de comienzo para visualización de menoría 
0811 pu o 
DBOEndOAdreRer ¡Dirección final para visualización de memoria 





¿Nisualización del código requerido 







¡Area de pila 











0416 os 9999, 9999H, 9999H, 9999, 9999H, 9999H, 9999H, 9999H 
00899 0426 9999999999 E] 7999, 9999H, 9999H, 9999H, 9999H, 9999H, 9999H, 9999H 
00900 0436 9999999999 De 9999, 9999, 9999H, 9999H, 9999H, 9999H, 9999H, 9999H 
00901 0446 00 De o ¿Registro E 

00902 0847 00 Da o ¿Registro D 

00903 0448 00 Da o ¿Registro € 

00904 0849 00 DB o ¿Registro B 

00903 084A 00 Da o ¿Indicadores 

00908 0848 00 Da o Registro A 

00907 DBeStacke Depuración de área de pila 

00908 5 Los reg. en el área de pila son "introducidos" 






(PUSHed) en La pila y accedidos directamente. 














Figura 10-2, (Continuación.) 
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00r0 , 

0091 , Registro de mensajes de título 

00912 , 

00913. , La tabla siguiente, indexada por DisplaySCode, se utiliza para acceder “al 
00914, 1 registro de cadena de titulo 

00915 , 

00916 DBSRegistersCapt iones 

00917 En] DBSFSRC tIndicadores 

00718, De DESASAC legistro A 

00919 De DESBARC 18 

00920 De DBSCARC 3 

00921 De DRSDARC +0 

00922 De OBRERA 

00923 Da DESHSAC 

00924 De DBSLARC 

00725 De DESECHA 

009726 9] 

00927 De 

00928 De 

00929 De iMemoria 

00930 De 150) 
00931 Es] y (DE) 
00932 E o l 
00933 E] FUBC+1) + (BC) 
00934 046E C104 E] FUDE+1), (DE) | 
00933 0470 CDO4 De AE 

00936 1 

00937 0472 466C616773DB8FERC: vIndicadores | 
00938 0478 4100 DESASRCO IRegístro A 

00739 047A 4200 DESBHRC: a 

00940 DBSCHRC: 0 

00741 DBSDIRC: 1] 

00942 DBSESACI 1E 

00943 DBSHSRC: mm 

00944 DBSLARC: ” 
00945 DBSECSACS ES 

00946 DBSDESAC» ¡DE 

00947 DBSHLSRC: mue 

00748 DBSSPARCS sP-.0 *Apuntador de pila 

00949 0492 3374617274DBeMBRC: (Start, End Address “,0 ¿Memoria 

00950 0AAS 2842432900DB8BEBCRC1 AI] 60 

00951 “(DE>=/0 1 0DE) 

00952 CS ro 

00953 “UBC+1), (BC) ,0 7 (BCO1), (BC) 

00954 <(DE+1), (DE)"/0 y (DEI), (DE) 

0095 AMADO ULA HL 

00956 , 

00957 , Indicadores de mensaje 

009s8 

00959 0409 De “CxTuMuEntn",0 ¡Compatible con La visualización del DDT 
00980 

00961 , Máscara de indicadores utilizada para comprobar byte indicador de usuario 
00762 , 

00963 

00964 0000800018 ¿Acarreo 

00965 0100800008 ¿Cero 

00966 1000800008 ¿Menos 

00967 000001008 aridad par 

00968 Da 9001800008 JAcarreo interdigito (acarreo aux.) 

00969 DB o ¿Terminal 

01100 o 

oLLOL , DesImit 

1102 , Esta rutina inicializa el paquete de programas de depuración 

01103 ñ 

01108 DBSIMáte 

oL1oS 14 DeeBIOSe1O ¿Utilización del BIOS para CONIN/CONQUT 
01106 Lao 4 ¿obt. de direc. de arranque cal. desde pág. 
1107 5 base. M = pág. del vec. de sal. del BIOS 
01108 Co) Jobt. del despl. de CONIN en vec. de saltos 
1109 SHO BIOSSCONIN + 1 ¿Fijar dirección 

oLL1o MI L,0cH Obt. del despl. CONOUT en vector 

or SHO BIOSSCONOUT + 1 de saltos 

oL112 ENDIF 

ora 

on14 ¡Fijar instrucciones JNP para recibir el control 

om ¿cuando se ejecute una instrucción RST 

OÍNIS — O4EA 3ECI mi ¿Fijar instrucciones JMP en Los puntos RST 








Figura 10-2, Continuación.) 
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322000 


211408 
222100 
216co8 
222500 





co 








STA RSTA 
STA RSTS. 

LAT DB Imput ¡Dirección de La rutina de entrada falseada 
SHO RSTA + 1 

LAT H,DBsOuteut ¿Dirección de La rutina de salida falseada 
SHO RSTS + 1 

Rer 

DBSCONTA 


Esta rutina devuelve el siguiente carácter de La consola, 


pero convirtiéndolo de La "a" a La "2" a mayúsculas. 























¡CONINUE 
DAFF CDOSOS CALL DBSCONIN ¿Obtención de carácter del teclado 
0502 C31B09 JAP DBRARTOSUPper ¿Cambio a mayúsculas y retorno 
DESCONIN 
Esta rutina devuelve el carácter siguiente de La consola. 
De acuerdo con La configuración de equivalencias utiliza 
entrada/salida por bytes del BDOS (función 2) o el BIOS. 
Parámetros de salida 
A = carácter desde consola 
IBSCONIN: 
14 DBePO11ede1o ¿Simple entrada 
1N DBeStatusaPort ¿Comprobación de datos entrando 
ANI 
3 ¿No 
18 ¿Entrada de carácter de datos 
Pus ¿Almacenar carácter-dato 
mov ¿Preparado para salida 
cate ¿Repetición 
¿Recuperación carácter-dato 
ne ¿Recuper ácter-dat: 
ENDIF 
14 DESBDOSHIO ¿Utilización del BDOS para entrada 
0505 0801 MYI O C/BSCONIN ectura de consola 
0507 30500 ame BDOS ¿EL BDOS retorna a su LLamador 
ENDIF 
1 DBsBIOSeIO tilización del BIOS para entrada 
AMP BIOSSCONIN le fija durante La inicialización 
del BIOS 
ENDIF 
. 
1 DBSCONOUT 
; Esta rutina Lanza a salida por consola el carácter que se encuentra 
en el registro utilizando entrada salida simple el BDOS o el BIOS. 
Parámetros de entrada 
, A = byte a Lanzar a salida 
, 
DBSCONOUT+ 
O30A 3A0604 LDA—— DBsFlao ¡Comprobación de sí está activa salida dep. 
030D 87 DRA A 
030€ 8 ñz ¿Ignorar La salida sí desactivado 
1£ DESPOLLed8LO. ¿Utilización salida simple 
IN DBAStatussPort ¿Comprobación de preparado para salida 
ANI rady 
yz ¿No 
mov ¿Obtención de byte de datos 
our 
RET 
ENDIF 
1e DBSBDOSSIO ¿Utilización del BDOS para salida 
050. 39 moy EC ¿Traslado al registro correcto 
0510 0802 MI C/BRCONOUT 
0312 C30900 Jme ADOS. ¿Retorno del BDOS a quien Le Llaró 
ENDIF 
re DBSBIOSSIO. ¿Utilización del BIOS para salida 
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01430 
01431 

01500. 
01501 

01502 
01503 
01504 
01505 
01506 
01507 
01508 
01509 
or510. 
ost 
o1600 
01601 
01602 
01603 
01604 
01605. 
01606 
01607. 
01608. 
01609 
oL610. 
orén 
01700 
01701 
01702 
01703 
01704 
01708 
01708 
01707 
01708 
01709 
01710 
UN 
or7iZ 
01713 
01714 
017i5 
01718 
01717 
01718 
01719 
01720 
0172 
01722 
01723 
01724 
01725 
01726 
01800 
0801 
01802 
01803 
01804 
o180s 
01806 
01807 
01808 
01809 
ors1o 
EN 
oLe12 
4) 
oreLa 
oLe1S 





1817 
Lele 
oro 
o1ezo 
01821 
01622 





0515 
0516 
0518 
0518 
os1c 


os1D 
OS1E 
Os1F 


0523 


os24 
0527 
0526 
0529 
052A 
052B 
os2c 
0520 
052€ 
0531 
532 
0533 


0594 


osas 
0536 
0337 
0534 
0338 
0530 
0330 
0540 
0343 
0544 


0547 
0548 
9549 


FS 
SER 
320604 
Fr 

co 


FS 


320604 
Fl 


220904 
El 
FS 
se 
23 
Se 
23 
ES 
220704 
E) 
Ds 
ES 


El 
Fr 
c9 
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01429 moy ac Irasladar a registro correcto 




















e OsscoNouT ¿Fijación durante la iicialización de la 
ENDIF 5 depuración 

s. 

, 

; DBsOn 

: Esta rutina activa todas Las salidas de depuración fijando 

; DBSFLag a distinto de cero. 

ñ 

DBsOn: 
push psu ¡Preservar registros 
MUI ALOE, 
STA DBsFlag ¿Fijar a uno indicador de control 
PoR PSA 
Rer 

. 

, 

1 Desorr 

; Esta rutina desactiva todas Las salidas de La depuración 

; fijando a cero DBSFLag. 

ñ 

TA 
Pus PSA ¿Preservar registros 
xRA A 
STA DBsFlag ¡Puesta a cero del indicador de control 
Por PSA 
RT 

. 

, 

, DBSSetaPase 

; Esta rutina fija el contador de pasos. Las Llamadas siguientes 

, a DBSPass decrenentarán el contador y cuando se alcance 

, el O se activa La salida de depuración. 

, 

; Secuencia de Llamada 

, CALL DBSSetsPass 

; De Pass8Count8Value 

1 

DEBSSetsPass: 
SHLD— DBSSaVesHL ¡Preservar HL de usuario 
Por ¿Recuperación dirección de retorno 
Pusm a reservar DE de usuario 
moy EM ¿Obtención byte LS 
1Nx e FActualización apuntador 
moy DM ¿Obtención byte MS 
E ¿nL apunta a La dirección de retorno 
xcHo. ¿HL = contador de pasos 
SD DBsPassSCount ¿Fijación contador de pasos de depuración 
xcHo. ¿HL apunta a La dirección de retorno 
Poe O tecuperación de DE del usuario 
TL ¿Recuperación ML del úsuarto y fijación de 

¿la direc. de retorno en cabecera de pila 

REr 

1 

, DesPass 

, Esta rutina decrenenta el contador de pasos de depuración =— 

: 5i el resultado es negativo, no se toma ninguna acción. 

, Sí el resultado es cero, fija a uno el indicador de control de 

; depuración para activar La salida. 

; 











Push ¿Alnacenar registros de usuario 
Push 
Lao ¿Obtención contador de pasos 
DeX 
mov ¿Comprobación de conteo negativo 
ORA 
. DBsPassex ¿Si, no tomar ninguna acción adicional 
SHO DBsPass8Count ¿Almacenar contador decrementado 
ORAL ¿Comprobación de contador cero 
yz DBsPas+sED FS, activar depuración 

DBeParsex 
Por ¿Recuperación regístros de usuario 
Por PSA 
RT 
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¡Activación depuración 
0544 3EFF 

0340 320604 STA 
0S4F C34705 JP DBeParsex 


ALDEA, 





¿Fijación indicador de control depuración 


DBSDISP1ay 
Esta es La rutina primaria de visulización de depuración 


Secuencia de Llamada 
CALL DBSDisplay 


De DisplaySCode 
Da “Caption String”,0 





EL código de visualización (display) identifica qué registro(s) 
debe ser visualizado. 


Cuando el programa de visualización especifica un bloque 
de memoria La secuencia es: 


,Endsñddress 
n9”,0 


¡Salvar HL de usuario 


¡Obtención dirección de retorno en la pila 
¿Esta obtención está act. por el pros. de dp. 
¿Almacenar La direc. de retorno temporalmente 
¿Restar 3 a La dirección de la instrucción 

7 de Llamada 


¿Almacenar dirección real de LLanada 
¿Recuperar dirección de retorno 






¿Almacenamiento temporal de Los indicadores 
5 para prevenir que sean cambiados por DA) $? 
¿Preservar ajuntador de pila 

















0363 39 
0566 23 Lorrecto para PUSH PSW extra necesario para 
0587 23 7 salvar indicadores 

0568 220804 

0sé8 Fr ¿Recuperar indicadores 

0S6C 314c04 LXI SP,DBAStack ¿Commutar a pila Local 

oS6F FS PUSH PsM ¿Almacenar otros registros de usuario 
0570 C3 PUSH A l área de pila se ha diseñado especialmente 
0571 03 PusH o para acceder a estos registros 

0572 240004 LMLD— DBsSavesña Obtención dirección de retorno 

0575 7E CIA Obtención código de visualización 

0576 321504 STA DBsDisplaysCode 

0579 23 NA ¿Actualización dirección de retorno 

037A FE18, CPI ome ¿Comprobación de sí debe visualizarse la 
0370 C29105 ÍNZ O DBSNOtéMenory $ memoria 

057F se moy EM ¿Obtención DE = dirección comienzo 

0580 23 mom 

0581 56 POY Dam 

0582 23 E 

0583 EB. xcHo ¿HL = dirección de comienzo 

0584 221104 SHLD  DBeStartsadar 

0587 EB xcHo. IL -> dirección de final 

0588 SE moy Em Obtención de DE = dirección de final 
0589 23 m0 

058 56 A] 

0588 23 EIA 

0s8c ER xCHO ¿ML = dirección de final, DE > título 
0560 221304 sHLo 





0590 EB. xcHo. ¿HL -> cadena título 
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3 


08339 33 33 





05D2 
0308 
0308 


05DE 
SEL 


osea 





Es 
CDc107 
£D7co7 


E 


TE 
23 
37 
CAnsos 


ES 
AF 
CDOAOS 
El 
Ca990s 


220004 
c0c807 


3A150% 
se 
1600 
Ds 


FE18 
CAcFoS 


214c08 
19 


se 
2 
56 
El 
CDEEO7 


coD607. 
20302000 
caemos 


219204 
CDEEO7 
EDcso7 


241104 
c08707. 


c0D607 
202000 


241304 
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Salida de cadena de preámbulo y de titulo 
El fornato para cualquier visualización excepto de La menoria es: 





man : Cadena título 3 RC = www 


Dirección de Llamada t valor 
Título registro (A,B,C. 





Se Lanza un retorno de carro, salto de Línea al comienzo del 
mensaje, no al finalizar. 


La visualización de menor 





es como sigue: 


+ Cadena título : Comienzo, Final : 55ss, esee 
JON ARCANO NN a CCC cccc cccc ceco 


Pus ¡Almacenar apuntador a cadena titulo 
CALL DBSCRLF ¿Visualización ret. de carro, salto de Línea 
CALL DBSDisplaySCALLA ¿Visualización DBSCaLLSAddreós en hex. 














A] Recuperar apuntador a cadena título 
DBSDIsP1aySCaption: ¿HL —> cadena título 
moy AA ¿Obtención de carácter 
1NX 
ORA ¿Comprobación de final de cadena 
Je ¿si 
PusH ¡Almacenar apuntador a cadena 
mov ¿Preparado para salida 
CALL ¿Visualización de carácter 
Pop tecuperación de apuntador a cadena 
e luelta atrás a por nuevo carácter 





ñ 
DBSENdSCapt ion: 
SHO DESSavesRA ; 





¡Amacenamiento direc. de retorno actualizada 
CALL DBsColÓn ¿Visualización de *:* 


/isualización de título registro 




















LOA DBSDisplaysCode ¿obtención cód. de visualización de usuario 
moy EA componer código de visualización en palabra 
MY D/O. 
PUSH a, ¡Salvar valor de palabra para utiliz. post. 
A] ¡Visualización de mem. es un caso especial 
y DB8Ds 5] 
LXI— M.DBeRegistersCaptions ;¡Componer apuntador a dirección en tabla 
DAD ¿HL => palabra conteniendo dirección 

5 de título de registro 
moy Em ¿obtención byte LS de dirección 
mxo. 
moy DAM E -> cadena de título de registro 
xcHo. 





IL => cadena de título de registro 


'GÁLE. ¡DEMO ¿Visualización de mensaje direc. por HL 


CALL DBSMSOL isuaLización de mensaje en-línea 





De 0 
JMP O DBASeLeCtáRcUtine ¿Ir a procesador correcto 
, 
DBRDIsplaySMemsCapt ion: ¿La visualización de menoría necesita un 
¿ "título especial con Las direcciones 
5 de comienzo y final 
LAI M.DBemÓRC 4sualización titulo especifico 





CALL DBeMSO 


CALL DBeColOn ¿Misualización * 5 * 

LMLD DBSStarteAddress ¿Visualización dirección de comienzo 
CALL DESDALA ¿Visualización de ML en hexadecimal 
CALL DBSMSOL ¿Visualización de mensaje en=Línea 


De e 


Lao 





¿Obtención dirección de finalización 
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02049 
02050 


02051 
02052 
02083 
02054 
02055 
02056 

02057 
02058 
02059 
02060. 
02061 
02062 
02063 
02064 
02065 
02066 
02087 
02068 
02069 
02070 
02071 

02072 
02073 
02074 
02073 
02076 
02077 
02078 
02079 
02080 
02081 

02082 
02083 
02084 
02085 
02086 
02087 
02088 
02089 
02090 
02091 

02092 
02093 
02094 
02095 
02098 
02097 
02098 
02200 
02201 

02202 
02203 
02204 
02205 
02206 
02207 
02208 
02209 
02210 
02211 
02212 
02213 
02218 
02215 
02216 
02217 
02218 
02219 
02220 
02221 
02222 
02223 
02224 
02225 
02226 





05E7 
OSEA 


oseD 
OSEE 
OSI 


osa 
OSF3 
oSFa, 
osFS 


osFe 
05.9 
OSFA 


os 
0SFC 
OSFO 
SFE 
0601 
0602 


0605 
0606 
0609 


004 
D60c 
080€ 
0810 
0612 
0814 
0616 
0618 
O61A 
0610 
061€ 
0820 
0622 
0624 
0626 
0628 
062A 
0620 
062€ 


0630 
0632 
0634 
0637 


0634 
0638 
0630 


0s3r 
0640 
0642 
0645 


0847 
0648. 
0649 
0644 
0648 


064 


co8707 
Coc1o7 


pr 
210406 
19 


se 
23 
56 
En 


11F805 
DS 
ES 


AN 
cl 
Fl 
2A0804 
FS 
240004 


ES 
240904 
Es 


2008 
5406 


6606 
$cos 
7206 
7806 
7E06 
8906 
Ba06 
9006 
9608 
4907 
5007 
5707 
5E07 
4807 
7207 


aAGADA, 

27 

21DA08 
118908 


JA 
2 
CAME0S. 


A0 
331 
c24706 
3E30 


77 
23 
23 
13 
OS 


210904 

























CALL DRSDHLA ¿Visualización de HL en hexadecinal 
CALL DBSCRLE Visualización de ret. de carro, sal. del 
¡Salto a rutina seleccionada 
DBsSelectáRoutines 
Pa ¡Recuperación palabra-valor DisplayStode 
XI M.DESDisPlaysTable 
paD on ¿HL -> dirección del código para procesar 
7 requerimientos de La visualización 
moy En ¿obtención byte LS de dirección 
ed Di ¿Actualización de apuntador 
+ ¿Obtención byte MS de dirección 
xcHo. FAL => código 
EXI DVDBRENit ;Falsear enlace en la pila 
Pus 0 
Pon ¿Llamada al procesador de visualización 
DosExate Retorno al usuario 
FR 2 ¡Recuperación registros de usuario 
A 5 almacenados en pila de depuración Lor 
LLO ¡Muelta a La pila de usuario 
sem 
oo ¡Obtención de dirección de retorno 
actualizada (ignora parámetros en-linea) | 
xrHL ¿Reemplazar en cabecera de pila de usuario 
LALO ¿Obtención HL de usuario 





REr ¿Transferencia a dirección de retorno 


























De + Indicadores 
De +Regístro A 
De 8 
E] se 
De 
Da sE 
De 0 
De si 
De 180 
Du E 
De e 
De Apuntador de pila 
De ¿Memoria 
De DPspsEc 953) 
De DPSBsDE 0007 
Du Den pao 
1] DPswsec BC Er 
oy DPsheDE FADE* 1), (DE 
' E) De AN] 
1 Rutinas de procesamiento de La visualización de La depuración 
hear ¿Indicadores 
¿Los indicadores se visualizan en La missa torna 
7 que el DDT utiliza: CIZOMOBOJO 
LDA ¿obtención de indicadores 
mov ¿Preservar copia 
XI MiDESFlagssMsg + 1 ¿HL => primer 0/1 en mensaje 
LXI— D/DBSFlageMasks ¿DE => tabla de valores de máscara de indicadores 
DESFeNeXt 
LOA o ¿Obtención máscara de indicadores siguiente 
Ora A ¿Comprobación de final de tabla 
aq DBsFeDisplay — ¿Si, visualizar resultados 
ANA e ¿Comprobación de indicador a uno 
MUI Atar ¿Susposición de que si Lo está 
ÚNZ DBSFSNZ FS, está a uno 
MUI a t0s ÍNO, está a cero 
DESFSNZ: 
mo mA Almacenar 19" o v1" en terto del mensaje 
¿Actualización apuntador al próxino 
A] ipuntador al pr 0/1 
In D ¿Actualización apuntador a máscara de indicadores 
JP DBAFANeKt 
DROFSDAspLay1 ¿Visualización de resultados 
EXI M/DBSFLags ems: 
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02227 
02228 
02229 
02230 
02231 
02232 
02233 
02234 
02235 
02238 
02237 
02238 
02239 
02240 
02241 
02202 
02243 
02244 
02245 
02246 
02247 
02248 
02249 
02250 
02251 
02252 
02253 
02254 
02255 
02256 
02257 
02258 
02259 
02260 
02261 
02262 
02263 
02264 
02265 
02266 
02267 
02268 
02269 
02270 
02271 
02272 
02273 
02274 
02278 
02276 
02277 
02278 
02279 
02280 
02281 
02202 
02283 
02284 
02285 
02286 
02287 
02288 
02289 
02290 
02291 
02292 
02293 
02294 
02295 
02298 
02297 
02298 
02299 
02300 
02301 
102302 
02303 
02304 
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0651 


0634 
0657 


063A 
0650 


0863 


0888 
0869 


os8c 
o86F 


0872 
0878 


0878 
0878 


067€ 
0681 


0684 
0887 


9830 
0893 


0698 
0899 
089A 


0690 
AO 
0SA3 
06AS 

069 

0scD 


0601 
08D4. 
0607 
OSDA 


06D 
osE0 


osES 
OSES 
O8E7 
osea 
0sE9 
OSEA 
0SEB 
OSEE 























¡Visualización de mensaje y retorno 


¡Obtención de valor almacenado 
¿Visualización de éste y retorno 


¡Obtención de valor almacenado 
¿Visualización de éste y retorno 


¿Obtención de valor almacenado 
¿Visualización de éste y retorno 


¡Obtención de valor almacenado 
¿Visualización de éste y retorno 


¡Obtención de valor almacenado 
¿Visualización de éste y retorno 


¡Obtención de valor almacenado 
¿Visualización de éste y retorno 


¿Obtención de valor almacenado 
¿Visualización de éste y retorno 


¡Obtención de valor almacenado 
¿Visualización de éste y retorno 


¿Obtención de valor almacenado 
¿Visual ¡zación de éste y retorno 


¿Obtención de valor almacenado 
¿Visualización de éste y retorno 


¡Obtención de valor almacenado 
¿Visualización de éste y retorno 


¿Incremento de La dirección de finalización para 
5 “hacer La aritmética más simple 


DBeStartéAddress ¡Comparación de ML con EndSAddress 





inal > comienzo 
¿Error, comienzo > final 


ODH,OAH, “mn ERROR = Start Address > End nn”,0 


¡Lanzar a salida ret. carro, salto de Línea 
¿ignorar CR,LF en La primera Linea 
¿línea indentada! 


¿Obtención comienzo dirección de Linea 
isualización en hexadecinal 





¿Nisualización de: * 





Amacenamiento dirección de memoria 
¿Lanzar a salida un blanco 
¿Recuperación dirección de byte en curso 
¿obtención de byte de La memoria 
JActualización apuntador a memoria 
¿Salvar para utilización posterior 
Ssualización en hexadecimal 





C3EE07 JMe DBRMSO, 
DesAs 1A register 
3ASBOS LOA DB8Savesa 
039107 MP DBRDAM 
ñ 
prom: 
24904 LOA 
239107 me 
Descr 10 
2As80s LOA DBsSavesc 
c39107 JAP DBA 
, 
DPeD: 1D 
344704 LOA 
E39107 e 
Dese sE 
3AA604, LOA DBeSavesE 
C39107 SAP BSD 
Desa 7) 
JADADA, LOA DBeSavesH 
c39107 JMP O DBRDAR. 
ñ 
Dee 1 
30904 LOA DBeSavesL. 
039107 SMe O DBRDAR 
DPsrcr 180 
244804 LHLD DBsSavesc 
£38707 JP DBSDALA 
1 
DPeDEs 1DE 
244604 LHLD— DBSSavesE 
238707 SMA OBRA 
, 
Dee mL 
240904 LHLD DBeSavesM 
C38707 JAP DBA 
, 
DPssPs sApuntador_de pila 
240804 LHLD DBeSavessP 
ca8707 JAP DBA 
ñ 
Dem AMenoria 
241304 LLO DBSEndSAdGre: 
23 mo. 
221304 SHO DBSENd8AdAre: 
241104 Lao 
CD3A07 CALL DBSMSCheck8End 
DADIOS e DBOMSACAr «11 80K 
c0D607 CALL DBRMSGI 
ODOAZAZA2O. De 
9 RT 
DEOMONExt8L ¿nes 
c0c107 CALL DBSCRLF 
DBSMSAJAr eS 580K 
coD807 CALL DBSMSOL 
202000 a 0 
241104 LMLD DBAStartsAddress 
cD8707 CALL DBSDHLH 
c0cso7 CALL DBsColon 
241104 LHLD DBeStarisAddrese 
DESMONeYL8Hex8By ter 
Es PUSH 
cob007 CALL 
El PoR 
TE mov 
23 Nx 
ES PU A 
c09107 CALL DBSDAM 
El POr 


¿Recuperación de direc. actualizada de nen. 
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02303 OSEF CO3A07 CALL DBSMICNECK8ENA ¿Comparación HL con dirección de finalización 
O6EZ CAFEOS yz DBRMBDiSpLaySASCII — ¿Si, Final de área 
06FS 70 moy A ¿Comprobación de comienzo de nueva Linea 
SES ESOF ANT O000811118 ¿_ Gila dirección es XXX0N) 
OSF8 CAFEOS Y DBSMPDIsplayeASCIL ¿Si 
O6FB C3E306 UP DBOMONEXLOMeXBByte No, vuelta atrás a por otro 
DBOMPDispLaySASC ELE ¿Visualización de byte en ASCII 
osFE cocso7 CALL DBsColon Visualización de "3 
0701 2A1104 LLO DBSStarisAddress Comienzo ASCII cono al principio de Linea 
DBRMeNeN1BASCIISBy tes 
0704 7€ MOYA ¿Obtención de byte de La memoria 
0703 ES PUSH ¿Almacenar dirección de memoria 
0708 ES7F ANI Or11e11118 ¿Eliminar paridad 
0708 AF moy C.A ¿Preparación para salida 
9709 FEZO e ”- ¿Comprobación de no-gráfico 
9708 D21007 ÍNC O DBeMBDisplaySChar ¿Car >= espacio 
O70E 0EZE MW Cr.” ¿Visualización no gráfica como *.* 
DBSMBDisplaySChars 
9710 FE7F Ea] Comprobación de DEL (puede ser no=grático) 
O712 C21707 ÍNZO— DBRMSNOLSDEL Nos es gráfico 
0713 0E2€ AS ¿forzar a 
DBeHSNOtADEL+ 
0717 CALU Visualización de carácter 
O71A Por ¿Recuperación dirección de memoría 
0718 1 ¿Actualización apuntador de memoria 
0710 suo. ¿Actualización copta de memoria 
om CALL ¿Comprobación de final de volcado de memoria 
9722 yz ¿si, finalizado 
0723 moy comprobación de final de Línea 
0728 ANI comprobando dirección XXX0H 
0728 ya 385, comienzo de nueva Uinea 
0728 moy ohprobac ión de necesidad de blancos extra 
0720 ANI si La dirección es múltiplo de cuatro 
072€ 020407 AZ DBMBNExIBASCIISByte No, vuelta atrás a por muevo Carácter 
0731 C0DO07 CALL DBeBlank ¿Sis salida de blanco 
0734 30407 SMPO O DBOMONEXtSASCIIAByte ¿Vuelta atrás a por nuevo carácter 
, 
Dome 
9737 c3c1o7 ne BecRLA ¿Salida de retorno de carro, 
5 salto de Línea y retorno 
, 
DBRMACheCK8End: ¿Comparación de HL con EndSAddress 
O73A DS PUSH o ¿Almacenar DE (salvaguarda) 
0738 El x0Ho ¿DE = dirección en curso 
073C 2A1304 LLO DBMENASAdAr: ¿Obtención dirección de finalización 
073% 7A MOV A,D ¿Comparación de bytes MS 
0740 BC O] 
0741 C24607 ÍNZ O DBRMSCNeCKSEndOX ¿Salida sí son distintos 
Pibe mo NE ¿Comparación de Los bytes LS 
0745 BD eme 
DBSMICReCk8ENdeX: 
0746 ES XCHO, ¿HL = dirección en curso 
0747 D1 POr o ¿Recuperación de DE 
0748 C9 REr ¿Retorno con indicadores de condición a uno 
ñ 
DPeBeBC: 180 
LMD DBeSavesc ¿Obtención palabra-valor salvada 
074c TE _OY AM ¿Obtención del byte direcctonado por ésta 
O7AD C39107 SP DDN ¿Visualización del misno y retorno 
, 
DesasDEr mA 
9730 244604 LD DBtSayesE ¡Obtención palabra-valor salvada 
9753 E moy A Obtención del byte direccionado por ésta 
0734 C39107 SP DBA ¿Visualización del misno y retorno 
Desa po 
9737 240904 LMUD DBSSavesHL ¿Obtención palabra=valor salvada 
073A 7€ moya ¿Obtención del byte direccionado por ésta 
0738 C39107 SP DBA ¿Visualización del misno y retorno 
, 
DPemeBC: »ABCe1) + (80) 
O7SE 244804 LHLD— DBeSavesc ¡Obtención palabra-valor salvada 
0761 Se moy En ¿Obtención de palabra direccionada por éste 
0762 23 NA 
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02382 0763 56 mov 0. 
02383 0764 xcHo. a 
02384 0763 C38707 MP DBA ¿Visual zación del mismo 
02383 1 
02306 DPSMSDES FADE+1), (DE) 
02387 0768 2A4604 LMLD— DBSSaveRE ¿Obtención palabra-valor salvada 
02388 076B SE moy EM ¿Obtención del byte direccionado por Ésta 
02389 076C 23 10 
02390 076D 56 moY Dom 
02391 076€ EB xCHo. (L = palabra a visualizar 
02392 O7SF C38707 SP OBRA isualización del mismo 
02393 , 
02394 Desea AE) >» 
02399 0772 240904 LALO DBSSaVeRHL ¿Obtención palabra-valor salvada 
02396 0773 Se moy EA ¿Obtención del byte direccionado por ésta 
02397 0776 23 Nx A 
02398 0777 56 moy DAM 
02399 0778 EB XCHO. ¿HL = patabra a visualizar 
02400 0779 C38707 JP DBA ¿Visualización del mismo 
0201 , 
02500. a 
02501 , DBDA sp Lay 8CALLA 
02502 , Esta rutina visualiza en hexadecimal La OBSCaLLSAddress seguida 
02303 ; pea 
02504 , 
02505. DBRDIsp1ay8CALLA! 
02508 0770 ES Pus ¿Salvar HL del Llamador 
02507 — 077D 2A0F04 LALO ¿Obtención de La dirección de Llanada 
02508 0780 CD8707 CALL ¿Visualización de HL en hexadecimal 
02509 0783 EL PoR ¿Recuperación de HL del LLamador 
02510 — 0784 C3C807 me isualización de " : " y retorno 
025 , 
02600 e 
02601 , 
02602 , o) 
02603 ; Visualización de NL en hexadecinal 
02604 , 
02605 , Parámetros de entra 
02606 , 
02607 HL = valor a visualizar 
02608 
02609 
02610 0787 ES Pus ¿Almacenar valor de entrada 
02611 0788 7C PO ¿Obtención primer byte MS 
02612 0789 CD9107 CALL DBSDAM ¿Visualización de A en hexadecimal 
02613 078C EL O] ¿Recuperación valor de entrada 
02614 0780 7D moy AL Obtención byte LS 
02613 078E C39107 JMP o DBRDAR, ¿Visualización y retorno 
o261e , 
02700 se 
02701 
02702 DESDAM 
02703 Visualización del registro A en hexadecimal 
02704 
02705 Parámetros de entrada 
02708 
02707 A = valor a convertir y lanzar a la salida 
02708 
02709 'BSDAM: 
02710 0791 FS PU PSA ¡Realizar copía del valor a convertir 
02711 0792 OF RR ¿Desplazamiento de A cuatro lugares a La derecha 
02712 0793 0F RRE 
02713 0794 OF ARO 
02714 0793 0F RRC 
02715 0796 CDB4O7 CALL DBSNIbble8sTONHex ¡Conversión de Los 4 bits LS a ASCII 
02718 0799 CDOAOS CALL DBSCONOUT ¿Visualización del carácter 
02717 079C FL POR PSA ¿obtención del valor original 
02718 0790 CDBA407 CALL DBSNibDIeSTONHex ¿Conversión a ASCIL de Los 4 bits Ls 
02719 — 07A0 C20A0S JM? DBRCONOUT ¿Visualización y retorno al Llanador 
02000 
02001 , 
02002 , DeScAM 
02003 1 Conversión del registro A en ASCII hexadecinal y almacenamiento 
02004 , en dirección especificada 
02805 , 
02806 , Parámetros de entrada 
02807 ; 
Figura 10-2. (Continuación.) 
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A = valor a convertir y Lanzar a salida 
HL > área de mem. ínt. para recibir dos caracteres de salida 


Parámetros de salida 


HL -> byte que sigue al últino byte hexadecimal salido 





DBSCAH: 
o7As FS PUSH PSA ¡Realización de copía del valor a convertir 
07AS or Bac Desplazamiento de A 4 Lugares a La derecha 
O7AS OF ARO 1 
O7AS 0 BAC 1 
07A7 OF RC P 
O7A8 CDB407 CALL DBSNibbleSTOSMex ¿Conversión a hexadecimal ASCII 
O7AB 77 CS ¿Almacenar en memoria 
O7AC 23 mu om ¿Actualización de apuntador 
O7AD Fi POP PSA ¿Obtención de valor hexadecinal 
O7AE CDB407 CALL DBSNibO1eSTOsHex ¿Conversión a hexadecimal ASCII 
0781 77 moy ma ¿Almacenar en memoria 
9782 23 1 o ¿Actualización de apuntador 
0783 C9 Rer 
. 


Subrutinas interiores 


DBSNIbb1eSTOSHe» 
Es una subrutina menor que convierte Los 4 bits 

menos significativos del registro A en un carácter hexadecimal 
en Ay 0 








02910 Parámetros de entrada 
02911 

02912 A = cuarteto a convertir en Los 4 bits Ls 

02913 

02914 Parámetros de salida 

02915 

02918 ALC = carácter ASCII hexadecimal 

02917 

02918 TOsHene 

02919 0784 ESOF. 0000811118 ¿Aislamiento de Los cuatro bits LS 
02920 — 07B8 C630 20% Conversión a ASCII 

02921 0788 FE3A 9.1 Comparación con el máxino 


02922  O7BA DABFO7 DBSNTHSNumerle ¿No es necesaria conversión en A => F 











02923 078 C607 7 ¿Conversión en Letra 
02924 DBSNTHANUmer ic 
02925 O7BF AF MOV CLA ¿Por conveniencias de otras rutinas 
02926 07COC9 Rer 
02927 
02928 
02929 , 
02930 : DESCALF 
02931 , Rutina simple para visualización de retorno de carro y salto de Linea 
02932 1 
02933 DBSCRLE+ 
02934  07C1 CDD607 CALL DBeMSGL ¿Nisualización de mensaje 
02935 07C4 ODOADO E ODM, OAH, O 
02936 0707 C9 Rer 
02937 , 
02938 , DESCOLON 
023939 , Rutina simple para visualización de * : ' 
02940 , 
02941 DBsColon: 
o7C8 co0607 CALL DBSMSOL ¿Visualización de mensaje 
02943 — 07CB 203A2000 3 RO 
02944 07CF Co REr 
02945 : 
02946 + Destslank 
02947 1 Rutina simple para visualización de * 
02948 1 
02949 DBsELanke 
02950 0700 CDDS07 CALL DBSMSOL ¿Visualización de mensaje 
02951 0703 2000 De ro 
02952 0705 c9 Rer 
03100 0 
03101 a 
03102 ; Subrutinas de procesamiento de mensajes 





Figura 10-2. (Continuación.) 
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, DBsMSG1_ (mensaje en-Linea) 
; Lanza a salida el mensaje terminado por un byte nulo que sigue 
, a La Llamada a MSGOUTI 
, 
; Secuencia de Llamada 
, CALL DBSMSOL 
; DB Me 
1 instrucción siguiente 
; Parámetros de salida 
; HL > instrucción siguiente al mensaje 
ñ 
DBSMSOL: 
¿Obtención de dirección de retorno de la pila, 
7 “almacenar HL del mismo en cabecera de La pila 
0706 E xr JH => mensaje 
09707 FS PUSH PSA ¡Salvar todos Los registros de usuario 
0708 C5 PusH 8 
0709 15 PUSH a 
DERMSOLANext 0 
ODA 7E moY AM ¡Obtención siguiente byte de datos 
0708 23 mom ¿Actualización apuntador a mensaje 
o7Dc 87 RA A Comprobación de byte nulo 
O7DD C2€507 ÚNZ— DRSMSGIC ¿No, continúe 
O7EO DI Por ¡Recuperación registros de usuario 
o7EL CA POr E . 
O7E2 FL Por PSA 
O7E3 ES xrHL ¿Recuperación NL del usuario de La pila, 
3 “reemplazándolo por dirección de retorno actualizada 
o7ES C9 Ren ¡Retorno a La dirección que sigue al byte nulo 
5 después del mensaje en=Línea 
DBSMSOIC: 
o7ES Puso ¡Almacenar apuntador a mensaje 
O7ES mov ¿Preparado para salida 
077 CALL DBSCONOUT 
O7EA POr ¿Recuperación apuntador a mensaje 
078 UMP O DBRMSOLSNext ¿Vuelta atrás a por carácter siguiente 
, DRemso 
: Salida de mensaje terminado por byte nulo 
, 
, Secuencia de Llamada 
1 MENSAJE: De om 
, XT MMESSACE 
: CALL DBemso 
; Parámetros de salida 
; NL => byte terminal nulo 
DBemSO: 
O7EE FS PUSH PSA ¡Salvar registros de usuario 
OJEF CS. Pus 
O7EO pS. PusH a 
DESMSOSNeAt: 
O7F1 7E CI ¿Obtención byte siguiente para salida 
072 87 RA A ¿Comprobación de terminación byte-00 
07F3 CAD008: yz Daemsosx ¿salida 
078 23 E] JActualización apuntador a mensaje 
077 ES Pus ¿Almacenamiento apuntador actual izado 
07E8 ar moy CA ¿Preparado para salida 
07F9 CDOAOS CALL DBSCONOUT 
O7EC EL Por A ¿Recuperación apuntador a mensaje 
O7FD C3FLO7 WMF DBSMSOSNext ¿Vuelta atrás a por carácrer siguiente 
DESMSOSx: 
0800 Dr POr o ¡Recuperación registros de usuario 
0801 CA Por a 
0802 FL POR PSA 
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Rer 


Rutina de depuración de entrada 


Esta rutína ayuda a La depuración de programas en Los que existen 
normalmente instrucciones de entrada. El código de operación de la 
instrucción IN debe reemplazarse por el valor DE7H (RST 4). 


Esta rutina toma el número de puerto contenido 
en el byte que sigue a La AST 4, Lo convierte en 
hexadecinal y Lanza el mensaje: 


Entrada desde puerto XX 


Acepta entonces dos caracteres (en hex.) del teclado, 
Los convierte a binarto en A y devuelve el control al byte 
que sigue al número de puerto 


ATENCION — Esta rutina efectúa Llamadas a BDOS y DBSCONOUT 


A96E707574DB1NWMe ssager 
5858203A20DBIN8POr ts 


h 
DBSImputi 
En salvar HL de usuario 
Por tecuperación dirección de núnero de puerto 
Dex opía para apuntar a AST 
SHLD DBsCallsAddress ¿Almacenamiento para visualización posterior 
TNx ¿Nuelta a apuntar a número de puerto 
ÍNota: A no necesita preservarse 
mov ¿Obtención de núnero de puerto 
1NX ¿Act. direc. de retorno para saltar nún, de puerto 
¿Almacenar dirección de retorno 
¿Almacenar resto de registros 


¿Almacenar núnero de puerto para uso posterior 


-ALnacenamiento de estado en curso del indicador 
¿ de depuración y activación salida de depuración 


Visualización de retorno de carro y salto de Lina 
¿Visualización dirección de Llamada 
¿Recuperación número de puerto 
H. DBINSPOr e 
DBscAM «Conversión a hex. y almacenamiento en mensaje 
H, DBINAMe ¿Salida de mensaje de indicación 
CALL DBSMSO 
mr cz ¡Obtención de valor de 2 digitos hexadecínales 
DEsoHV Retorno de valor en HL 
moy AL ¿Obtención de un byte únicamente 


CALL Vuelta a situar La salida de depuración a su 
estado antertor 
Por ¿Recuperación de registros 
Pop 
LaLo ¿Obtención de HL anterior 
PUSH ¿Puesta en cabecera de pila 
Lao ¿Obtención dirección de retorno 
Ea ¿10s = dirección de retorno, ML 
Y 


Rutina de depuración de salida 


Esta rutina ayuda a La depuración de programas en Los que existen 
normalmente instrucciones de salida. El código de operación 
de la instrucción OUT debe reemplazarse por el valor OEFH (RST 5). 


Esta rutina toma el valor del número de puerto 
contenido en el byte que sigue a La AST 5, Lo convierte 
en hexadecinal y lanza el mensaj 
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03512 
03513 
03514 
03 
03516 
03517 
30 
3 
03520 
03521 
03522 
03523 
03524 
03525 
03526 
03527 


03529 
03530 
03831 
103532 
03533 
03524 
03535 
03526 
03537 
03538 
03539 
03540 
0351 
03542 
03543 
03544 
03545 
03546 
03547 
03548 
03549 
03550 
03551 
03552 
03553 
03554 
03558 
03556 
03597 
03558 
03539 
03360 
03561 
03562 
03563 
03364 
0358s 
03566 
03567 
103700 
03701 

03702 
03703 
03704 
03705 
03706 
03707 
03708 
03709 
03710 
03711 

03712 
03713 
03714 
03715 
03716 
03717 
03800 
03001 





Figura 10-2, (Continuación.) 


o8ss 
0864 
0869 


sec 
o8sF 
0870 
0871 
0874 
0875 
0878 
0879 
0874 
0870 
087€ 
087F 


0883 


ESSNUSES $ 39 333 808% 























1 Salida al puerto XX : AR 

: 

; donde AA es el contenido del registro A antes de que 

, se ejecutase la RST 5. 

; Se devuelve el control al byte que sigue al número de puerto 

+ Pa 

; ATENCION - Esta rutina efectúa Llamadas a BDOS y DBSCONOUT 

1 pen) 
AF75747075DBO*Messages DE “Output to Port - 
3858203A200B09Por ts DE Xx. 
14100 — DBOSValues De AR, 
220904 SHO DBSSavesML ¡Salvar ML de usuario 
E A] ¿Recuperación dirección de número de puerto 
28 A] ¿Copia para apuntar a RST 
220F04 SHO DBsCallsAddrews ¿Almacenamiento para visualización posterior 
2 mo ¿Vuelta a apuntar a núnero de puerto 
324804 STA DESSavesA ¿Preservar valor a Lanzar a salida 
TE CA ¿obtención de número de puerto 
23 1 ct. direc. de retorno para saltar núm. de puerto 
220004 SHLD—— DESSavesRA ¿Almacenar dirección de retorno 
es PUSH B ¿Almacenar resto de registros 
Ds PusH 1 E 
FS Pus Ps ¡Almacenar número de puerto para uso posterior 
coB10s CALL DBsFlagsSaveson ¡Almacenamiento de estado en curso del indicador de 

5 depuración y activación salida de depuración 
CDc107 CALL DBSCRLE ¿Visualización de retorno de carro y salto de Línea 
CD7c97 CALL DBSDisplaySCALLA;Visualización dirección de Llamada 
Fs POP PSW tecuperación número de puerto 
216408 LAT M,DBOSPOrt 
CDA307 CALL DBSCAR ¡Conversión a hex. y almacenamiento en mensaje 
3a4Bos, LOA DBeSavesa 
216908 UXT — M/DBOSValue ¿Conversión del valor de salida 
CDA3O7 CALL DBSCAM ¿Conversión a hex. y almacenar en mensaje 
215508 LXI O M.DBOsMessage — ¡Salida de mensaje de indicación 
CDEEO7 CALL DBeMSO 
coBFo8 CALL DBsFlagsRestore ¿Vuelta a situar La salida de depuración a su 
3 estado anterior 
pr Porn ¿Recuperación de registros 
ci Poe a 
240904 LALO DBeSavesML ¿Obtención de HL anterior 
ES Pu ¿Puesta en cabecera de pila 
240004 LHLD— DBSSavesRa ¿obtención dirección de retorno 
ES xr ¿TOS = dirección de retorno, HL = valor anterior 
3A4BOS, LOA DBeSavesa ¿Recuperación de A (NOTA: Indicador no recuperado) 
co RET 
DBSF1a9$SavesOn 


FS 
30604 
328008 
EF 
320804 
Fl 


, 
, 
, 
, 
Dr 
Dr 








Esta rutina es utilizada únicamente por DBSIN/QUT.. 
Almacenar el estado en curso del indicador de control de depuración 
DSFlag, y Lo activa para asegurar que La salida DBSIN/QUT 

se Lanza en todos Los casos. 


BeFlageSavesón: 


PUSH 
LDA 
STA 
mur 
STA 
Pop 
REY 


FlagsPrevious! e 


psu 








o jaLor previo del indicador 


¡Almacenamiento de Los reg. del Llamador 
tención del valor en curso 

imacenamiento del mismo 

¿Activación indicador 
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DBSF1agéRestore 
Esta subrutina es utilizada Únicamente por DBSIN/OUT. 
Vuelve a su estado inicial al indicador 

DBSFLag. 


Restore 
PUSH PSA 

LOA DBsFlagsPrevicus ¡Obtención configuración inicial 
STA DBeFlaS ijación indicador de control de 
POr PSA depuración 

Rer 


Obtención de valor hexadecimal 


Esta rutina Lanza a la salida un mensaje de indicación 
y Lee entonces en el teclado un valor hexadecimal 

Es un tanto simplista en La medida en que termina La entrada 

el primer valor no hexadecimal. El núnero máximo de digitos a convertir 
se especifica cono parámetro de entrada, SÍ se entra un Núnero mayor 
que el máximo sólo se tomarán en cuenta Los Últimos cuatro. 


ATENCION 
DBSGHV utilizará al BDOS para realizar La función de Lectura 
de consola (410). Cuidado con el uso de esta rutina 
desde io jecuci 


Parámetros de entrada 


HL -> mensaje de salida terminado por byte-00 
€ = número de digitos hexadecinales a entrar 


¡Menoría intermedia de entrada para caracteres de 
7 consola 
jjación del número máximo de caracteres 
5 a entrar 
DRSGHVS InpUtSCOUNtE 
De ¡Fijación, por el BDOS, de número real de 
Í caracteres entrados 
DESGHVSDAL a 
¿Zona de memoria intermedia para caracteres 


¡Obtención nún. máximo de caracteres a entrar 
¿Comprobación con cuenta máxino 

¿Acarreo a uno si A<5 

Forzar a 4 caracteres únicamente 


mr 
DBAGHVSCOUNtS0K + 
STA ¿Activación cuenta máx. en men. int. de ent. 
CALL ¿Salida de mensaje de indicación 
EXT D/DBRCHVSBUtter ¿Aceptación de caracteres de la consola 
HVI C/BBREADCONS ¿código de función 
CALL BDOS 


MVI C/BRCONOUT ¡Lanzar salto de Linea 
MUI ELOAH 
CALL BDOS 


bromo ¿Valor inicial 
Lar :AOHVSDatadBytes — ¿DE -> caracteres de datos 
LDA — DBSOMVSInputsCcunt ¡Obtención cuenta de caracteres de entrada 
moy CA ¿Mantener cuenta en € 
DBSGHVSLO0p+ 
DR e ¿Decrementar contador 
en ¿Retorno cuando oper. real. (HL tiene el valor) 
Loax DD ¿Obtención carácter Siguiente de men. int. 
IX DO ¿Actualización apuntador a memoria intermedia 
CALL DESASTOSUPper ¿Conversión de A a mayusculas sí es necesario 
“0” ¿Comprobación de sí menor que cero 
551, final , 
9. ¿Comprobación de sí > 9 
DBSGHVSHex8D! ¿No, debe ser numérico 
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Figura 10-2. (Continuación.) 















0905 FE41 DS omprobación de si < A! 
0907 08 RC 4, finalización 
0908 FE47 E omprobación de si > 'F! 
D90A DO. ANC 4, finalización 
0908 D637. SUI “As 10 ¿Conversión de A hasta F a numérico 
90D C31209 MP DBSOMVSSMIFISLEFtSA ¿Combinar con resultado en curso 
, 
DBROHVeMe»8D 1918: 
0910 Dé3o sur sos ¿Conversión a binario 
DBROMVeSHiftsLer taa: 
0912 29 DAD ¡Desplazamiento de ML cuatro lugares a la 
0913 29 DAD 7 Taquierda 
0914 29 DADA 
0915 29 DADA . 
0918 eS ADD L ¿Añadir valor bin. a Los 4 bits menos sig. de A 
0917 6F moy LA Puesta en ML 
0918 CaFsos JMP DESOHVSLOOp ¿Vuelta atrás por carácter siguiente 
0 
; A a mayúsculas 
1 Convierte el contenido del registro A a mayúscula 
1 si está en minúsculas 
' Parámetros de entrada 
, A = carácter a convertir 
, Parámetros de salida 
, 
Y A = carácter convertido 
1 
DESASTOSURROr 
091B FES1 ES .Comprobación con Limite inferior 
OP1D DS. ES ¿No necesidad de conversión 
O91E FE7B er ra ¿Comparación con Límite superior 
0920 DO RNC No necesidad de conversión 
0921 ESSF ANI SEM ¿Conversión a mayúscula 
0923 09 Rer 


= | 















Brdas la J0-2aheassrs 
DOT VERS 2.0 

NEXT PC 

0924 0000 

lOs? 

on 4 
0120 + 
oa 
oe 
010 + 


oLSc - 
0168 
OL7A 
017 
0108 + 
oL10 4 
0120 4 





rimoow> 


AR 
Bl 

ce 
DD 
EE 
FF 
1 


L Register + 
Memory Dump 81 1 Start, 


05 3E AR O1 CC BB 11 
DD 21 11 FF B7 97 CD 
CD 52 03 02 41 20 52 


CIAO 1 Memory Dump 02 1 Start, 
0100 + 31 6B 03 CD EA 04 CD 
OlO 1 DD 21 11 FF B7 37 CD 


OIB7 4 Memory Dump 03 1 Start, 





ERROR - Start Address > End 
DICE 1 Memory Dump 08 1 Start, 
0100121 A, 








= CIZOMIENIO 


End Address 1 0108, 0128 
EE 1 22. Lon 

52 05 00 46 $C 61 67 73.001 11.. 77MR 
$5 67 1 MR. A Rey 


End Address 1 0100, OF 
15 05 3E AA Ol CC BB 11 EE y Ika 
32 03 00 46 6C 61 67 73.001 312. 77m 











1 0101, 0100 


1 0100, 0100 





Figura 10-3. Salida de consola desde el programa de prueba de depuración. 
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03 
(DE) 1 (DE) = DE 
A A) Fl 
ABC) 1 (BC+1), (BC) = 0BOC 
(DE) 1 (DE+1), (DE) = 0DOE 
CAL) y CLAIM) = OFOL 




















032D 1 Output to Port 22 + AA 





Figura 10-3. (Continuación.) 


recibir la orden de enviar un fichero que contenga todos los sim! 
del programa, junto con sus direcciones correspondientes. Una 
que el programa ha sido cargado por SID, se puede referir a 
imagen de memoria del programa no por dirección, sino por 
nombre simbólico real en el código fuente. SID soporta también 
concepto de “cuenta pasos” cuando se utilizan puntos de int 
rrupción. 
ZSID (Z80 depuración simbólica) 

Esta es la versión CPU Z80 de SID. El miniensamblador/dese: 

blador utiliza nemónicos de instrucción Zilog en vez de los utilizados 


por Intel. 
1 


Puesta en marcha del CP/M por primera vez | 











Es mucho más difícil introducir un CP/M en un nuevo sistema de 
cálculo que depurar una versión mejorada,en un sistema que funcione ya 
con CP/M. A menudo se enfrenta uno con un “muro infranqueable” sin 
ninguna herramienta de depuración adecuada para ayudarle. 

Por ejemplo, se instala el sistema CP/M en un disquete (utilizando otra 
computadora basada en CP/M), se pone el disquete en la nueva computado- 
ra y se pulsa el botón RESET. La cabeza del disco carga en el disco y luego 
¡nada! No se puede utilizar ningún programa tal como DDT o SID porque 
aún no se ha tenido instalado CP/M y funcionando en la nueva computado- 
ra. ¿O sí se puede? 

La respuesta es, siempre que sea posible, depurar el programa para la 
nueva máquina en un sistema CP/M existente. Quizá haya que “falsear” 
algunos aspectos del nuevo cargador o del BIOS de forma que el hecho dela 
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comprobación del mismo en la máquina principal no interaccione con el 
CP/M que funciona ya en ella. 

Este esquema permite estar prácticamente seguros de la lógica del 
programa antes de cargar el disquete en la nueva máquina. Ayudará a 
eliminar problemas causados por problemas del hardware de la nueva 
computadora. 

La situación más dificil de todas se presenta si se tiene sólo la nueva 
computadora y los discos de Digital Research. La única opción es encontrar 
una forma de leer en la memoria la imagen del CP/M contenida en el 
disquete, hacer los arreglos a mano en la nueva consola y en los controlado- 
res de disco (lo cual no es tarea fácil), escribir la imagen modificada en un 
disquete y recurrir a la prueba de Orville Wright. 

Si se valora el tiempo, es siempre más efectivo por lo que a coste se 
refiere utilizar otro sistema con el CP/M ya instalado. Esto es cierto aun 
cuando los dos sistemas no tengan el mismo formato de disquetes. Se puede 
ya realizar el cargador y construir la imagen del CP/M en la máquina. 
Entonces se carga la imagen directamente en la memoria de la nueva 
máquina y se escribe en un disquete. 

Este proceso de carga inferior requiere, sin embargo, que la nueva 
computadora tenga un programa monitor de memoria de sólo lectura 
(ROM). Dependiendo de la capacidad de este programa monitor en ROM, 
puede tenerse que hacer arreglos en la memoria de la nueva máquina para 
que un programa primitivo de “carga inferior” lea caracteres de 8 bits de un 
puerto serie, amontonándolos en la memoria y devolviendo el control al 
programa monitor cuando se pulsa un carácter del teclado de la consola de 
la nueva máquina. De hecho, algunos programas monitor en ROM poseen 
un programa de carga inferior incorporado. 








Depuración del cargador del CP/M 





El cargador del CP/M, como se recordará, está escrito en una de las 
pistas más externas de un disquete o disco rígido. En un disquete estándar 
de 8 pulgadas, una sola cara y simple densidad, el cargador de CP/M está 
almacenado en el primer sector de la primera pista. El cargador se lleva a la 
memoria por medio de firmware, que obtiene el control de la CPU cuando 
se conecta la máquina o se pulsa el botón de RESET. 

El cargador ha de ser compacto, porque el espacio del disquete en el cual 
está almacenado es limitado: no puede ser mayor de 128 bytes para 
disquetes estándar de 8 pulgadas. Esto tiende a excluir el uso de las sub- 
rutinas de depuración descritas, de forma que habrá que recurrir a técnicas 
más primitivas. 
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Comprobación del cargador bajo el CP/M 


¿Estaba cargado el “cargador”? 






















Un cargador se desarrolla mejor en un sistema basado en CP/M. 
tarea es más sencilla si se tiene ya el CP/M funcionando en la m 
máquina y se está preparando simplemente una versión mejorada 
cargador. En este caso se puede comprobar la mayor parte de 
programas como si fueran programas de usuario funcionando en el área 
programas transitorios (TPA). 

La mayor parte de cargadores se cargan en la memoria en la posici 
0000H, por lo que al principio del programa que se ha de depurar se de 
colocar una línea de origen temporal que rece 


ORG 1004 


Si se omite esto y se pide al DDT que cargue el fichero HEX sacado por 
el ensamblador, cargará en el origen real, 0000H, y borrará los conteni 
de la página base para la versión del CP/M que se esté utilizando. Esto 
ocasionará una caida del sistema; habrá que pulsar el botón RESET y volver 
a cargar el CP/M. Cuando ocurre esto, el DDT no dice directamente q| 
hay algo mal; únicamente lanza el mensaje **?” cuando se le pide que ca 
el fichero HEX. Se descubrirá que el fichero se ha “marchado” únicamente 
cuando se intente hacer alguna otra cosa. 

Se necesitará también ajustar las direcciones en las que el cargador 
intenta cargar la imagen del CP/M. Si no se hace así, se escribirá sobre la 
versión del CP/M que está funcionando en la actualidad. 

Con estos ajustes realizados se puede cargar el cargador bajo DDT y 
comprobar su ejecución, confirmando que carga la imagen correcta en las 
direcciones correctas para depurar y transferir el control al vector de saltos 
del BIOS. Cuando todo parezca estar funcionando correctamente, utilicese 
la instrucción IF para desconectar el programa de depuración, volvera 
ensamblar el cargador y escribirlo en un disquete. Entonces póngase el 
disquete en la unidad A y púlsese RESET. 


En este punto hay que aclarar si el cargador se está cargando en la 
memoria cuando se conecta la máquina o cuando se pulsa RESET. La mejor 
forma de hacerlo, y que además se puede dejar situada permanentemente, es 
enviar un mensaje de “funcionamiento correcto” en cuanto el cargador 
obtenga el control. Esto requiere hardware fijado para preparar al chip de 
USART (Universal Synchronous/Asynchronous Receive/Transmit) para 
enviar datos, aunque algunos fabricantes escriben este código de inicializa- 
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ción en el firmware que carga el cargador de arranque. Un mensaje 
adecuado de funcionamiento correcto sería el siguiente: 


CP/M Bootstrap Loader : Vn 1.0 11/18/82 


Si no se ve este mensaje, debe suponerse que el control no ha sido 
transferido al cargador. Esto será útil en el futuro si alguien protesta porque 
el CP/M no puede ser cargado. Si este mensaje no aparece, probablemente 
no se tiene el CP/M en el disco. 


¿Cargó el cargador de autocarga al CP/M? 


Esta cuestión es más difícil de resolver que la de si el propio cargador 
había sido cargado, especialmente si ha aparecido el mensaje de funciona- 
miento correcto del cargador o entonces cae el sistema. Un mensaje anterior 
en el proceso de arranque en frio del BIOS puede confirmar la transferencia 
correcta del control al BIOS. 

Si el problema con el programa de autocarga es grave, puede tener que 
adaptarse la subrutina de depuración de descarga de memoria, descargando 
los contenidos de memoria en la consola para ver qué información está 
colocando en la memoria el cargador. Visualizar 100H bytes empezando 
desde el principio del vector de saltos de BIOS. Esta tabla tiene un diseño 
inmediatamente reconocible de valores 0C3H cada tres bytes. 

Debería comprobarse también que el cargador esté cargando el número 
correcto de sectores del disco en la memoria. Si carga demasiado pocos, el 
CP/M puede conectarse sólo para caer unos momentos más tarde porque 
intente bien ejecutar un programa o acceder a una constante al final del 
BIOS. Si el cargador carga demasiados sectores del disco, el exceso puede 
“enrollarse alrededor” del principio de la memoria y escribir sobre el propio 
cargador, en la posición 0000H, antes de que haya completado su tarea. En 
este caso solamente se vería la señal de conexión para el cargador, no para 
el BIOS. 





[ Depuración del BIOS 








Mejor que intentar depurar el BIOS como una única pieza de programa, 
la depuración se hará tratándolo como una serie de módulos funcionales 
separados. 

No obstante las filosofías “top-down” actuales que tratan en primer 
lugar con toda la estructura, puede ser más rápido depurar las subrutinas de 
bajo nivel primero en un controlador de dispositivos. Esto proporciona una 
base sólida sobre la cual construir. 
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El BIOS puede dividirse en sus módulos constituyentes de la sigui 
forma: 


Entrada de carácter: 
Servicio de interrupción. 
Servicio de no interrupción. 


Salida de caracteres. 


Rutinas de interrupción: 
Reloj de tiempo real. 
Temporizador-centinela. 


Controladores de disco: 
De alto nivel (desbloqueadores). 
De bajo nivel (entrada/salida física). 


Hay que planear escribir un programa de pruebas para cada uno de 
estos módulos. Este programa de pruebas sirve para dos propósitos: en 
primer lugar, proporciona un medio de transferir el control al módulo bajo 
comprobación en una forma controlada. En segundo lugar, incluye los 
módulos necesarios o módulos falseados para “engañar” al módulo bajo 
comprobación al responder como si estuviera funcionando en un BIOS 
completo bajo CP/M. 

Utilizando la base de comprobación se puede comprobar cada parte de 
la lógica de los módulos excepto la parte que puede ser crítica en cuanto 
tiempo. Los problemas causados por el tiempo, tales como interrupciones 
inutilizadas por mucho tiempo o programas demasiado lentos o demasiado 
rápidos para un chip controlador periférico particular, tienden a mostrarse 
sólo cuando se está comprobando el hardware definitivo y cuando se está 
funcionando con un nuevo BIOS bajo CP/M. 









Lo que se debe comprobar en el BIOS 


Describir detalladamente cómo depurar cada módulo del BIOS llenaria 

varios volúmenes. Recuérdese que se está intentando establecer la ausencia 
de errores utilizando una técnica que, por su propia naturaleza, tiende a 
mostrar únicamente su presencia. 
Existen dos aproximaciones básicas a la depuración. Una es el método 
laborioso y de perseveración, controlando cada aspecto del programa para 
asegurarse de que todos los dispositivos trabajan realmente. El segundo es 
intentar hacer algo útil con el programa. 

Planifíquese para utilizar ambos. Comiéncese con el primer método, 
comprobando cada dispositivo bajo control de la base de comprobación 
hasta que se esté seguro de que está trabajando in vitro. Cuando todos los 
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módulos del BIOS se hayan comprobado individualmente, constrúyase un 
sistema CP/M e inténtese realizar algún trabajo útil con él. Inténtese utilizar 
el sistema para trabajos prácticos, comprobando in vitro lo que puede ser 
un buen control. 


Lista de control de características 


Hágase una lista de las características específicas incluidas en los 
distintos módulos BIOS. Entonces proyéctense secuencias de control 
específicas que muestren que cada una de ellas funciona correctamente. 

El mismo programa de base de comprobación puede comprobar a 
menudo todas las características de un módulo controlador. Si no es así, 
créese una nueva base de comprobación para las más exóticas. 

Manténganse las rutinas de base de comprobación. La experiencia 
demuestra que a menudo se necesitan poco después de haberlas borrado. 
Aun después de haber comprobado el BIOS, las rutinas de base de 
comprobación volverán fácilmente si se decide mejorar más tarde un 
controlador particular. El programa del controlador se puede extraer del 
BIOS, pegarlo a la base de comprobación y comprobar el nuevo programa 
aislado del BIOS. 

Las secciones siguientes muestran ejemplos de bases de comprobación 
para distintos controladores, junto con ejemplos de listas de control. Estas 
se utilizaron para comprobar las rutinas del BIOS ejemplarizado que se 
mostró en capítulos anteriores. 


Dispositivos de procesamiento de caracteres 


La figura 10-4 muestra el programa para una rutina de base de control 
ejemplo para controladores de entrada/salida de caracteres del BIOS. Este 
programa será seguido por los controladores de entrada/salida de caracteres, 
exactamente como aparecerían en el BIOS, salvo que todas las instrucciones 
IN y OUT serian reemplazadas de nuevo por las del RST 4 y 5 respectiva- 
mente (véase figura 10-2), de forma que se puedan introducir valores de 
entrada e inspeccionar valores de salida en la consola. 

Este ejemplo contiene el programa de inicialización para el paquete de 
depuración que se muestra en la figura 10-2 y el programa de preparación 
de un RST 6 utilizado para “falsear” interrupciones de caracteres de 
entrada. 

El bucle principal comprobado consiste en una interrupción falseada de 
carácter de entrada seguida de llamadas opcionales a CONIN o CONOUT, 
la devolución de control al DDT o un bucle para falsear otra interrupción 
de carácter. Unicamente se podrá devolver el control al DDT si se usa DDT 





380 CP/M Manual para programadores 








210101 
CODJO1 
3Eca 

323000 
210101 
223100 


ERA 
o1ccas 
11EEDD 
ZE 
E 


coD101 
ODOAAS$E7A 
4444542034 


coD101 
FEAS 
CA7201 
FEsa 
Aseo! 
FESF 
CA9101 
caro1 


a 
caror 


CoD101 
Car1o1 
COD101 


coD101 
02 
4DIFAEAAE 


c37201 


coD1o1 
CAL101 
COD101 
ar 

coD101 
caso 


9999999999 
9999999999 
9999999999 


TRUE EQU OFFFFN 
FALSE EQU NOT TRUE 
DEBUG EQU TRUE sara ensamblaje condicional de Las 
5 instrucciones AST en Lugar de Las IN 
7. y OUT en Los controladores 
RSTÉ EQU 30m ItiLización de RST 6 para simular interrupción 
por carácter de entrada 
ORG 100m 
START: 
XI SP,TestaStack ¿Utilización de una pila Local 
CALL DBRInAt ¿inicialización del paquete de depuración 
CT ¿Activar RST 6 con código de operación AMP 
STA RSTÓ 
EXI M,CharactersInterrupt jación de La dirección de JNP de RST 6 
SHD— RSTS +1 
1 Realizar repetitivamente entradas a La rutina de interrupción 
; de caracteres para asegurar que Los caracteres son Leídos 
; y almacenados en La memoria internedia de entrada 
TestbedsLoos: 
VI ALORAH ¿Fijación de registros a una configuración conocida 
EXI B/OBBCCM 
EXI D/ODDEEH 
EXI HEOFRIAH 
RT 6 simulación de interrupción por carácter de entrada 
CALL DBRMSOL ¿Visualización de mensaje en-Linea 
De ODM, OAH, “Enter 1'to Input Char., O to Output, Dto enter 
De “DDT + 0 
CALL DBSCONIN 1Obtención de carácter en mayúscula 
ee ta? FCONIN? 
yz GOSCONIN 
cer Ds 1DDr7 
37 GosDDT 
cer sos ¿CONOUT? 
wa GOSCONOUT. 
uMP O Testbedsloop — ¿Vuelta atrás para nueva interrupción 
GosDDT: 
ASI 7 ¡Entrada al DDT CAST 7 activada por DOT) 
JM? TestbedsLoop 
GOSCONIN: 
CALL CONST ¡obtención del estado de La consola 
ye TestbedsLoop — ¿No hay datos esperando 
CALL CONIN ¿Obtención de datos de La memoria intermedia 
CALL DBsDisplay Visualización del carácter devuelto en el 
De DBSA registro A 
De “CONIN returned”,0 
ÚMP O OOSCONIN ¿Repetir el bucle CONIN hasta que no queden 
5 caracteres esperando 
1 
GOSCONOUT+ 
CALL CONST ¿Obtención del estado de La consola 
wa TestbedéLoop — ¿No hay datos a La espera 
CALL CONIN 
moy CA ¿Preparado para salida 
CALL CONOUT ¿salida a La consola 
ÁMP O GOSCONOUT ¿Repetir mientras hayan datos 
, 
De 9999H, 9999, 9999H, 9999H, 9999H, 9999H, 9999H, 9999 
De 7999H, 9999, 9999H, 9999H, 9999H, 9999H, 99994, 9999H 
De 9999, 9999H, 9999H, 9999, 9999H, 9999H, 9999H, 9999H 





Base de test para controladores de E/S de caracteres en el BIOS 





El fichero fuente completo consiste en tres corponentes: 


1. El prograna propiamente dicho que se muestra aquí. 
2. Los controladores de E/S de caracteres destinados al BIOS. 
3. El paquete de programas de depuración mostrado en La figura 10-2, 












































3 








Figura 10-4. Base de comprobación para controladores de entrada/salida de caracteres del BIOS. 
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TesteStacio 


: Rutinas ficticias de aquellas mostradas en otras figuras 
, Rutinas del BIOS (figura 8-10) 


CONST+ ¿BIOS estado de consola, 

CONINE ¿BIOS entrada de consola 

CONOUT: ¿BIOS salida de consola 

Charactersinterrupti — ¿Rutina de servicio de interrupción para caracteres de entrada 
5 Rutinas de depuración (figura 10-2) 

; 

DeSImits ;Inicialización de depuración 

DEMO ¿Visualización de mensaje en-Linea 

DBSCONINU: ¿Obtención de carácter del teclado en mayúscula 
DBSDAspLay ¿Rutina principal de visualización de depuración 
DBSA EQU ¿Programa de visualización, DBSDisplay 





Figura 10-4, 


(Continuación.) 


para cargar la base de comprobación y los programas de control en primer 
lugar. La ejecución de un RST 7 sin utilizar DDT provocará una caida del 
sistema, porque el DDT fija la instrucción JMP necesaria en la posición 
0038H de la página base. 

La interrupción de carácter de entrada falseada transfiere el control 
directamente a la rutina de servicio de intetrupción del BIOS (véase el 
ejemplo de la figura 8-10, línea 04902, etiqueta Character$Interrupt). Esta 
lee los puertos de estado de cada uno de los dispositivos de caracteres; se 
pueden introducir los valores del byte de estado específicos que se deseen. Si 
se introduce un valor que indique que un carácter de datos está “entrando”, 
el valor de 8 bits avisará que está “entrado”. Se puede hacer que aparezca la 
rutina de servicio de interrupción como caracteres de entrada y amontonar 
caracteres en la memoria intermedia de entrada. Para fines de depuración, 
redúzcase el tamaño de la memoria intermedia de entrada a ocho bytes. El 
hacerla mayor significa que habrá que introducir más caracteres para 
comprobar la lógica umbral de la memoria. Para comprobar la rutina de 
servicio de interrupción, se pasará a través del bucle de base de comproba- 
ción principal no haciendo otra cosa que falsear las interrupciones de 
caracteres de entrada e introducir valores de estado y datos. Los caracteres 
de datos se amontonarán entonces en la memoria de entrada. 

Para comprobar el funcionamiento correcto de las rutinas de servicio de 
interrupción, se puede permanecer en control con el DDT desde la salida. 
Alternativamente se puede utilizar sólo el DDT para cargar el fichero HEX 
de base de comprobación haciendo un bucle, introduciendo algunos carac- 
teres y después solicitar que la base de comprobación devuelva el control al 
DDT. Entonces se puede utilizar éste para inspeccionar los contenidos de la 
tabla(s) de dispositivo y las memorias intermedias de entrada. 

Otra posibilidad es crear rutinas de depuración que compongan los 
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Lista de 












contenidos de la tabla de dispositivos en una forma significativa, con 
campo titulado de la forma siguiente: 


DEVICE TABLE O 


Status Port 81 Data Port 80 
Output Ready 01 Input Ready 02 
DTR high 40 


Reset Int. Prt D8 Reset Int. Val. 20 


Status Byte 1 
Output Suspended 
Output Xon Enabled 


Buffer Base DEBC 

Put Offset os Get Offset or 
Char. Count 04 Control Count 00 
Data Buffer 

41 42 43 44 45 00 00 00 


Esta rutina de tabla de dispositivos requerirá gran cantidad de esfuerzo 
de programación y depuración —pero será rentable—. Se puede obtener 
una instantánea de la tabla de dispositivos sin tener que decodificar 
vaciados de memoria hexadecimal ni bits individuales. Los valores constan- 
tes de las tablas de dispositivos también se visualizan, de forma que si un 
error de programa contamina la tabla, se sabrá inmediatamente. 

La próxima sección presenta ejemplos de las comprobaciones especificas 
que es preciso realizar, junto con una descripción de la estrategia que se 
puede utilizar. 






control de la rutina de servicio de interrupción En un BIOS en fun- 
cionamiento, el control se transfiere al módulo de servicio interruptor 
siempre que un carácter entrante produce una interrupción. En el BIOS del 
ejemplo de la figura 8-10 (línea 4900), el programa examina cada dispositi- 
vo por turno para determinar cuál de ellos causa la interrupción. 

Cuando se está depurando la rutina de servicio de interrupción utilizan- 
do instrucciones de entrada/salida “falseadas”, habrá que introducir valores 
de byte de estado especificos. Consúltense las declaraciones de la tabla de 
dispositivos de la figura 8-10, línea 1500, para determinar qué valores han 
de introducirse para hacer que la rutina de servicio piense que está llegando 
un carácter de entrada o que el terminal de datos preparado (DTR) es alto o 
bajo. 

Póngase en marcha el proceso de depuración utilizando la primera tabla 
de dispositivo. Repítanse entonces las comprobaciones en las otras tablas de 
dispositivo. 

Lo que sigue a continuación es una lista de comprobación de caracteris- 
ticas y aspectos que han de ser comprobados al depurar la rutina de servicio 
de interrupción: 
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¿Están todos los registros almacenados de nuevo correctamente a la salida 
del servicio de interrupción? 


Utilizando el DDT, empiécese a ejecutar desde el principio la 
base de comprobación. Fijese un punto de ruptura (con la orden 
'G100,nnnn) para obtener la devolución del control inmediatamente 
antes del CALL Character$Interrupt. Utilicese la orden X para vi- 
sualizar todos los registros, y entonces, utilizando la orden G,nnmn, 
se fija un punto de ruptura en la instrucción que sigue inmediata- 
mente al CALL Character$Interrupt. Los controladores de carácter 
avisarán de los valores de estado. Introdúzcase 00 (que indica que no 
está introduciéndose ningún carácter). Visualicense los registros 
nuevamente —sus valores deberian ser los mismos—. Recuérdese 
comprobar el valor del indicador de pista y del total del área de 
pistas que ya se ha usado. 

NOTA: No debe sorprender demasiado si se pierde el control de la 
máquina cuando se intenta comprobar por primera vez. Al principio 
se cometen errores lógicos fundamentales. Si el sistema cae, hay que 
ponerlo a cero, volver a cargar el CP/M, y entonces comenzar de 
nuevo la comprobación. Esta vez, mejor que fijar el segundo punto 
de ruptura en la instrucción que sigue al CALL CharacterSInterrupt, 
hay que aventurarse en el programa de CharacterSInterrupt, y, 
yendo a través de él con pocas instrucciones a la vez, ir fijando 
puntos de ruptura antes de cualquier instrucción que pueda provocar 
una transferencia de control. Calcular hasta dónde se ha llegado en 
el controlador antes de que salte fuera o se sitúe en un bucle. 


¿La rutina de servicio introduce en la pila un número significativo de bytes 
después de haberse producido una interrupción? 


Cuando se devuelve el control después del CALL CharacterSInte- 
rrupt, utilícese la orden D (volcado) para volcar la memoria del área 
de pista en la consola. Contrólese hasta dónde se ha descendido en la 
pila buscando el punto donde las constantes que acostumbraban 
llenar el área de pila se han llenado con otros datos escritos sobre 
ellas. 

El BIOS del ejemplo de la figura 8-10 salva sólo los contenidos 
del par de registros HL en la pila de preinterrupción. Conecta en- 
tonces a una pila de BIOS particular para salvar los contenidos del 
resto de los registros y servir la interrupción. 


¿Se han añadido correctamente los caracteres de datos a la memoria 
intermedia de entrada? 


“Introdúzcase” un carácter que no sea de control por medio de la 
rutina Character$Interrupt. Contrólense entonces los contenidos de 
la tabla de dispositivo adecuada. La cuenta de caracteres y el 
desplazamiento de puesta deberán ponerse a uno. Compruébense 
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entonces los contenidos de la propia memoria intermedia de ent 
da; ¿contiene el carácter que se “introdujo”? 


¿Se han añadido correctamente los caracteres de control a la me 
intermedia de entrada: 

“Introdúzcase” un carácter de control tal como 01H. No del 
utilizarse ETX, ACK, XON O XOFF (03H, 06H, 11H y 13H, respectiva 
mente); éstos pueden causar efectos secundarios si se present 
errores en la lógica de manejo del protocolo. Compruébese que el 
carácter esté almacenado en el próximo byte de memoria intermedia 
de entrada y que los contadores de caracteres y de control están 
puestos a dos y uno, respectivamente. El desplazamiento de puesta 
deberá ser puesto también a dos. 


Cuando el umbral de llenado de la memoria de entrada se ha alcanzado, 
¿envía el controlador el carácter de protocolo correcto? 

Colóquese el primer byte de estado en la primera tabla de 
dispositivo para activar la entrada del protocolo XON O RTS, 0 
ambos. Luego hay que ir alrededor del bucle de la base de compro- 
bación principal colocando caracteres en la memoria intermedia de 
entrada. Contrólense los valores visualizados en la consola para ver 
si los controladores envían los valores correctos cuando la memoria 
intermedia está casi llena (umbral por defecto cuando quedan cinco 
bytes). El controlador debería bajar entonces la linea RTS o enviar un 
carácter XOFF o ambas cosas, según el protocolo de entrada que se 
haya activado. 





Cuando la memoria intermedia de entrada está completamente llena, 

¿responde el controlador correctamente? 

Esto es una extensión de la comprobación anterior. Introdúzcase 

un carácter más de los que se pueden encajar en la memoria 

intermedia. Compruébese para ver que los controladores no acumu- 

lan el carácter en la memoria intermedia de entrada y que un 
carácter BELL (07H) se envía al puerto de datos. 


¿Los caracteres de protocolo XON/XOFF son reconocidos y los indicadores 
de control necesarios fijados o puestos a cero? 

Vuélvanse a cargar la base de comprobación y los controladores, 
Fíjese el byte de estado para facilitar la salida del protocolo 
XON/XOFF. Usese entonces la rutina CharacterSInterrupt para intro- 
ducir un carácter XOFF (13H). Compruébese para ver si el carácter 
XOFF no se ha situado en la memoria de entrada. En lugar de ello, el 
byte de estado ha de activarse para indicar que la salida ha sido 
suspendida. 

Introducir un XON y comprobar para ver si el indicador de salida 
suspendida ha sido puesto a cero. 
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¿Detecta el controlador y pone a cero los errores de hardware correcta- 
mente? 
Procédase como si se fuera a introducir un carácter en la 
memoria intermedia de entrada, pero en su lugar introdúzcase un 
valor de byte de estado que indique que ha ocurrido un error de 


hardware (introdúzcase el valor dado en la tabla de dispositivo para 
DTSDetect$Error$Value). 

Compruébese que el controlador detecta el estado de error y 
envía el valor correcto de puesta a cero del error al puerto de control 
adecuado. 


Lista de control de rutina de servicio de no interrupción En un BIOS “vi- 
viente”, las rutinas de servicio de no interrupción son accesibles por medio 
de los puntos de entrada de CONIN y de CONST en el vector de saltos del 
BIOS. Durante la depuración, la base de comprobación puede llamar al 
programa CONIN y a CONST directamente. 








¿Funciona el redireccionamiento de entrada? ¿Llega el control al controla- 
dor con la tabla de dispositivo correctamente seleccionada? 

Esto es lo que mejor se comprueba directamente con el DDT. 
Utilicese la orden Gnnnn,bbbb para transferir el control al progra- 
ma CONIN con un punto de ruptura en la instrucción RET al final 
de la rutina Select$Device$Table (véase figura 8-10, línea 04400). 
Compruébese que el par de registros DE esté señalando a la tabla de 
dispositivo 0. Si no es asi, habrá que volver a comenzar la prueba. 
Utilicese la orden Tn para obtener la traza de DDT a través de la 
subrutina Select$Device$Table para encontrar el error. 





¿Vuelven los caracteres correctamente desde la memoria intermedia? 
Utilicese la base de comprobación para “introducir” un carácter 
o dos. Utilicese entonces la base de comprobación para realizar 
algunas entradas en CONIN. Compruébense los caracteres devueltos 
por la memoria intermedia. 


¿Están las cantidades de caracteres de datos y de caracteres de control 
correctamente decrementadas? 

Después de que cada carácter haya sido trasladado desde la 
memoria intermedia por CONIN, utilícese el DDT para examinar la 
tabla de dispositivos y compruébese que las cantidades de caracteres 
de datos y de caracteres de control se han decrementado correcta- 
mente. Compruébese también que el apuntador de obtención ha 
trasladado hacia arriba la memoria intermedia de entrada. 
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Cuando la memoria intermedia alcanza el umbral de “casi vacia”, ¿ 
el controlador el carácter de protocolo correcto o manipula correct 
la petición para enviar linea (RTS)? 

Utilicese el DDT para activar la entrada de protocolos RTS o 
o ambos. Entonces introdúzcanse caracteres en la memoria in 
dia de entrada hasta que alcance el umbral de llenado (por deft 
cuando sólo quedan cinco bytes de repuesto). Confírmese que 
lleva a cabo el proceso de “memoria intermedia casi lleng 
Entonces háganse llamadas repetitivas a CONIN para hacer que 
datos fluyan fuera de la memoria intermedia. Compruébese que 
proceso de “vaciado de memoria” ocurre cuando se alcanza 
umbral correcto. Para el protocolo RTS, el controlador deberá envi 
un valor elevado de RTS al puerto de control RTS especificado. 
XON, el controlador deberá enviar un carácter XON al puerto 
datos (después de haber leído el puerto de estado para asegurarse 
que el hardware puede enviar el carácter). 

























¿Maneja el controlador el “enrollamiento” de la memoria intermedia 
correctamente? 
Introdúzcanse caracteres en la memoria intermedia de entrada 
hasta que esté completamente llena. Realícese entonces una sola 
llamada CONIN para desplazar el primer carácter de la memoria 
intermedia. A continuación introdúzcase un carácter más en ella, 
Compruébese que el apuntador de obtención está puesto a uno y el 
de colocación puesto a cero. 
A continuación háganse llamadas sucesivas CONIN para vaciar 
la memoria intermedia. Introdúzcase entonces un carácter más y 
compruébese que este último carácter está situado en el primer byte 

de la memoria intermedia de entrada. 


¿Puede manejar el controlador la “entrada forzada” correctamente? 
Utilizando el DDT, fíjese el apuntador de entrada forzada para 
que indique a una cadena terminada en byte 00; por ejemplo, 
utilícese una de las cadenas de decodificación de tecla de función por 
defecto. (En la figura 8-10, el apuntador de entrada forzada está 
inicializado para apuntar a una “cadena de arranque” —declarada 
al principio del bloque de configuración en la línea 00400.) 
Utilizando el DDT, llámese la rutina CONST y compruébese que 
vuelve con A=0FFH (indicando que parece ser que hay datos de 
entrada esperando). 
Háganse llamadas sucesivas a CONIN y confirmese que los bytes 
de datos de la cadena de entrada forzada han vuelto. Compruébese 
que el forzamiento de entrada termina cuando se detecta el byte 
00H. 
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¿Opera correctamente la rutina de estado de consola cuando comprueba 
caracteres de datos en la memoria intermedia, caracteres de control en la 
misma y entrada forzada? 


Introdúzcase un carácter único que no sea de control, tal como 
41H, dentro de la memoria intermedia de entrada. Utilizando el 
DDT, compruébese que el segundo byte de estado en la tabla de 
dispositivo tiene el indicador falseado de mecanografiado en avance 
puesto a cero. Llámese a la rutina CONST —deberá volver con 
A=0FFH (lo que quiere decir que hay datos en la memoria 
intermedia) —. Entonces póngase a uno el bit de mecanografiado en 
avance falseado en el segundo byte de estado y llámese de nuevo 
CONST. Deberá volver con A=00H (significando que ahora “no 
hay datos” en la memoria). Introdúzcase un solo carácter de control 
en la memoria intermedia. Ahora CONST deberá volver con 
A=0FFH porque hay un carácter de control. 


¿Reconoce el controlador secuencias de escape introducidas desde las 
teclas de función del teclado? 


Esta es una de las caracteristicas difícil de controlar cuando no 
está funcionando la rutina de reloj de tiempo real. El controlador 
utiliza el temporizador-centinela para esperar hasta que todos los ca- 
racteres de la secuencia de escape hayan llegado. Sin embargo, 
habrá que modificar el programa CONIN de forma que el tem- 
porizador-centinela aparezca para cronometrar inmediatamente, 
en vez de esperar el tic-tac del reloj de tiempo real. Para realizar 
este cambio, consúltese la figura 8-10, linea 2200; es el principio de 
la rutina CONIN. Búsquese la etiqueta CONINSWaitSForSDelay. 
Después de algunas instrucciones hay un JNZ CONINSWait$For$S- 
Delay. Utilizando el DDT, póngase a 00H los tres bytes de 
este INZ. 

Entonces, utilizando la base de comprobación, introdúzcase la 
secuencia de escape completa en la memoria intermedia de entrada. 
Por ejemplo, introdúzcanse los valores hexadecimales 1B, 4F, 51 
(ESCAPE, O, P), que corresponden a los caracteres emitidos en un 
terminal VT-100 cuando se pulsa FUNCTION KEY 1 (PFI). 

A continuación utilícese la base de comprobación para realizar 
llamadas sucesivas a CONIN. Deberá verse el texto asociado con la 
tecla de función (FUNCTION KEY 1, LINE FEED) que son devueltos 
por CONIN. 

Repítase esta prueba utilizando diferentes secuencias de teclas de 
función, incluyendo una secuencia que no corresponde a ninguna de 
las teclas de función prefijadas. Compruébese que la propia secuen- 
cia de escape sea devuelta por CONIN sin ser cambiada por otra 
cadena. 
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Lista de control de salida de caracteres ¿Puede el controlador enviar un caráct 







¿Puede el controlador ver la diferencia entre una tecla de función y 
misma secuencia de escape generada a golpes de tecla discretos? 

Esta comprobación es casi igual que la anterior. Hágase el mis 
añadido al programa CONIN, sólo que esta vez no se debe int 
ducir la secuencia de escape completa en la memoria. Introdú 
sólo los caracteres hex 1B y 4F. Asegúrense de que la rutina CO! 
no coloca otra cadena en lugar de esta secuencia de casi esca 

Esta comprobación imita únicamente los resultados de 
introducciones manuales de una secuencia de escape. No se 
pulsar las teclas de un terminal a velocidad suficiente como 
obtener los tres caracteres en la memoria intermedia de en 
dentro del tiempo permitido por el centinela. 




























La opción CONOUT de la base de comprobación llama 
CONIN en primer lugar para obtener un carácter. Para em 
habrá que querer utilizar el DDT para fijar en el registro C al 
carácter gráfico ASCII, tal como 41H (A), y transferir el cont 
directamente a CONOUT. Compruébese que éste lee el estado de 
USART, espera el valor de salida preparada y envía entonces 
datos al puerto de datos. Obsérvese que la base de comprob: il 
enviará todos los caracteres que esperan en la memoria intermedi 
de entrada (o entrada forzada) cuando se selecciona su opció 
CONOUT. Esto es muy conveniente para el control avanzado de 
controladores —para comprobaciones iniciales puede quererse m 
dificar la base de comprobación para hacer sólo una llamada 
CONIN y a CONQUT y entonces volver al principio del bucle de 
base de comprobación. 









¿Suspende el controlador la salida cuando el indicador de control de 
protocolo indica que la salida ha de suspenderse? 

Utilizando el DDT, colóquese el byte de estado de la tabla de 
dispositivo para activar el protocolo de salida XON/XOFF. Introdiz- 
case entonces un carácter XOFF y confíirmese que el bit de salida 
suspendida del byte de estado está fijado. Enviese un solo carácter 
y, utilizando el DDT, confirmese que el controlador se quedará en 
un bucle de estado esperando que el bit de salida suspendida sea 
borrado. Bórrese el bit utilizando el DDT y compruébese que el 
carácter se ha enviado correctamente. 


Cuando se utiliza el protocolo ETX/ACK, ¿envía el controlador un ETX 

después de que ha sido enviado el número especificado de caracteres, 
indicando entonces que se ha suspendido la salida? 

Con fines de depuración, altérese el valor de la cuenta de mensaje 

ETX de la tabla de dispositivos a tres bytes. Enviense entonces tres 


¿Funciona correctamente cada uno de los procesadores de 
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bytes de datos por medio de CONOUT. Compruébese que el 
controlador envia un carácter ETX (03H) después de que los tres 
bytes hayan sido enviados y que el indicador de salida suspendida 
del byte de estado haya sido fijado. 

Introdúzcase entonces un carácter ACK (06H). Compruébese que 
este carácter no esté almacenado en la memoria intermedia de 
entrada y que el indicador de salida suspendida se ha borrado. 


¿Reconoce y envía el controlador secuencias de escape? 


Introdúzcase un ESCAPE, “t” (IBH, 74H), en la memoria interme- 
dia de entrada. Enviense entonces por medio de CONOUT. Utilizan- 
do el DDT, compruébese que la rutina CONOUT reconoce que una 
secuencia de escape está siendo enviada y que selecciona la rutina de 
procesamiento correcta. En este caso, el apuntador de entrada 
forzada deberá ponerse apuntando a la hora del día en ASCII del 
bloque de configuración. 


ecuencias de 
os utilizando 








? ¿Se pueden fijar la hora y la fecha en valores especif 
secuencias de escape? 

Repitase la prueba anterior utilizando todas las demás secuencias 
de escape para asegurarse de que pueden ser reconocidas y que 
funcionan correctamente. 





Rutinas de reloj de tiempo real 


Un programa de base de comprobación separado, que se muestra en la 
figura 10-5, se utiliza para comprobar estas rutinas. Llama a la rutina de 
servicio de interrupción directamente para simular un “tic-tac” del reloj de 
tiempo real, y compone entonces la hora del día en ASCII en la consola. 

Como puede verse, la base de comprobación hace una llamada a la 
rutina de inicialización del paquete de programas de depuración, DBSInit, y 
entonces utiliza un RTS 6 para generar “tic-tacs” de reloj falseados. 

Hay una instrucción JMP en la base de comprobación que omite una 
llamada a Set$Watchdog. Trasládese este JMP bien editándolo o utilizando 
el DDT para cambiarlo por NO OPERATION (NOP, 00H) cuando se esté 
dispuesto a comprobar las rutinas de centinela. 


Lista de control para comprobación del reloj de tiempo real ¿Está funcionan- 
do el reloj? 


Utilizando el DDT, escudriñese a través de la lógica de la rutina 
de servicio de interrupción. Compruébese que los segundos estén 
actualizándose. 
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7 Base de test para controlador de reloj de tiempo real en 
1 
, El fichero fuente completo consiste en tres componentes: 
y 
1 1. El programa propiamente dicho que se muestra aquí. 
, 2. Los controladores de E/S de caracteres destinados al BIOS. 
1 3. El paquete de programas de depuración mostrado en La figura 10-2. 
Y 
FEFR < TRUE EQU OFFFFM 
0000 FALSE EQU NOT TRUE 
FEFF + DEBUO EQU TRUE ¡Para ensamblaje condicional de Las 
% instrucciones RST en Lugar de las IN 
7 y OUT en Los controladores 
0030 = RST EQU 30%m ¿utilización de RST 6 para simular un pulso de reloj 
0100 ORO 100m 
START: 
0100 318801 LXI O SP,TesteStack — ¡Utilización de una pila Local 
0103 COSBO1 CALL DBRINit ¿Inicial ización del paquete de depuración JP 
0106 3EC3 MI Ae ¿Fijación de La dirección de JMP de RST 6 
0108 323000 STA RST6 
0108 218801 UXI — M,RTOSInterrupt ¡Activar dirección de JMP RST 6 
OLOE 223100 SHD RST6 + 1 
0111 C31D01 JP Testbedeloop — 1Cmm=Quitar este JMP cuando se esté preparado para 
+ comprobación de Las rutinas de tempor izador-centinela 
0114 013200 1x1 B,50 0 pulsos antes de dar tiempo excedido 
0117 214201 LXT M/MDsTimeout — ¿Dirección para transferencia 
OLA CDSBO1 CALL SetsWatehdog — ¿Activación de temporizador-centinela 
, 
Realizar entradas repetidas a La rutína de interrupción RTC 
para asegurar que el reloj está actualizado correctamente 
TestbedeLoop1 
O11D 3EAA mur ¡Fijación de registros a una configuración conocida 
OIF 01CCB8 113 
0122 11EEDD La 
0125 2111FF Da 
0128 F7 RT ¿Simulación de reloj de interrupción 
0129 CDSBO1 CALL DBeMSOL ¿Visualización de mensaje en-Linea 
O12C 426C6F6I6B De “Clock =",0 


0134 218901 LXI MH, TimesInsAscII ¡Obtención de dirección de reloj en controlador 
0137 CD8BO1 CALL DBsmSO ¿Visualización de valor de reloj en curso 
Í (Mota: TimeSINSASCIL contiene 
Í ya un salto de Línea) 
¿visualización de mensaje en-Linea 
letorno de carro 


O13A CDSBO1 CALL DBeMSOL 
0130 0000. oe 004,0 














OL3F C31DOL AMP TestbediLoop 
, 
, El control Llega a este punto cuando el temporizador-centinela 
, da tiempo excedido 
MDsTimecuti 
0142 CDSBO1 CALL DBSMSOL 
0145 ODOAS76174 De ODM, OAM, “Matchdog timed out”.0 
DISA C9. Rer - Retorno a La rutina centinela 
0158 9999999999 oy 9999, 9999H, 9999H, 9999H, 9999H, 9999H, 9999H, 9999H 
OIB 9999999999 py 9999H, 9999H, 9999H, 9999H, 9999H, 9999H, 9999H, 9999H 
178 9999999999, De 9999H, 9999, 9999H, 9999H, 9999H, 9999H, 9999H, 9999H 
TesteStacks 
; 
' Rutinas ficticias de aquellas mostradas en otras figuras 
1 
; Rutinas del BIOS (Figura 8-10) 
1 
RICSINterrupte ¿Rutina de servicio de interrupción para pulso de reloj 
Set sMatchdog: ¿Fijación de tempor izador-centinela 
Times InsASCI Io ¿Cadena ASCII de HH:MN:SS, LF, O 
, Rutinas de depuración (Figura 10-2) 
DesImáte 


Figura 10-5. Base de comprobación para el controlador de reloj de tiempo real del BIOS. 
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¿Se transfieren correctamente las horas, los minutos y los segundos? 

Déjese correr a toda velocidad el programa de la base de 

comprobación. Debería verse la hora actualizándose en la pantalla 

de la consola —aunque puede ser actualizada mucho más rápida- 
mente que en tiempo real. 

Utilicese el DDT para fijar los minutos a 58 y entonces déjese 
correr de nuevo el reloj. ¿Señala la hora correctamente y pone los 
minutos a 00? Entonces fíjense las horas a 11 y los minutos a 58 y 
déjese correr el reloj. ¿Se convierten los minutos en horas y se ponen 
éstas de nuevo a 0? 

Repítanse estas pruebas con las constantes de actualización del 
reloj fijadas para formato de 24 horas. 


¿La rutina de servicio de interrupción de reloj almacena de nuevo los 
registros correctamente? 
Utilizando el DDT, compruébese que los registros estén fijados 
aun correctamente al retorno de la rutina de servicio de interrupción 
del reloj. 


¿Cuánta carga impone la rutina de servicio en la pila de preinterrupción? 
Compruébese el “indicador de nivel” de los valores prefijados 

que quedan en el área de pila de la base de comprobación para ver 
cuánta carga impone a la pila la rutina de servicio de interrupción. 


¿Puede fijarse el temporizador-centinela a un valor distinto a cero? ¿Puede 
volverse a poner a cero? 
Utilizando la segunda parte de la base de comprobación, llámese 
a la rutina SetSWatchdog y compruébese entonces la ejecución de la 
base de comprobación cuando el cronómetro centinela está funcio- 
nando. Compruébese que los registros y el apuntador de pila están 
situados correctamente cuando se transfiere el control a la rutina de 
tiempo excedido. Compruébese también que se devuelve el control 
adecuadamente desde esta rutina y desde la rutina de servicio de 
interrupción. 


Controladores de disco 


Sólo es factible comprobar los controladores de disco de bajo nivel 
aislados de un BIOS real, porque la interfase del BDOS con el programa de 
desbloqueo es muy difícil de simular. La base de comprobación que se 
muestra en la figura 10-6 sirve únicamente para ganar tiempo. No 
comprueba la interfase de las subrutinas. Utilicese el DDT para fijar los 
números de disco, pista y sector y entonces compruébense las llamadas en 
SELDSK, SETTRK, SETSEC, SETDMA y las rutinas de lectura/escritura. 
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Base de test para controladores de E/S de disco en el B10S 









































1 El fichero fuente completo consiste en tres componentes: 
1 1. El programa propiamente dicho que se muestra aquí. 
ñ 2: Los controladores de E/S de caracteres destinados al BIOS. 
A 3. El paquete de programas de depuración mostrado en la figura 10-2 
TRUE EQU OFFFFN 
FALSE EQU NOT TRUE 
DEBUG EQU TRUE ¡Para ensamblaje condicional de las 
3 instrucciones RST en Lugar de Las IN 
3 y OUT en Los controladores 
ORO 10m 
START: 
0100 314708 LXI SP,TesteStack ¡Utilización de una pila Local 
0103 CD4704 CALL DBRInit ¿Inicialización del paquete de depuración 
1 Realización de Llamadas a SELDSK, SETTRK, SETSEC y SETDMA 
1 y después a una rutina de lectura o escrítura 
, 
TestbedsLoop! 
0106 314708 LAI SP,TestaStack ¡Utilización de pila Local 
0109 3A1202 LOA LogícalsDisk — ¿Fijación para Llamada a SELOSK 
D1OC ar moy CA 
010D Cba704 CALL SÉLOSK 
0119 Cb4704 CALL DBeDisplay ¿Visualización de valor de retorno en ML 
0113 14 De Des 
0114 534sac4asa De “SELDSK returned”,0 
0124 223201 SHLD DPMeStart ¿Activación para visualizar cabecera de paránetros de disco 
0127 111000 XI D,16 ¿Cálculo de dirección de finalización 
0124 19 DAD 0, 
0128 223401 SHO DPHSEnd: ¿Almacenamiento en Llamada de depuración 
012€ CD4704 CALL DBsDisplay 
0131 18 De Das 
DPHeStarti 
0132 0000 De o ' 
DPHsEnd: 
0134 0000 pu o 
0136 53656C6D63 DB “Selected DPH",O 
0143 2A1302 LMLD Track ¿Llanada SETTRK 
0146 ES PU 
0147 1 Por E ¿SETTAK necesita pista en BC 
0148 CD4704 CALL SETTRK 
0148 3AL5O2 LOA Sector ¡Llamada a SETSEC 
OLE AF CO ¿SETSEC necesita sector en € 
OJAF CD4704 CALL SÉTSEC 
0192 011702 LXI O B,TesteButter ¡Fijación de dirección de DMA 
0135 CD4704 CALL SÉTDMA 
0158 3A1602 LDA ¿Comprobación de Lectura o escritura 
0158 87 ORA 
O15C C2D101 INT arite 
O1SF CD4704 CALL ¿ver o ReadsPhysical dependiendo del controlador 
Fvex que se está comprobando, 
0162 CD4704 CALL ¿Visualización de código de retorno 
0165 02 De 
0166 5465737420 De “Test Read returned”,0 
0179 CD0102 CALL ChecksRipple — ¡Comprobación de configuración correcta en mem. int. 
O17C CAO601 Y Te o0p — ¿Si, correcta 
017F C04704 CALL ¿Indicar problemas 
0182 14 De Visualización de ML (apunta al byte incorrecto) 
0183 5269707060 Da “Ripple pattern incorrect. HL => farlure. 0 
DIAC CD4704 CALL DBsDisplay ¿Visualización de memoria intermedia de test 
OLAF CD1800 CALL 
0182 1702 4) 





Das ¿Memoria 
TestsBur fer 





Figura 10-6. Base de comprobación para controladores de entrada/salida de disco en el BIOS. 
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orBa 0002 ABUIferéSize 
DIBS 826FSE7A65 “Contents of TesteBuffer”,0 


DICE C30601 TestbedéLoop 


o101 COF201 Far a 
OLD4 CD4704 E lincabgo1actÍtes o con Ur Ntesthyaical dependiendo de cuáles 
¿rex sean Las unidades comprobadas 


0107 cD4704 DBsDisplay ¿Visualización código de retorno 
OLDA 02 DB DESA 
OL0B 5465737420 De "Test Write returned”,0 


OLEF C30601 nd tbedsLoop 


FstiéRipple: ¡Llenado de La menoría intermedia de test con 
5 una configuración de bits formada poniendo 
ER da byte Los 8 bits menos significativos 
% de la dirección de Los bytes 
910002 Lx Buf ferssióe 
211702 Du temer 
FRsLocps 
75 moy ¿Fijar valor de La configuración en La menoría intermedia 
23 1NX ¿Actualización de apuntador a memoria intermedia 
08 DCx jecrementar contador 
79 moy ¿Comprobación de contador a cero 
Bo ORA 
careor INZ ¿Repetición hasta cero 
0 RT 
1 
Checksñipp1 ¿Comprobación de sí La menoria intermedia se ha 
Llenado con La configuración correcta. 
Retorno con estado O sí es cierto, 
estado distinto de cero si es incorrecta. 
7 HL apunta al byte incorrecto 
Cue será = 1) 
910002 XI B,TesteBuffersSize 
211702 EXI Mi TesteBuffer 
CRsLoops 
70 moy ¿Obtención valor correcto 
ES Cm ¿Comparación con contenido menoría intermedia 
E nz ¿No Sofneidencia, distinto de cero ya indicado 
E ma ¿Actualización añuntador a nenoria intermedia 


73 mov ¿Comprobación contador a cero 
Bo. ORA 


20702 ÚNZ O tepetición hasta O 
cs Rer indicador de cero estará activo 


Testbed variabl! 


LogicalsDisks DB FAO) Bl 

Tracks De ¡Número de pista 

Sector: Da ¡Número de sector 

WritesDiski o DB FNZ a escribir en disco 
TestáButfersSize EQU 512 ptmm= Distinto del necesario 
TestaBurters DS TestaBulfersSize 


; 

29999999999 E 9999H, 9999H, 9999, 9999, 9999H, 9999H, 9999H, 9999 

9999999999 E] 9999, 9999H, 9999, 9999H, 9999H, 9999H, 9999H, 9999H 

9999999999 E 9979, 9999H, 9999H, 9999H, 9999H, 9999H, 9999H, 9999H 
TestáStacke 


Rutinas ficticias de Las mostradas en otras figuras 


Rutinas del B1OS (figura 8-10) 
SeLOSKs ¿Selección de disco lógico 
SETAS Fijación número de pista 
SerSECI ¿fijación núnero de sector 
SETOMAS ¿Fijación de dirección de DMA 
ReacenosDeb Lock ¿controlador rutinas de Lectura 
ReadoPhysicals 

Uri tesnosDebIGckt ¿Controlador rutinas de escritura 
WratesPnysicals 








Figura 10-6.. (Continuación.) 
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Rutinas de depuración (figura 10-2) 





, 
DBSINits ¿Ipicialización de depuración 
ua 







5 pl 
¿Visualización de códigos para DBSDisplay 







Figura 10-6. (Continuación.) 


A menos de que se tenga el mismo controlador de disco en el sistema 
desarrollo como se tiene en la máquina final, habrá que utilizar el sis 
de entrada/salida falseado descrito anteriormente en este capítulo, mej 
que intentar leer y escribir en discos reales. 

Como puede verse, la base de comprobación, después de inicializar 
paquete de depuración, realiza llamadas a SELDSK, SETTRK, SETSEC y 
SETDMA. Entonces llama una rutina de lectura o de escritura de bajo 
nivel. La rutina de bajo nivel llamada depende del controlador que se desee 
depurar. Para el controlador de disquetes estándar que se muestra en la 
figura 8-10, utilícese Read$No$Deblock y Write$No$Deblock. Para los dis. 
quetes de 5 1/4 pulgadas, utilícese Read$Physical y Write$Physical. Habrá 
de utilizarse el DDT para fijar algunas de las variables requeridas por los 
controladores de bajo nivel que normalmente se fijan por medio del 
programa de desbloqueo. 

Antes de lanzar la llamada de escritura, la base de comprobación llena la 
memoria intermedia del disco con una configuración conocida. Esta 
configuración se comprueba al volver de una operación de lectura. 
Tanto para lectura como para escritura la base de comprobación 
muestra los contenidos del registro A. Si se ha añadido el manejo mejorado 
de errores de disco que se describía en el capítulo anterior, el valor de 
retorno de A deberá ser siempre cero. 


















Lista de comprobación de controladores de disco ¿Devuelve SELDSK la di- 
rección correcta y fija las variables de sistema requeridas? 
Compruébese que la dirección de cabecera de parámetros del 
disco correcta ha vuelto para los discos lógicos legítimos. Comprué- 
bese también que devuelve una dirección O000H para los discos 
ilegales. 
Compruébese que cualquier proceso rutinario, tal como fijación 
del tipo de disco y requerimientos de desbloqueo de bytes extra de 
los bloques de parámetros del disco, se realiza correctamente. 


¿Funcionan correctamente los procesos SETTRK y SETSEC? 
Utilizando el DDT, compruébese que las variables correctas 
están fijadas en los valores específicos. 
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¿Lee el controlador correctamente en el directorio de sectores de repuesto? 

Colóquese para ejecutar lectura física y, utilizando el DDT, 

examínese la lógica del punto de entrada READ. Compruébese que 

el directorio de sectores de repuesto esté cargado en la memoria 

intermedia adecuada. Si se está utilizando entrada/salida falseada, 

utilícese el DDT para añadir un directorio típico de sectores de 
repuesto con dos o tres sectores. 


¿Produce el controlador el sector de repuesto correcto en lugar de uno 
malo? 

Continuando con la operación física de lectura, compruébese que 
para pistas/sectores “buenos”, la lógica de repuesto de sectores 
devuelve los números originales de pista y sector, y para pistas/sec- 
tores “malos”, sustituye éstos por pistas y sectores de repuesto 
correctos. Si se está utilizando saltos de sector, compruébese que se 
salta el número correcto de sectores. 


¿Puede leerse un sector desde el disco? 

Continuando adelante con la lectura física, compruébese que se 
lee el sector correcto del disco y pista específicos. Si se están 
utilizando entradas/salidas reales (como opuesto a falsearlas), la 
“configuración” fijada por la base de comprobación puede ser 
usada, o puede llenarse el área de memoria intermedia del disco con 
alguna configuración conocida (utilizando la orden F del DDT) con 
lo que puede decirse si se lee algún dato. 

Hay que asegurarse de que no haya ningún disco o disquete en la 
computadora no protegidos contra escritura —pues se puede escribir 
inadvertidamente en un disco más que leerlo durante los primeros 
pasos de la comprobación. 


¿Puede escribirse un sector en el disco? 

Utilizando el DDT, fijese para escribir en un disco, pista y sector 
particulares. Quítese cualquier protección de escritura que se haya 
puesto en este disco durante comprobaciones anteriores. Se puede 
utilizar bien la configuración dada en la base de comprobación o 
llenar el área de memoria intermedia del disco con una configura- 
ción distintiva. Escríbanse estos datos en el disco, llénese el área del 
disco con una configuración diferente y léase en el sector que se 
escribió. Compruébese que la memoria intermedia del disco se 
cambia a la configuración escrita en el disco. 


¿Compone el controlador mensajes de error correctamente? 
Mejor que dañar un disquete deliberadamente para crear errores, 
utilicese el DDT para el sabotaje temporal de la lógica del controla- 
dor del disco. Hágase que devuelva cada uno de los códigos de error 
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posibles por turno, comprobando cada vez que ha sido lanzado 
mensaje de error correcto. 

Para cada condición de error por turno, compruébese que 
controlador de disco realiza la acción de recuperación col 
incluyendo la interacción con el usuario y ofreciendo la opción 
reintentarlo, ignorar el error, o la de abortar el programa. 





Comprobación en vivo de un nuevo BIOS 



























Suponiendo que los controladores hayan pasado todos los controles 
señalados anteriormente, todo está preparado para montar todas las piezas 
del BIOS y construir una imagen del CP/M. 

Para la comprobación inicial, hay que desconectar el reloj de tiempo real 

y utilizar entradas/salidas sencillas para el controlador de la consola, si es 
posible. Es importante obtener algo que funcione lo más pronto posible, y 
es más fácil conseguirlo sin los posibles efectos secundarios de las interrup- 
ciones. 
Prepárese un listado completo del BIOS y planifiquese perder al menos 
una hora comprobándolo. Realícese una pasada en seco a través de la 
consola y del controlador de disco —si existen errores graves en estos dos 
controladores, el CP/M no se pondrá en marcha—. Recuérdese que una vez 
se ha ejecutado el arranque en frío del BIOS y se ha transferido el control al 
CCP, se pedirá al BDOS que entre en el disco del sistema, y esto incluye la 
lectura del directorio del disco. 

Obsérvese especialmente el controlar algunas de las estructuras de datos 
más importantes. Hay que asegurarse de que todo está en un lugar 
razonable de la memoria; por ejemplo, si la última dirección utilizada porel 
BIOS es mayor de OFFFFH, se necesitará quitar la imagen entera del CP/M 
de la memoria. 

Constrúyase entonces un disco de sistema, cárguese en la máquina y 
púlsese el botón de RESET. Se verá la señal de arranque, después el BIOS y 
tras una pausa de un segundo aproximadamente la indicación A> (o 0A> 
si se ha incluido el dispositivo especial que añade el CCP). 

Si se ven ambos mensajes de “funcionamiento” pero no se obtiene la 
indicación A>, probablemente la causa del problema se encuentra en los 
controladores de disco. De forma alternativa, el área de directorio del disco 
puede estar llena de datos cualesquiera mejor que OESH. 

Si no se puede ver lo que está equivocado en el sistema, puede intentarse 
falsear los controladores de disco para que devuelvan un bloque de 128 
bytes OESH en cada operación de lectura. El CCP lanzará entonces el 
mensaje de “funcionando”. 

Una vez que ha aparecido la indicación A>, se puede proceder a la 
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comprobación del sistema. Se empieza comprobando si funciona la lógica 
de autocarga. Mecanografíese un CONTROL-C. Habrá una ligera pausa y la 
indicación A> deberá aparecer de nuevo. 

A continuación se comprueba que se pueda leer el directorio del disco 
utilizando la orden DIR. Si se tiene un directorio vacio, se obtendrá una 
respuesta NO FILE. Si se obtienen caracteres extraños en su lugar, o bien se 
ha olvidado la inicialización del área del directorio o el bloque de 
parámetros del disco está dirigiendo el CP/M a la parte errónea del disco 
para el directorio de ficheros. Si cae el sistema, hay problemas con el 
controlador de disco. 

Compruébese que se puede escribir en el disco introduciendo la orden 
SAVE 1 TEST. Utilicese entonces la orden DIR para confirmar que el 
fichero TEST se muestra en el directorio de ficheros. Si ocurre así, utilicese 
la orden ERA, ERA TEST y hágase otra orden DIR para confirmar que se 
ha borrado TEST. 

Si TEST no aparece en el disco o no puede ser borrado, entonces se tiene 
un problema con la rutina WRITE del controlador de disco. 

Póngase un disquete estándar del CP/M en la unidad B y utilicese la 
orden DIR para comprobar que se puede acceder al controlador y visualizar 
un directorio de disco. Si es así, entonces cárguese desde él la utilidad DDT 
y sálgase desde él utilizando una orden GO (G, cero). Esto comprobará 
mejor si los controladores de disco están funcionando correctamente. 

Para comprobar la lógica de desbloqueo (si se están usando discos que 
requieran desbloqueo), utilícese la orden: 


PIPA: 





«*LVI 


Esta copia todos los ficheros de la unidad B en la unidad A, utilizando la 
opción de verificación. Es una prueba particularmente buena del sistema, y 
si se tienen problemas con los controladores de disco de alto nivel y con el 
programa de desbloqueo, se obtendrá un mensaje de verificación de error 
del PIP. También puede obtenerse este mensaje cuando se tienen problemas 
de hardware con la memoria de la computadora, por lo que hay que dejar 
correr una prueba de memoria si no se encuentra nada equivocado en el 
algoritmo de desbloqueo. 

Para comprobar totalmente el programa de desbloqueo, se necesita 
utilizar el PIP para copiar un fichero de texto mayor que el total de 
memoria disponible. Entonces se puede necesitar crear un fichero grande 
de texto utilizando un editor de texto exclusivamente para proporcionar 
datos de control al PIP. 

Con el controlador de disco funcionando correctamente, reconstruir el 
sistema con el reloj de tiempo real activado. Arránquese el nuevo sistema y 
compruébese que la hora del día del ASCII esté siendo actualizada en el 
bloque de configuración; utilícese el DDT para inspeccionarlo en la 
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memoria. Póngase el reloj en la hora en curso, déjese andar durante ci 
minutos y véase si se encuentra todavía correcto. Quizá haya que aj 
una de las constantes de inicialización de tiempo para el dispositivo q 
procura las interrupciones periódicas del reloj. 
Reconstrúyase el sistema ahora una vez más, esta vez con el control 

de interrupciones de entrada de consola real y las rutinas de salida real dela 
consola. Compruébese que el sistema funciona adecuadamente y que 
cadena de puesta en marcha de la entrada forzada inicial aparece enla 
consola. 

Compruébese que cuando se mecanografían caracteres en el teclado 
visualizan según se van mecanografiando. Si no, puede haber problemas 
bien en la rutina CONIN o en la CONOUT. Experimentalmente mecano- 
grafiense caracteres suficientes para llenar la memoria intermedia de 
entrada. Si empieza a sonar la campana del terminal, la rutina de servicio 
de interrupción probablemente no es la culpable. Compruébese de nuevo la 
rutina CONOUT. 

Compruébese que la lógica de decodificación de la tecla de función 
trabaje correctamente. Con la indicación A> compuesta, púlsese una tecla 
de función. El controlador CONIN deberá inyectar la cadena de tecla de 
función correcta y ésta deberá aparecer en el terminal. Por ejemplo, con el 
BIOS de la figura 8-11, pulsando PFI en el terminal VT-100, se producirá la' 
siguiente presentación: 
































A>Function Key1 
Function? 
A> 


El CCP no reconoce “Function” como un nombre legítimo de orden, ni 
existe un fichero COM —de ahí el interrogante. 

Utilizando el DDT, escribase un pequeño programa que envíe ESCAPE, 
*“t” a la consola y compruébese que la cadena de hora del día ASCII 
aparece en la consola. Esto prueba que la secuencia de escape ha sido 
reconocida. 
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el CP/M estándar 
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Programas de utilidad 
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Este capítulo contiene el programa fuente ilustrado de varios programas 
de utilidad muy prácticos. Se incluyen dos grupos de dichos programas 
—los que suplementan los programas de utilidad estándar de Digital 
Research y los que trabajan junto con caracteristicas de las que se muestran 
en el BIOS mejorado (figura 8-10). 

Para evitar detalles innecesarios, los programas que se presentan en este 
capítulo están todos escritos en lenguaje C. Este es un buen lenguaje para 
usarlo con este fin porque puede mostrar la totalidad de la lógica de un 
programa sin la confusión de detalles corrientes en los lenguajes de 
ensamblaje. 

Con el fin de volver a utilizar tanto programa fuente como sea posible, 
este capítulo incluye una “biblioteca” de todas las funciones de propósito 
general de C que pueden llamarse desde dentro de cualquiera de los 
programas de utilidad. Este fichero, denominado “LIBRARY.C”, se 
muestra en la figura 11-1. Una vez el programa ha sido compilado, las 
funciones necesarias de la biblioteca pueden enlazarse con la salida binaria 
de utilidades para formar el fichero “.COM”. 
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/x Biblioteca de funciones utilizadas frecuentemente +/ 
Minclude CLIBRARY.W) — /+ Definiciones y estructuras estándar */ 


Acceso al bloque de configuración +/ 


/x Obtención de La dirección bloque de configuración +/ 
. o / 
/* Esta función realiza una Llamada a una entrada "privada" al vector 

de saltos del BIOS para devolver La dirección de un dato específico 

en el B1OS. El programa indica cuál es el dato requerido. 

Cada uno de Los programas que utiliza esta función puede realizar 

una Llamada directa al BIOS utilizando La función biosh() que proporciona 

el BDS C. Esta función tiene un punto común al cual puede añadirse 

el programa de depuración para visualizar La dirección de vuelta. */ 


/% Parámetros de entrada +/ 
Ant codes /x Programa que especifica el objeto 
cuya dirección se requiere =/ 
/e Parámetros de salida 
Dirección devuelta por La rutina del BIOS */ 


0 
char sretvali 1% Valor devuelto por el BIOS «/ 


retval = biosh(CEGADOR, code 

/% printf ('inget_cba + code %g address Z4x",code,retval)z »/ 
return reivals 

1 /% Final de get_cba(programa) */ 


1% Funciones de manipulación de caracteres 


Panama == 

strscnístring,key) 1 Revisión de cadenas */ 

prenda z 

/n Esta función examina una cadena de caracteres terminada por 00 
buscando en ella una clave. Si se encuentra La clave 
en la cadena, La función devuelve un apuntador a él. En caso contrario 
devuelve un valor O. */ 

/% Parámetros de entrada */ 

Char estranos /x Cadena a examinar */ 

char "keys 1% Clave a buscar */ 


/* Parámetros de salida A 
Apuntador a clave, de cadena en cadena examinada, o si no 


encuentra La clave 
./ 


0 
while (astrino) /% Para todos Los caracteres no nulos en la cadena */ 


/x Coincidencia con primer carácter */ 
/% Configurar con subcadena 
comparación con el resto v/ 


return strings /* Coincidencia con subcadena, 
retorno de apuntador */ 
quines /* Desplazamiento a carácter siguiente de La cadena */ 


return Or /x Indicación de coincidencia encontrada v/ 
1 /x Final de strsen +/ 


Inia 2d ii) 
diirono ¿Strino2) 78 Comparación de cadenas en mayusculas */ 
/% Esta función es similar a la función normal streno; 

difiere sólo en que los caracteres son comparados 

si son caracteres en mayusculas => Las cadenas permanecen 

Snalteradas. +7 





.. Funciones utilizadas normalmente, LIBRARY.C, en lenguaje C. 
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inetros de entrada +/ 


char astringlr / apuntador a primera cadena +/ 
char estrino2r /* Apuntador a segunda cadena */ 


0- si cadena 1 = 
negativo sj cadena 1 > cadena 2 
positivo si cadena 1 < cadena 2 

“Y 


( 
Int counts /* Utilizado para acceso a los caracteres en Las dos cadenas */ 


count 05 /x Comienzo en el primer carácter de Las dos */ 


/* Mientras Los caracteres de La cadena 1 son no nulos y 
coinciden con sus correspondientes en la cadena 2. */ 
Wile (stringlEcount) == string2tccunt 1) 
Ñ 
ÁN CstrimglEsecoumt) == 10) — /% ULtimo carácter en cadena 1 */ 
return 05 /% Indicador de igualdad */ 
» 
return string2lcountJ — stringifcountd; /% Comparación de caracteres */ 


Y /9 Fánal de sstremp */ 





pum parra] 
sstrcmplstrino, substring) /% Comparación de subcadenas */ 
pum e na / 


/x Esta función compara dos cadenas. La primera de ellas no debe 
terminar necesariamente por 00. La segunda debe terminar por 00. 
Es similar a La función stremp excepto en que La Longitud 
de la subcadena controla cuantos caracteres han sido comparados. */ 


lx Parámetros de entrada */ 
Char Hs tranos /x Apuntador a cadena principal */ 
char asubstrings Je Apuntador a subcadena */ 


/1 Parámetros de salida 
0- la subcadena coincide con Los caracteres correspondientes en la cadena 
negativo 5) caracteres en cadena > caracteres en subcadena 
positivo si caracteres en cadena < caracteres en subcadena 


“Y 

1 

int count /* Utilizado para acceso a caracteres en cadena y subcadena */ 
count /* Conienzo con el primer carácter de cada uno */ 





/* Mientras Los caracteres de La subcadena son no nulos y 
coinciden con Los correspondientes en La cadena. */ 
wile (stringlcount) == substringlccunty) 


ñ 
Af Caubstringlescount] == “107) /* Oltino carácter en subcadena */ 


Y 


return 05 /% Indicación de igualdad */ 


return a 





Aringtcount] — stringtcountd; /+ Comparación de caracteres */ 


) /x Final sstrcno */ 


mms ./ 
Usstremp (string, substr ing) /% Comparación de subcadenas en mayúsculas */ 
Pumas no 
/% Esta función compara dos cadenas. La primera no necesita 

terminar en 00. La segunda subcadena debe terminar en 00. 

Es similar a La comparación de subcadenas anterior excepto 

que todos Los caracteres son mayúsculas. */ 














/% Paránetros de entrada */ 
a ring; /* Apuntador a cadena principal +/ 
Char esubstringr /* Apuntador a subcadena */ 








Figura 111. (Continuación.) 
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negativo si carácter en cadena > carácter en subcadena 
positivo si carácter en cadena < carácter en subcadena 
./ 


0 
Ant countr /n Utilizado para acceso a caracteres en cadena y subcadena */ 


count = 0) /x Comienzo con el primer carácter de cada uno */ 


/x Mientras Los caracteres de La subcadena son no nulos y 
coinciden con Los correspondientes en La cadena. */ 
while Ctoupper (str inolcountJ) == toupper (subs trinolcount1)) 
í 
AN Csubstrimglescount] == “10") /s Ultimo carácter en subcadena */ 
return 07 /+ Indicación de igualdad */ 
» 


return substringlcount) — stringtcountd /% Comparación de caracteres */ 
Y /4 Final de usstremp */ 


comp_tnane(scb, name) /% Comparación de nombres de fichero +/ 
ROS o men / 
/+ Esta función compara nombres de fichero posiblemente ambiguos 

con el nombre en cadena di ;pecificada. El número 

de bytes comparados viene determinado por el núnero de caracteres 

Esta función puede ser utilizada en La comparación de nombres y tipos, 

0, añadiendo un byte extra a La máscara, nombres, tipos y extensiones 

de fichero. 

Para Las entradas al directorio debe anteponerse un byte en La 

máscara y utilizar La función para comprobar el número de 

usuario y el nombre, tipo y extensión del fichero. 

Nótese que '2" en el primer carácter de La máscara NO coincide 

con el valor OxES (este valor se utiliza para indicar una entrada 

al directorio no activa). */ 
/% Parámetros de entrada */ 
struct _scb msc; /x Apuntador a bloque de control de búsqueda +/ 
char anane; /% Apuntador a nombre de fichero */ 


/% Parámetros de sali 
NAME_EQ si Los nombres coinciden con La máscara 
NAMEZLT sí el nombre es menor que La máscara 
NAMEZGT si el nombre es mayor que La máscara 
NAMEZNE sí el nombre no es igual que La máscara (pero el resultado 


y” Tes ambiguo devido a Los comodines) en La máscara 


0 
Ant county /x Cuenta del núnero de caracteres procesados */ 


short ambiguousy /x NZ cuando La máscara es ambigua */ 
char mmasky 7 Apuntador a Los bytes al principio del SCA +/ 


/x Fijación de apuntador a Los caracteres al principio del bloque de 
control de búsqueda */ 
mask = scb; 
/% Coincidencia ambigua en número de usuario, compara sólo 
usuarios 0-15 y no entradas no activas */ 
AN (mask LO) mm 190) 
q 


AN (nameLO) == OXES) 


S return NAME_NE1 /% Indicación de desigualdad +/ 


/n Primer carácter de la máscara no es "2" s/ 


q 

AN (maskCO] 1= nametO2) /% Número de usuario no coincidente */ 
return NAME_NE1 /% Indicación de desigualdad */ 

, 


/% No, comprobación del nombre (y, sí La Longitud es tal, la extensión) »/ 
for (count = 11 /+ Comienzo con el primer carácter del nombre */ 
count <n scb -> scb_lengthi /x Para todos Los caracteres requeridos */ 


countes) /* Desplazamiento a carácter siguiente */ 
t 


ÁN (masktcount] == 7") /u Carácter comodín en La máscara */ 














+ (Continuación.) 
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' 
ambigucus = ly /% Indicación de nombre ambiguo en La máscara */ T 


continues /x No se realizan comparaciones */ 
Y 
Af (marktcount] l= (nameLcount] A 0:7F)) 
t /k Máscara de caracteres distinto de caracteres FC8 */ 
41 Cambiguous)  /% Si comodín anterior, indicación de NE +/ 
return NAME_NE+ 





ls. 
/% Comparación de caracteres para determinar relación */ 
return (maskEcount] > nametcount] 7 
NAME_LT 1 NAME_OT); 





) 
/x si el control Lega a este punto, todos Los caracteres de La máscara 
y nombre han sido procesados y o bien han sido comodines en La máscara 
o bien ha habido coincidencia. */ 








return NAME_EO1 /* Indicación de qué máscara y nombre son iguales */ 
1 /% Final de conp_fname +/ z 
100 " a 
conv_tname(Icb, fn) /x Conversión de nombre de fichero para salida +/ 

7 cds a 4 





JW Esta función convierte el contenido en bloque de control 
de ficheros en una cadena imprimible "D:FILENAME.TYP." «/ 


/4 Parámetros de entrada */ . 
Mtruct feb mfeb; /% Apuntador a bloque de control de ficheros */ 
char arñ /* Apuntador a área que recibirá el nombre */ 





1 
1% 5i La especiticación del disco en el FCB 

es O, se utiliza el disco en curso */ 
Minos = (cb > fob_disk) ? Lfcb => 1cb_glak + A=1D) a 
lodos (GETDISK) + “A0)1 E 





mms 1 /% Insertar delimitador de identificador de disco */ 


movmeníáfcb => fcb_fname,fn,8)) 

An sn 8 

Mnee 

Bovmen(LÍcb -> 1cb_fname*8,1n,3)1 
[nes La Ox70 


Transferencia de nombre de fichero +/ 
Actualización de apuntador */ 

Insertar delimitador nombre/tipo de fichero */ 
Transferencia tipo de fichero */ 

Eliminar bits de atributos */ 
















































mes ha 0x7. Eliminar bits de atributos */ 

Snes Ln 0x7) Eliminar bits de atributos */ 

mln 20% Terminal +/ 

) /9 Final de conv_fnane +/ 2 

iran ás ma/ | 

7 Conversión de un nombre de fichero del direct. para salida */ 
died 
Je Esta función convierte el 
directorio de ficheros en una cadena imprimible “D.FILENAME.TYP" +/ 

/% Parámetros de entrada +/ 

mort di Ir Identificador de disco (A = 0, B= 1) +/ 

struct dir mty Tr Apuntador a bloque de control de fichero */ 
nar en) Te Apuntador a área para recepción de nombre */ 

( 

/4 Conversión de número de usuario e identificador de disco +/ h 

aprinti (dm, "X29/Xc1",dár => de_userno.disk + “007 , 

10. 5 /* Actualización de apuntador a nombre de fichero */ 
movmentidir —> de_fname,fn,8)7  /% Transferencia de tipo de fichero */ | 
tn e 0 7% Actualización de apuntador 4/ l 
Mn /% Insertar delimitador nombre/tipo de fichero +/ l 
eoimentidir > de_tnames8, 10,325 /%, Transferencia tipo de fichero +/ l 
nes den Os: /x Eliminar bits de atributos */ | 
Mrnes hn 00750 da Eliminar DIES de atributos Y 

Mins hn 0x7) 7% Eliminar bits de atributos l 
min 0 7 Terminal +/ Zl l 





Figura 11-1.. Continuación.) l 
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) /x Final de conv_dfnane +/ 


e ca es / 

_nfnlamb_fname,next_fname)  / Obtención nombre de fichero Siguiente */ 
=S Pátre pa 

/* Esta función fija el FCB al "next_fnane" para contener La entrada 
al directorio que coincide con el"nombre de fichero ambiguo 
en "anb_fname"- 
En La primera entrada para un nombre de fichero dado el bit más , 
significativo del campo de disco del FCB debe fijarse a uno testo" causa la 
realización de una Llamada a La "busqueda del primer caso del BDOS". */ 


/% Parámetros de entrada +/ 

struct _1Cb mamb_fname) /* Nombre de fichero ambiguo */ 

struct Zfcb mnexi_fname; /% Primer byte debe tener a uno el bit más significativo 
para entrada por primera vez »/ 


/% Parámetros de salida 
No más nombres encontrados 
Encontrado nombre adicional (y fijado en next_fname) 


char bdos_funcr /x Fijación a búsqueda del primero o del siguiente +/ 
Char spfname; /x Apuntador a nombre de fichero en entrada al directorio */ 


1% inicialización a cero del final del FCB del fichero siguiente 4/ 
jelmeníánext_fnane => fcb_extent,FOBSIZE-12,0); 


bdos_fune = SEARCHF) — /% Suposición de que realiza una búsqueda del primer caso */ 


Af Uitmext_fname —> fcb_disk L 0xB0)) — /% Si no La primera vez */ 

e 
/« Búsqueda del primer caso con nombre anterior +/ 

srch_f11e(next_fname, SEARCHF) y 
bos Zfune = SEÁRCHN; /s Entonces realizar búsqueda del siguiente */ 
y 
Ja Primera vez */ 
mext_fname => fcb_gisk L= Ox7F) /s Puesta a cero indicador de primera vez */ 


/* Refresco de next_fnane desde nombre de fichero ambiguo */ 
(move disk, name, type) 9/ 
movmemtamb_fnane, next _fname,12)+ 


/4 Si se trata de la primera vez, se lanza una Llamada a búsqueda 
del primer caso, en contrario, a búsqueda del siguiente. "Srch_fiL 
devuelve un apuntador a La entrada del directorio que coincide 
con el nombre de fichero ambiguo o D si no hay coincidencia */ 

41 Cptname = erchfilelnext_fname,bdor_func)) 7 

g 

return 0 /x Indicación de no coincidencia +/ 

y 

/% Transterir nombre y tipo de fichero */ 

movmemipfname,Anext_fname > 1cb_fname, 1195 
return ls /* Indicación de coincidencia encontrada +/ 


) /% Final de get_ntn «/ 


102. 

char msrch_file(1cb,bdos_code)  /* Búsqueda de fichero */ 

pe mmm pame mms 

/x Esta función Lanza una Llamada a una de Las dos funciones del BDOS, 
búsqueda del primer caso o búsqueda del siguiente. */ 


/% Parámetros de entrada */ 
struct 10D feb; /% Apuntador al bloque de control de fichero */ 
short bdos_codey 7% SEARCHF O SEARCHN */ 


/% Parámetros de sali 
* 0 = No coincidencia 
Apuntador a La entrada coincidente (en la menoria intermedia) 
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( 
unsigned r_coder /% Devolución de un código de 
Este código es 255 para indicar _no coincidencia a 0, 1,26 3 
como ordinal de La entrada de 32 bytes en La menor 
intermedia con La que se ha encontrado coincidencia */ 
/ Apuntador a entrada al directorio */ 











char sdir_entrys 





/r El compilador C del BDS fija siempre La dirección de DMA 
del 8005 en La posición 0:80 */ 





r_code = bdos(bdos_code,fcb)1 — /* Lanzamiento de Llamada al BDOS +/ 
MT Crcode == 235) 7 No coincidencia */ 
return 0; 





/* Fijación de un apuntador a La entrada coincidente 
multiplicando el código devuelto por 128 y añadiéndoLo 

a la Girección de la menoria intermedia (0xB0) y añadiendo 1 
para apuntar al primer carácter del nombre */ 





return (r_code << 5) + 0x81) 


de Final de srch_file */ 


rO_gtsK (deb) /% Lectura de disco (vía el BIOS) */ 
70 mm. a pas 

/* Esta función utiliza Los parámetros fijados previamente 
en bloque requerido y ejecuta La Lectura de disco 
usando directamente el BIOS. */ 





/4 Parámetros de entrada */ 
struct Orb narb; /x Bloque de disco requerido (disco, pista, sector, memoria intermedia) +/ 


/x Parámetros de salida 
0 = No existen datos disponibles 
1 = Existen datos disponibles 
“Y 











MI (inet _Grektarb))  /% Llamada a SELOSK, SETTRK, SETSEC */ 
Feturn 01 /% Si SELOSK falla, indicar que no 
hay datos disponibles */ 
M1 (b10s (DREAD) 1% Ejecutar Lectura */ 





return 01 1% Indicación de no existencia de datos disponibles sí se recíbe un error «/ 
return 11 /* Indicación de datos disponibles */ 


D /8 Final de rá_disk */ 





11 Esta función utiliza Los parámetros fijados previamente en el 
bloque de entrada requerido y ejecuta una escritura en 
disco usando directamente el BIOS. */ 


14 Parámetros de entrada +/ 
ktruct deb ndrby /r Bloque de disco requerido (disco, pista, sector. 





D., 





1% Paránetros de salida 
D= Error durante la escritura 
Y = Datos escritos correctamente 





” 





0 
AN (iset_dtsktdrb))  /% Llamada a SELDSK, SETTRK, SETSEC, SETOMA */ 

Feturn O 1 Si falla SELDSK, indicación de no escritura de datos */ 
41 (olor (DARITE)) /* Ejecución de escritura */ 


return 0) /% Indicación del error devuelto */ 


return 41 /* Indicación de datos escritos */ 





D/8 Final de wrt_disk */ 
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short set_disk(drb) In de parámetros de disco */ 

y €: sd o 

/r Esta función fija Las variables del BIOS anticipándose a una Lectura 
o escritura de disco que sucederá a continuación. */ 


/s Parámetros de entrada */ . 
struct _drb ndrb /* Bloque de disco requerido (disco, pista, sector, memoria intermedia) */ 


0 = Disco no válido (no puede realizarse Lectura/escritura) 
1 = BIOS activado para Lectura/escritura 


/1 El sector en el bloque de disco requerido contiene Un sector 

Lógico. Si es necesario (según Lo determine el valor 

en Los parámetros cabecera de disco), debe de ser 

convertido en sector fisico. 

NOTA: Skeutab se declara como un apuntador a un apuntador 

a un entero de un Único byte. */ 
short mnskeutaby /* Skeutab -> cabecera de parámetros del disco => tabla de desplaz. */ 
short phy_sect Ja Sector tisico */ 


/% Llamada al punto de entrada SELDSK del BIOS. Si devuelve O, 
el disco es no válido. En caso contrario devuelve un 
apuntador al apuntador a La tabla de desplazamiento */ 

AN UI Uskeutab = DiOshISELDSK, drb => dr_disk))-) 
return Or /u Disco no válido */ 


bios (SETTRK,drb => dr_track)1 — /a Fijación de pista */ 


/% Nótese que La función biosh sitúa en el registro BC el 
sector y un apuntador a La tabla de desplazamiento 
en Los registros BC. Devuelve un valor en HL en la salida 
desde el BIOS */ z 
phy_sec = biOshiSECTRN, drb => dr_sector,mskeutab); /% Obtención de sector físico */ 
'SETSEC, phy_sec); Tx Fijación de sector */ 
bios (SETDMA,drb => dr_buffer)y  /x Fijación de dirección de menoria intermedia */ 


return 1 /% Indicación de no existencia de irregularidades »/ 
) /x Final de setp_disk +/ 


1 Funciones de manejo del directorio 


¿ammm 

Set_nde (dir pb) 

Pza 

/* Esta función devuelve un apuntador a La entrada siguiente del directorio. 
Abre el directorio sí éste no estaba ya abierto. 
Si es necesario, se lee en el siguiente sector del directorio sí se ha 
modificado el sector en curso, y es necesaria La escritura en el disco, 
ésta se realizará antes de La Lectura del sector siguiente. */ 


/% Parámetros de entrada +/ 
struct _direb adir_pbi /% Apuntador al bloque de parámetros del disco */ 


/% Parámetros de salida 
Devuelve un apuntador a La entrada síguiente del directorio en la 
memoria intermedia. Los indicadores de abíerto y escritura de sector del 
directorio, en el bloque de parámetros, se inicializan 5í es necesario. 
” 


0 
A1Uidir_pb -> dp_open) /x Directorio no abierto */ 
q 


Af Clopen_dirtair_pb))  /% Inicialización y apertura del directorio */ 
q 


err_dir(O_DIR,dir_pb)+ /e Error en apertura */ 

eator 

y 

/x Fijación deliberada del apuntador a la entrada del directorio al final de la 
memoria intermedia para forzar La Lectura de un sector del directorio */ 
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Gir_pb -> dp_entry = dir_pb -> de buffer + DIR_BSZ; 
dirpb -> de_write = 05 /% Puesta a cero del indicador de escrítura de sector */ Y 
Y 





/% Actualización del apuntador a La entrada del directorio a La entrada 
siguiente en La memoria internedia. Comprobación de sí el apuntador ha sobrepasado el 
final de La menoria internedía y es necesaria La Lectura de nuevo sector. */ 

A (esdir_pb => de_entry < dir_pb -> de_buffer + DIR_BSZ) 

0 


return dir_pb -> de_entrys /* devolución de apuntador a entrada siguiente +/ 
> 


/% Necesidad de desplazamiento a nuevo sector y Lectura del mismo */ 


/* No es necesaria La comprobación de final de directorioo o de 
desplazamiento al siguiente sector si el directorio ha sido abierto en 
este momento (el indicador de abierto no ha sido puesto a uno todavia) */ 
Mt Carr pb > do_open) 
kir_pb > dp_open = 11 /% Indicación de que el directorio se ha abierto ahora +/ 





else 
ñ 
/* Comprobación de si el sector en curso en la memoria intermedia 
necesita ser escrito fuera del disco (por cambio) */ 
ar Údir pb > de_urite) 
q 








> 
Há n 
/x Decrementación del número de entradas al directorio a procesar, 

/ 


siempre cuatro entradas de 32 bytes por sector de 128 bytes 
dir pb -> dp 





Are 47 





/% Fijación a uno del indicador final de directorio sí núnero de entradas < 0 */ 
AN CGir pb => dp_emtrem == 0) 1% Final de directorio */ 
q 











dir_pb -> dp_end «11 /% Indicación de final +/ | 
O dirDD > doren = Os /% Indicación de directorio cerrado */ 
return 01 /* Indicación de no más entradas */ 


y 


le actualizas 
AN Cosdir_pb => de. 
0 


4 es necesario pista y sector) */ 
uN) 


tor (y 
dir_pb -> dp, 








sedir_pb -> de_track; /% Actualización de pista 
Sir Pd => do_sector = 01 7% Puesta a cero de sector */ 





» 
AUUIrU_gIr(R_DIR,dir_pb)) /* Lectura de nuevo sector de directorio */ 
ñ 
err_dir(R_DIR,dir_pb)1  /* Indicación de error en Lectura */ l 
eatos l 
y 


/* Puesta del apuntador a entrada del directorio a La primera entrada en mem. int. %/ 
return dir_pb => dp_entry = dir_pb -> dp_buffers 








> /x Final de get_nde */ A l 


Premama non 
Open_dir(dir_pb) 1% Apertura del directorio */ 
1 
Ir Esta función "abre" el directorio de ficheros de un disco 
especificado para su procesamiento con Las funciones e 
ru_dir y next_dir. */ 











ránetros de entrada */ 


Calreb mdir_pby /* Apuntador al bloque de parámetros del directorio */ 





(Continuación.) 
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/n Parámetros de salida 
0 = Error, directorio no abierto 
Directorio abierto para procesamiento 


struct _dpb mdpb; /* Bloque de parámetros de disco CP/M +/ 


/+ obtención de La dirección del bloque de parámetros de disco para el disco 
especificado en el bloque de paránetros de directorio */ 
AN (ldpb = get_dpb(dir_pb -> dp_d1sk)) == 0) 
return O) 1% Retorno indicando no existencia de DPB para este disco */ 


/% Fijación de Los campos restantes en el bloque de parámetros */ 
dir po > aptrkp  /x Sectores por pista */ 

dir pb —> dp, rkoffs /x Desplazamiento de pistas del directorio */ 
dirpb > /x Comienzo del directorio */ 

dira > > dpb_maxden+iy /% Núnero de entradas aL directorio */ 
dira > dir_pb -> dp_mument; / Entradas a procesar */ 

dir po > 1% Indicación de no final +/ 


/% Fijación del núsero de bloques por entrada de directorio a 8 6 16 
dependiendo del número de bloques */ 
dir_pb -> dp_nabpde = (dpb -> dpb_maxabn > 235? 81 16) 
7+ Fijación del núnero de blaques (uno por encina del 
bloque mayor) */ 
gir_pb => dp_nab = deb -> dpb_maxabni 


/% Fijación del tamaño de Los bloques basado en el desplazamiento. 
Los valores posibles son 3 = 1k, 4 =2k, 5 =4k, 6 =8Bk, 7= 16k. 
con Lo que un valor 16 es desplazado a la derecha (7 - Éshift) bits. */ 
dir_pb => de_absize = 16 >> (7 — deb > dPb_bshifUS 


return 11 /* Indicación de directorio abierto */ 


> /x Final de open_dir */ 


== / 
d_op,dir_pb)  /+ Lectura/escritura de directorio */ 
o a 
/* Esta función Lee/escribe el siguiente sector de 128 bytes del 
directorio abierto en curso. */ 


/% Parámetros de entrada +/ 
ahort read_op; /x Verdadero para Lectura, falso (0) para escritura */ 
struct _dirpb adir_pbj  /* Bloque de parámetros del directorio */ 


/x Parámetros de salida 
O = Error operación no realizada 
1 = Operación finalizada 

”/ 


0 
struct _grb drby /% Disco requerido (por Lectura/escritura del BIOS) +/ 


drb.dr_disk = dir_pb -> de_diskr 1% Fijación de petición de disco */ 
drb.drZtrack = dir pb => dp_tracky 

drb:drZsector = diT_pb -> dP_sectory 

drb:dribuffer = dirZpb -> deLbuftery 


Af Cread_op) 
í 


Af Cird_dtak(Larb)) — /% Lanzamiento de orden de Lectura */ 
Feturn 01 /x Indicación de error no datos disponibles */ 
, 


e 
AY Clwrt_gtsk (Raro) /* Lanzamiento de orden de escritura */ 
turn Or /* Indicación de error no datos escritos */ 


> 
return 1 /* Indicación de operación finalizada +/ 





9 /% Final de rd_dir +/ 
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0./ 
de Visualización de errores de directorio +/ 
Ju Esta función visualiza un mensaje de error para dar cuenta de un error 

detectado por Las funciones de administración del directorio open.dir y rudir. */ 
Je Parámetros de entrada */ 
short opcodey /% Intento de operación +/ 
sruet —dirpb mdir_pby  /* Apuntador al bloque de parámetros del directorio */ 


ñ 
printf “AMNO07Error during “) 


svbtentopcode) 


R_DIR: 
printf ("Reading"); 
breaky 

U_DIR: 
printf ("Hriting")s 
breaky 
















primtf("Opening")1 
breaks 





printf ("Unknown Operation (Xd) on”,opcode)1 
Y 





printi(" Directory on disk Xer. ",dir_pb > de_diak + “A%)1 
9 /4 Final de err_dir */ 























Y 





.../ 


Is Esta función fija el bloque de control de búsqueda de acuerdo 
con el nombre de fichero especificado. El nombre de fichero 
puede presentarse en Las formas siguientes: 


nombre-de=fichero 
hombre=de=tichero.tipo 
mbre=de=fichero. tipo 
mbre=de=fichero: tipo (refiriéndose a Los discos) 
onbre=de=fichero.tipo trefiriéndose a Los discos especificados) 





La función fija el mapa de bits de acuerdo con Los discos en Los que se 
busca. Para cada uno de Los discos seleccionados comprueba Sí se ha generado 
algún error en La selección del disco (es decir, si existen las tablas 

de disco en el BIOS para el). »/ 





/4 Parámetros de entrada +/ 
struct 





/% Apuntador al bloque de control de búsqueda +/ 





char sfnames /= Apuntador al nombre de fichero */ 
short user? /% Número de usuario a buscar */ 
short extentr /% Número de extensión a buscar */ 
Ant lengthy /% Número de bytes a comparar */ 


/% Parámetros de salida 
Ninguno. 
“y 


0 
Ant disko 1% Número de disco comprobándose */ 
unsigned adisksy /% Mapa de bits para Los discos activos */ 


adiake = 07 /* Suposición de que no hay discos a buscar +/ 


/* Comprobación de ':" en nombre de fichero +/ 





AN strscntiname, 1 0)) 
0 
40 Oefname mn 200) /* Comprobación de si "todos" Los discos */ 


q 
adisks = OXFFFF1 /x Puesta a uno de todos Los bits */ 








y 
/* Puesta a uno de Los discos específicos */ 

0 

Mile (mfname 1m 017) /% Hasta encontrar "2" */ 
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0 
/* Construcción del mapa de bits por obtención del identificador 
(A =P) de disco siguiente, convirtiéndolo en un número 
de O a 15, desplazando un bit a La izquierda 
cada vez y realizando La operación OR con Los discos activos 


/* Desplazamiento al carácter siguiente */ 
1% Ignorar “3% 9/ 


else /s% Utilizar únicamente disco en curso por defecto */ 
q 


/% Fijación del bit correspondiente al disco en curso */ 
adíaks = 1 << bdos(GETDISK)+ 
y 


setícb(scb, name); /x Fijación del bloque de control de búsqueda como sí fuera 
un bloque de control de fichero. */ 


/* Realización de Llamadas a La rutina SELDSK del BIOS 
para asegurar que todas Las unidades de disco activas 
tienen tablas definidas en el BIOS. SÍ no existen puesta a cero 
del bit correspondiente del mapa de bits. +/ 


for (disk = 01 /x Comienzo con el disco Az */ 
bak < 16) In Hasta el disco P: */ 
Sie Tu Utilización del disco siguiente */ 
AN CACA <e dial he aciske)) 
continue /x Evitar La selección de discos no especificados */ 
41 (bt0ÑESELDSK,GARk) == 0) — /s Realización de Llamada 2 SELOSK del B105 */ 
/x Devolución de O si disco no válido */ 
Je Puesta A,Eeto del Bit correspondiente en La máscara, 


que tiene todos Los denás bits a uno */ 
adiske hm (01 CC disk) * OXFEFF)S 


/% Puesta de mapa de bits en el 5CB +/ 
/% Puesta del núnero de usuario */ 
extenti  /% Puesta del número de extensión */ 
= lengthy — /% Fijación del núnero de bytes a comparar */ 


> /* Final de setscb */ 


/n Esta función pone a cero todos Los elementos del mapa de disco */ 


/% Parámetros de entrada 4/ 
Unsigned disk maptió1C181 /+ Dirección de La matriz de enteros sin 


/x Parámetros de salida 
Ninguno. 

” 

, 

/% ATENCION =- EL 576 en La Llamada a setmen que sigue se basa en que 
la matriz del mapa de disco es de 16x18 -- es decir, 288 enteros 
sin signo; por tanto, 576 bytes. */ 

setmemídisk_map, 376, "N07)1 /* Llenado del array con ceros */ 


d /% Final de de.clr */ 





” 2 a mm. 0.1 
(disk_map, adíske) /% Visualización del mapa de disco */ 
Imma má 2 . a / 
/* Esta función visualiza Los elementos del mapa de disco mostrando 
La cuenta en cada elemento. Un valor cero en un elemento 
se muestra como blancos. Por ejemplo: 
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9.1.2 3 576 7 8 9 10 11 12 13 14 45 Utilizados Libres 
Mm 123 20 202 199 101 211 934 70 


Se inprinirán únicamente Las Líneas para Los discos activos (como indica 
el mapa de bits). */ 


/4 Parámetros de entrada / 
/% Apuntador a matriz del mapa de disco +/ 
/% Mapa de bits de discos activos */ 


Hdefine USED_COUNT 16 1% Núnero de "usuario" para entidades utilizadas */ 
Madeline FREEZCOUNT 17 7% Número de "usuario" para entidades Libres */ 


1% Núnero de disco en curso */ 
/% Número de usuario en curso */ 
unsigned deum /% Suna de entradas para un disco dado */ 


Printrcin 2.3 4 5 06 7 8 09 10 11 12 13 18 15 Utilizados Libres"); 


tor (disk = 01 1% Comienzo con el disco Az */ 
disk < 161 Jr Hasta el disco P: */ 
ao /+ Disco siguiente */ 


AN CI tadiaka R (1 CE dLaKy))  /% Comprobación de disco activo */ 
continues /e No, Lo ignora +/ 


printft"inker "disk + “A%d1  /4 Visualización de número de disco */ 


sum = 01 /% Puesta a cero de La suna para este disco */ 
for (urerno = 01 /% Comienzo con usuario 0 */ 

userno < 161 /% Hasta usuario 15 */ 

userno+e) /% Siguiente número de usuario */ 


q 
dsum += disk maptdiskICusernoly /* Realización de La suna */ 
y 


Af (aru /* Comprobación de salida para este disco, 
si no visualizar d: Ninguno */ 
c 
/* Imprimir número o blancos */ 
Comienzo por usuario 0 */ 
Hasta usuario 15 */ 
/* Siguiente núnero de usuario */ 


q 
AN (ótak_maptdiskICusernol) 
Slak maptdlskILuserno2)1 


prin a 


1% No hay salida para este disco */ 


0 

prámroor 

y 
rIMtI CT Ad Ag" E di sk DUFREE_COUNTI)+ 
y 


) ft Final de dn_disp */ 


pun 
etapa, 7% Obtención de dirección del bloque de parámetros de disco */ 
nn) 
Ie Esta función devuelve La dirección del bloque de parámetros 
del disco (localizada en el 8105). */ 


1 Parámetros de entrada */ 
ener dao /* Disco Lógico que precisa La dirección del DP8 */ 





/ Parámetros de salida 

O = Disco Lógico no válido 

NZ = Apuntador al bloque de parámetros de disco 
“Y 


ñ 
AN (blosM(SELDSK, di ak) /% Realización de Llamada a SELDSK del BIOS */ 
return 0; 1 Disco no válido */ 
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dos (SETDISK, disk) 1 /x Utilización de La función SETDISK del BDOS +/ 
return bdos (OETDPARM) y /* Obtención del bloque de parámetros de disco */ 


) 1% Final de get_dpb + 


7% Funciones de tabla de códigos */ 


/% Muchos programas que interaccionan con el usuario deben 
aceptar paránetros de éste como nombres y traducir este nombre 
a algún código interno. 
Es posible también el proceso inverso, examinando 
el valor de una variable y determinando a qué nombre ASCII 
ha sido puesta. 


Un ejemplo es La fijación de velocidad de transmisión (baud rate). 
El usuario desea entrar "19200" y que una vez traducido 

sea enviado al chip correspondiente. Viceversa La variable 

de velocidad de transmisión fijada con anterioridad 

debe poderse examinar y generar La cadena "19200" para que el 
usuario puede visualizar este valor. 


La tabla de códigos se utiliza para facilitar esta tarea. 
Cada elemento de La tabla consta Lógicamente des 

Un código (entero sin signo) 

Una cadena de car mente un apuntador a ella) */ 


Im mm .2/ 

<t_initientry,code, string) /% Inicialización tabla de códigos */ 

um a 5 n= / 

/* Esta función inicializa una entrada específica en La tabla de códigos 
con un código y Un apuntador a cade 


NOTA: Por convenio, la última entrada a una tabla de códigos 
determinada tiene él código CT_SNF (cadena no encontrada). */ 


/x Parámetros de entrada +/ 
struct ot entry /% Apuntador a entrada de tabla de códigos */ 
Ant coder /u Código a almacenar en dicha entrada */ 
char "strings /% Apuntador a cadena para esta entrada */ 


/* Parámetros de salida 
Ninguno. 
1 


0 
entry -> _et_code = codes /* Puesta de código_ct */ 
entry > ZetZsp = strings /x Puesta de apuntador a cadena */ 


d /% Final de ct_inti */ 


Ln e” ./ 
unsigned 
et parcitable, string) /% Parámetros - código de retorno */ 
a AN 
/* Esta función examina en La tabla especificada La coincidencia con 
una cadena y retorna el código que Le corresponde. 
Si encuentra únicamente una coincidencia en la tabla, devuelve 
el código correspondiente. Si no encuentra coincidencia 
9 más de una, devuelve un código de error CT_SNF (cadena no encontrada) 
Esta función se ha diseñado especificamente Para el procesamiento 
de Los parámetros de orden. 
Nótese que La comparación se realiza después de La conversión anayúsculas 
(es decir, "CADENA" coincide con “cadena"). La comparación de Subradenas se utiliza 
para que Sea necesarzo entrar el minimo número de caracteristicas para obtener 
ina respuesta no ambigua. Por ejemplo, sí La tabla contien 


Código 

1 

2 

3 'MELOCOTONES"" 


En respuesta a “N" devolverá el código = 2, pero "N" es ambiguo. 
Es necesario "NA" o "ME", 8/ 


struct _ot mtable; /% Apuntador a tabla «/ 
char asTrinor /* Apuntador a cadena clave */ 








Figura 11-1. (Continuación.) 
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n 
int acoder /+ Código de coincidencia a devolver */ 
Ant county /x Cuenta del número de coincidencia */ 


mode = CT_SNFY /x suposición de error */ 
mcount = 01 7» Puesta a cero de cuenta de coincidencias */ 


WMilettable -> _et_code l= CT_SNF) /% No final de tabla */ 


n 
/» Comparación de La respuesta en teclado con entrada de tabla 
utilizando La comparación de subcadenas. */ 
AN Cusstremeltable => _cot_sp.string) == 0) 
0 


mcount+e /x Actualización cuenta de coincidencias */ 
code = table -> _et_codes /% Almacenar código */ 
y 

tables /* desplazamiento a entrada siguiente */ 

y 


M0 lacount == 1) /u sólo una coincidencia / 
return code! 7» Devolución de código de coincidencia */ 
/* Ilegal o ambiguo */ 
return CT_SNFY 


Y /a Final de ct_pare */ 
















































char sstringr /* Apuntador a cadena */ 
: 
a cra 
E 
: 
a poa 
> Z 
/* Parámetros de entrada y 
Ninguno. ! 
o daa Ipecatia 
: 
Figura 11-1. (Continuación.) 
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putchar (An) 1u Añadir retorno al final */ 


) /4 Final de ct_disps */ 


Ina La tabla especificada y devuelve 
el INDICE de La entrada conteniendo La cadena coincidente. 
Se utilizan todos Los caracteres en La comparación después 
de convertirlos a mayúsculas. */ 


/s Parámetros de entrada +/ 
struct ot tab! 1% Apuntador a tabla */ 
char esiringr 7+ Aountador a cadena +/ 
/* Parámetros de salida 

Indice de La cadena coincidente, o 

CT_SNF si no hay coincidencia. 
»/ 


ñ 
Ant Andexs /r Valor del índice en curso */ 


index = 01 1% Inictalización del indice */ 


while(table -> _ct_code 1 CT_SNF) 1r No al final de la tabla =/ 


0 
Af Custrempltable > _ct_ep/string) == 0) 


return indexy"  7s Devolución de indice */ 
tableros /x Desplazamiento a entrada siguiente */ 
Andexe+r Jn Actualización del indice */ 


y 
return CT_SNF1 /% Cadena no encontrada */ 


) /x Final de ct_index */ 


el índice «/ 


/r Esta función devuelve un apuntador a La cadena en La entrada 
de tabla especificada por el índice. */ 


/x Parámetros de entrada +/ 
struct _ct stable) /% Apuntador a tabla */ 
Ant nds /* Índice en la tabla */ 


0 
Slruet ot mentrys /% Apuntador a entrada */ 

entry = tablelindex)y — /% Apunta a una entrada */ 

return entry > _0t /x Devolución de apuntador a cadena */ 


D /% Final de ct_stri */ 


/* Esta función examina La tabla especificada y devuelve 
al apuntador a cadena de caracteres en La entrada con código 
coincidente o un apuntador a La cadena "desconocido" si no 
encuentra el código. */ 


/x Parámetros de entrada */ 
struct ct atables Ir Apuntador a tabla */ 
unsigned codes /n Código */ 


0 
Miileltable => _0t_code lm CT_SNF) /% Hasta final de tabla */ 


ñ 

Áf (table => _et_code == code) /* Comprobación de coincidencia de código */ 
return table -> _ot_spy /* Si, devolución de apuntador a cadena */ 

tableros /* No, desplazamiento a entrada siguiente */ 














(Continuación.) 

















3 y 
return "Unknown" 
Y 





11m Funciones de vectores de bits 9/ 





/x Estas funciones manipulan vectores de bits. Un vector de bits 
es un grupo de bits adyacentes en paquetes de ocho por byte. Cada vector 
de bits tiene La estructura definida en el fichero LIBRARY. 





Los vectores de bits se utilizan principalmente para manipular 
los vectores de asignación del sistema operativo y otros valores, 
cuya mejor representación es una serie de bits. */ - 


pun 


/r Esta función utiliza La asignación de memoria interna de C, 
alloc, para asignar el espacio de memoria necesario y poner 
a cero el vector. */ 





/x Parámetros de entrada */ 
struct by mbw /x Apuntador a vector de bits */ 
unsigned bytesy /% Número de bytes del vector de bits */ 





Ie Paránetros de salida 
NZ = Vector creado 
0 = No suficiente menoria para crear vector 
“ 





0 
ANCIOy —> bv_bita = allocíbytes))) /x Petición de menoria */ 
return 0) Ju Petición fallida +/ 

















by -> bv_bytes = byt 
Dv => bvZend = by => by_bite + by 


/x Fijación de Longitud */ 
/* Fijación de apuntador al final */ 












by_H111(bv,0)1 
return 14 






/* Rellenar vector con ceros */ | 


D /4 Final de bv_make +/ 


bv_H111(bv, value) /% Puesta de valor en el vector de bits */ 
/e Esta función pone un valor especificado en el vector de bits 
especificado. 
Existe únicanente por razones de consistencia y para aislar 
el cuerpo principal del programa de funciones estándar como 
setnen. */ 

















/a Parámetros de entrada */ 
ES /x Apuntador a vector de bits */ 
char valuer /+ Valor a situar en él */ 








/4 Parámetros de salida 
Ninguno. 
“e 









0 
pu dirección Longitud valor «/ 
hetaen(by => Dv_bits,by —> bv_brten,value)r 














Y 
/* Puesta a uno del bit especificado */ 
Es % 
/e Esta función pone a uno el bit especificado del vector 

de bits. / 





a 









le Parámetros de entrada */ 
Jet _by aby 
unsigned bátnus 


Is Apuntador al vector de bits */ 














Figura 11-1. (Continuación.) 


/% Número de bit a fijar */ pr 


Capítulo 11: Programas de utilidad adicionales 415 


bb 


ce 
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1% Parámetros de salida 
Ninguno. 
»/ 


0 
unsigned byte_oftsetr /u Bytes de desplazamiento en el vector de bits */ 


AN (byte_offaet = bitnum 9) 3) > by -> bvbytes) 
return O /x El número de bits sobrepasa el final del vector */ 


/x Puesta a uno del bit adecuado del vector. El byte de desplazamiento 
se ha calculado. El número de bit en el byte se calcula realizando 
La operación AND del núnero de bits con 0x07. 

El bit especificado se opera entonces (0R) con el vector */ 


bv => bv_bitslbyte_offaet] t= (1 CC Cbitnum L 0x7))1 
return tr /* Indicación de La operación reali 


1% Final de bv_set +/ 


ammm 


bv_test(bv,bitnum) 


Ie Esta función devuelve un valor que refleja el valor actual 
del bit especificado. */ 


/u Parámetros de entrada */ 
struct by bw /% apuntador al vector de bits */ 
unsigned bitnumy /% Número de bit a examinar */ 


Is Parámetros de salida 
Ninguno. 
*/ 


ñ 
unsigned byte_otfsetr /* Bytes de desplazamiento en el vector de bits */ 


Af (Ubyte_ofíset = bátnum 9) 3) > bv > bv bytes) 
ráturn O /* El núnero de bit sobrepasa el final del vector »/ 


/% Puesta a uno del bit adecuado del vector. El byte de desplazamiento 
se ha calculado. El núnero de bit en el byte se calcula realizando 
La operación AND del número de bit con 0X07. 

El bit especificado se opera entonces (OR) con el vector. */ 


return bv -> bv_bits[byte_offsetl 2 (1 << (bátnum A 017))7 


) /% Final de bv_tests */ 


A 
bv_nztbw) /* Test de vector de bits distinto de cero */ 
A ele o 
/* Esta función comprueba cada uno de Los bytes 
del vector especificado y vuelve indicando sí existe algún bit a uno 
en el vector. */ 


/u Parámetros de entrada */ 
Slruct bs mbr /* Apuntador al vector */ 


/* Parámetros de salida */ 
NZ = Uno O más bits del vector a uno 
0 = Todos Los bits están a 0 

*/ 


ñ 
char mbitss /% Apuntador a Los bits del vector */ 


bits = by -> bvbits; /* Fijación de apuntador de trabajo */ 


while (bits l= by => bvend)  /% Para vector de bits completo */ 
, 
A Obiters) Ie Sí distinto de cero */ 
return bit: 7% Devolución de apuntador al byte NZ »/ 








Figura 1-1. (Continuación.) 
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return O /* Indicación de vector cero +/ 





3/8 Final by_nz +/ 


/n bv3 = bvi kh bv2 e/ 


Ir Esta función realiza La operación AND entre Los bytes de Los vectores 
de bits 1 y 2 almacenando el resultado en el vector 3, */ 


Ia Parámetros de entrada */ 
struct _bv mbvl) /* Apuntador a vector de bits de entrada */ 
struct Tbv mbv21 /% Apuntador a vector de bits de entrada */ 


ln Parámetros de salida */ 
struct _bv mbv3; /% Apuntador a vector de bits de salida +/ 


1 
char mbitsl, mbiteZ, mbits3y — /% Apuntadores de trabajo a Los vectores de bits / 


bitsl = bvl -> bv_bitsr /* Inictalización de apuntadores de trabajo */ 
DALsZ = bv2 > bv-bitsr 
bits = bv3 => bvzbitar 





/* Realización de La operación AND hasta el final de alguno 
de Los vectores de bits 2/ 
wiile (bitel la bvl => bv_end AL 
Ats2 1= bvZ2 -> bvzend LE 
4t43 la Dvd > bvend) 
t 





MDitaDrs m mbitelos E mbitazos) /m Dvd bvl 2 bv2 9/ 


1 
) /* Final de by_and / 





78 bv3 = bvl 
Ir Esta función realiza La operación OR entre Los bytes de Los vectores 
1 y 2 almacenando el resultado en el vector 3. */ 





or bv2 9/ 





ln Parámetros de entrada */ 
struct bw mbvly /% Apuntador a vector de bits de entrada +/ 
struct Zby abv2r 7% Apuntador a vector de bits de entrada */ 


/s Paránetros de salida +/ 


sruet _bv abv3; /% Apuntador a vector de bits de salida */ 
Ñ 
char mbitsl, mbits2, mbits3y — /% Apuntadores de trabajo a Los vectores de bits */ 


bitsl = bvi -> bv.biter /* Inictalización de apuntadores de trabajo */ 
2 > bvzbites 
DILSS = bva > bvzbiter 





1% Realización de La operación OR hasta el final de alguno 
de Los vectores de bits. */ 
Mille (bital 12 bvl > by_end 
bÁtaZ la bv2 -> bv 
DILE ln bv3 > Bv 








MAtages = mbiteles | mbitazos; /n bv3 = bvl or bv2 =/ 
, 
) /4 Final de bv_or */ 





ma 2... .0/ 
/x Visualización de vectores de bits */ 
A nm 
Ju Esta función visualiza en hexadecimal el contenido del vector de bits 
especificado. Se utiliza normalmente para depuración de programas. */ 








Y 
br 
1 





le Paránetros de entrada 4/ 
char atte /% Titulo para La visualización +/ 
struct _by mbvr /% Apuntador al vector de bits */ 









































































































Figura 11-1.  (Continuación.) 
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/* Parámetros de salida mm 
Ninguno. 


/x Apuntador de trabajo */ 

/« Contador utilizado para formatear salida +/ 

/* Contador para procesamiento de Los bits de un byte %/ 
/x Valor a visualizar */ 


tte /% Visualización de título */ 


bits = by => bvzbiter le Ej 
byte_count = 01 1% 14 





Printi(“AMBIL Vector 1% 











ión de apuntador de trabajo */ 
'aLización del contador */ 





Mile (bíta ln by => bveng) /x Para vector completo +/ 


( 
ÁN (byte_count X 5 mn 0) 1% Comprobación de nueva Línea +/ 
7 Visualización número de bit */ 7] 

PrAMLIC“ANxAd 1 *.byte_coumt << 3) 


byte_value 





mbitussy — /% Obtención del byte siguiente del vector */ 


for (bít_count = Oy bit_count < 8) bát_counte+) 
í 
/+ Visualización del bit más a La izquierda, a continuación desplazamiento 
a la izquierda un bit +/ 
putcharí/ 2)1 /% Separador 
ue E -0x80) 7 21% 1 -0%5 
, /% Desplazamiento a La izquierda */ 
















y 
primer /r Separador +/ 
byte_countesy — /% Actualización contador de bytes +/ 

H 


> /% Final de bv_disp +/ 





1% Final de LIBRARY.C 4/ =l 





Figura 11-1. (Continuación.) 


Asociada con la biblioteca de funciones hay otra parte de prof 
fuente denominada “LIBRARY.H”, que se muestra en la figura 11-2. Este 
fichero “de cabeza” debe ser incluido al principio de cada programa que 
llama a una función cualquiera de la biblioteca. 

Por razones de claridad, este capítulo describe las funciones más 
sencillas en primer lugar, seguidas por las más complicadas y finalmente 
por los programas de utilidad que utilizan las funciones. 

Algunas funciones de la biblioteca y algunas definiciones de la cabeza de 
biblioteca no son utilizadas por las utilidades mostradas en este capítulo. Se 
han incluido para ilustrar técnicas y porque pueden ser útiles para otros 
programas de utilidad que se pueden escribir. 











define LIBYN “1.0% 1% Nónero de versión de biblioteca +/ 


/n Este fichero contiene grupos de definiciones útiles. 
Debe incluirse al principio de cualquier programa 
que utilice funciones de LIBRARY.C */ 


/* Definición para realizar pequeñas modificaciones al lenguaje C. */ 





Figura 11-2. LIBRARY.H, programa que debe ser incluido al principio de cualquier programa 
que llame a funciones LIBRARY en la figura 11-1. 
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Ik Una de Las funciones de b 
alloc, para asignación de 
son para alloc. */ 





Lioteca utiliza La función C del 8DS, 
moria. Las definiciones siguientes 








struct _header /x Cabecera para bloque de memoria asignando */ A 
e 
Struct header m_ptri  /* Apuntador a cabecera siguiente en La serie */ 
unsigned _sixer 1% Núnero de bytes del bloque asignado */ 
» 
struct header _baser /x declaración de la primera cabecera de La serie */ 


struct Zheader 5_e /» Utilizado por funciones alloc() y freel) */ a] 





/4 Mineros de Llamada a La función del BDOS */ 23 


SETDISK 14 /+ selección de disco */ 
SEARCH 17 Búsqueda del primer caso */ 
SEARCHN 1 Búsqueda del siguiente */ 
DELETEF 19 /+ Borrado del fichero */ 6 
OETDISK 23 /« Obtención de disco por defecto */ 

SETDMA 26 /w Fijación de dirección de DMA (Lectura/escritura) */ 
OETDPARM 31 /+ Obtención dirección de bloque de parámetros del disco */ 
ETUSER 32 7* Obtención número de usuario en curso */ 

SETUSER 32 / Fijación número de usuario en curso */ J 





I% Ltanadas directas al BIOS 
Estas definiciones son para Llamadas directas al BIOS. 
ATENCION: — Su utilización hace menos transportable el programa. 
Cada simbolo se relaciona con el salto correspondiente en el 
vector de saltos del BIOS. 
Sólo están definidas Las entradas más usuales. */ 





Sóefine CONST 2 /% Estado de consola +/ 
Adeline CONIN— 3 /x Entrada de consola 4/ 
Adefine CONQUT 4 /+ salida de consola */ 
Adelina LISTS /e salida de impresión (Listado) */ 
Adeline AUXOUT 6 /u Salida auxiliar */ 
Bóefine AUXIN 7 /e Entrada auxiliar */ 

e 











Adefíne HOwE /* Puesta a cero del disco (pista y sector) */ a 
Adefáne SELDSK 9 /u selección de disco lógico */ 
Adelina SETTRK 10 /* Fijación de pista */ 
Bdefine SETSEC 11 Ie Fijación de sector */ 
Gdeline SETOMA 12 /* Fijación de dirección de DMA */ 
Adefine DREAD 13 /* Lectura de disco */ 

DARITE 14 /x Escritura en disco */ 

LIstST 18 /x Estado de Listado »/ 

SECTRN 16 /x traducción de sector */ 
Adefine AUXIST 17 /u Estado de entrada auxiliar */ 
Adefine AUXOST 18 /u Estado de salida auxiliar */ 


In Entradas "pri 





jadas" al vector de saltos */ 


ddeline CIOINIT 19 /x Inicialización de E/S de caracteres específicos */ 
Adeline SETDOO 20 /u Activación temporizador-centinela */ 
define CBOADDR 21 /+ Obtención de dirección del bloque de configuración */ a] 


/1 definiciones para acceder al bloque de configuración */ = 


Adefine CB_OET 21 /% Núnero de salto del BIOS a rutina de acceso */ 
Adefine DEV_INIT 19 /n Salto del BIOS para inicialización de dispositivo +/ 





Báefíne CB_DATE O /a Fecha en ASCIL e/ 


Bdefine CBZTIMEA 1 /x Mora en ASCIL 4/ 


Bdefine CBZDTFLAOS 2 /x Indicadores de fecha y hora */ 
Adeline TIME_SET 0x01 la Este bit de NZ indica que se ha fijado La fecha */ e 
Bdefine DATE-SET 0x02 /s Este bit de NZ índica que se ha fijado La hora */ 


ddeline CBFIP a /% Apuntador a entrada forzada */ 
Udefine CB-SUM 4 /+ Mensaje de inicialización del sistena */ 





Bdeíine 
define 
Bdefine 
hdetine 





/x Entrada de consola */ 
/x Salida de consola */ 
/x Entrada auxiliar */ 
/+ Salida auxiliar */ 











(Continuación. 
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Bdefine CBLI 9 /x Entrada de Listado +/ 
Ucerine CBLLO 10 /* Salida de impresión */ 


Adefine CB_DTA 11 /x Direcciones de tabla de dispositivo */ 
define CB-CIZ224 12 /x Indicador de formato de reloj de 12/24 horas */ 
define COZRTCTR 13 /% Núnero de pulsos por segundo del reloj de tiempo real */ 


Mdefine CB_WDC 14 /x Contador-centinela */ 
Bdefine CBZHDA 13 /x Dirección de centinela */ 


define CB_FKT 16 /x Tabla de teclas función +/ 
define CB_COET 17 /* Tabla de escapes de salida consola »/ 


Adefine CB_DO_1S 18 /s Flujo de inicialización de dispositivo O */ 
Adefine CB_DO_BRC 19 /+ Constante de velocidad de transmisión de dispositivo 0 */ 


Adefine CB_DI_IS 20 /* Flujo de inicialización de dispositivo 1 
define CB_DIZBRC 21 /* Constante de velocidad de transmisión de dispositivo 1 */ 


Adefine CB_02_1S 22 /* Flujo de inicialización de dispositivo 2 */ 
Mdefine CB-D2-BRC 23 /* Constante de velocidad de transmisión de dispositivo 2 */ 


Maefine CB_1Y 24 1% Vector de interrupciones */ 
Adefine /% Desplazamiento del bloque de configuración a Largo plazo */ 
Ddefine /% Longitud del bloque de configuración a Largo plazo */ 


/x Indicador de ficheros públicos */ 
CBZAcBU 28 /x Menoria intermedia nultiorden */ 
Udefine CB_POLLC 29 /% Indicador de análisis de consola */ 


/% Números de dispositivo y nombres para dispositivos físicos +/ 
/% NOTA: Cámbiense estas definiciones para computadora particular */ 


MAXPDEV 2 /% Núnero máxino de dispositivo físico */ 
/% Nombres para dispositivos físicos */ 


Acefíne PN_T "TERMINAL" 
Adefine PNÍ "MODEM" 
Odefine PNZP "PRINTER" 


/* Estructura y definiciones para teclas=función +/ 


Adefáne FK_ILENGTH 2 /* Núnero de caracteres de entrada cuando se pulsa tecla-función 
NOTA: No debe incluirse el escape. */ 
Tine FK_LENGTH 16 /x Longitud de La cadena sin incluir fk_term */ 
fine FKZENTRIES 18 1% Número de entradas de tecla-función En la tabli 


struet ft /x Tabla de teclas=función */ 
ú 


char fk_inputCFK_ILENOTHI1 /x Primer carácter no en la tabla */ 
char fkZoutputCFK_LENOTHI) /x salida de cadena de caracteres */ 
char fkZterm /x Carácter de terminación */ 

” 


/* definiciones y estructura para tablas de dispositivo +/ 


/x Bits de protocolo */ 
/x Nota: Si el bit más significativo 
está a uno, entonces la función set_proto 
realizará él OR con el valor. Ello 
permite que Input DTR coexista con el 
protocolo XON o EIX. */ 


Bdefine DT_ODTR 0x8004 /x Salida DIR alto para enviar (OR-ed in) */ 
Bdefine DTOXON 0x0008 In Salida de XON 2/ 
Bdefine DTZOETX OX0010 /r salida de ETX/ACK +/ 





define DT_IRTS Ox8040 /a Entrada RTS COR=ed in) */ 
Bdefine DTZIXON 0x0080 /e Entrada XON +/ 





Figura 11. (Continuación.) 
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A ——— 5 


Mdefine ALLPROTO OXDC /% Combinados todos Los protocolos */ 
struct gt 
4 
char dt_f1CIA: 
char dtatir 


/x Tabla de dispositivo */ 
Rellenador +/ 

Byte 1 de estado -- tiene indicador de protocolo */ 
Byte de estado 2 */ 

Rellenador +/ 

Longitud de mensaje ETX/ACK */ 

Rellenador */ 


unsigned dtetxmir 
char dt_13C 121) 
” 


/* Valores devueltos por comp_frame (comparación de nombre de fichero ) +/ 


BáeTine NAME_EO O 
Adeline NAMELLT 1 
Adeline NAMEZOT 2 
Adetine NAMEZNE 2 


Is Nombres iguales */ 
/x Nombre menor igual que máscara */ 
Tx Nombre mayor igual que máscara */ 
/n Nombre distinto (y comparación ambigua) */ 


Is Estructura del bloque de control de ficheros CP/M estándar */ 


Máefine FOBSIZE 36 /% Definición de La Longitud total del FCB */ 


struct _fcb 
a 


In Disco Lógico (0 = detecto) +/ 
/% Nombre-de-fichero.tipo (con atributos) */ 

14 Extensión en curso */ 

/% Reservado para CP/N */ 

/% Cuenta de registros utilizados en extensión en curso */ 
/x Los bloques pueden ser */ 

ñ /% De un solo byte o de dos bytes +/ 

short fcbab_shortL16)1 


Khort fcb_dtsky 


unsigned Fcb_s12r 
short fcb_recentr 
Union 


/* Registro en curso en La extensión */ 
7% Registro para Lectura/escritura aleatoria */ 


/s Bloque de parámetros utilizados para Llamadas a rutinas de manejo de directorio */ 


Adefine DIR_BST 128 /% Tamaño de La memoria intermedia de directorio */ 
struct gire! 

úl 

short de_open; /% 0 para petición de apertura de directorio */ 
7 NZ cuando se ha Llegado al final del directorio */ 
/u NZ para escribir el sector en curso en el disco */ 
7% Apuntador a La entrada de directorio en La memoria internedia */ 








Ort dpZurita 
struct dir mdp_entryr 


pa 


char de_bufter [DIR_BSZ 





/% Menoría intermedia de sector del directorio */ 





/x Disco Lógico en curso */ 

/u Pista de comienzo */ 

/u Sector de comienzo */ 

/% Número de entradas al directorio +/ 

/x Entradas en fase de procesamiento */ 

/x Número de sectores por pista */ 

Tx Número de bloques por entrada al directorio */ 
/x Número de bloques +/ 

/x Tanaño de Los bloques (en Kbytes) */ 


/% La función err_dir se utiliza para tonar en cuenta Los errores 
encontrados por Las rutinas de manejo del directorio open_dir y rw_dir. 
Err_dir necesita de un parámetro para definir La operac 
realizada cuando ha ocurrido el error. Las definiciones siguientes 
representan Las operaciones posibles. */ 


Adefine M_DIR O 
Odefine RDIR 1 








/u Escritura del directorio */ 
/u Lectura del directorio */ 








Odefine ODIR 2 7% Apertura del directorio */ 





Figura 11-2. (Continuación.) 
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/% Bloque de parámetros del disco mantenidos por CP/N */ 
struct db 
ú 


/x Sector por pista */ 
/x Desplazamiento de bloques */ 
/x Máscara de bloques */ 
Ju Máscara de extensión */ 
unsigned dpb_maxabny — /* Número máximo de bloque */ 
unsigned dpbmaxdeny — /% Número máximo de entrada al directorio */ 
short dpb_raBO Bloques reservados para +/ 
short deb_rablr Tu bloques del directorio */ 
unsigned dpb_dískcar — /* Area de trabajo de cambio de disco */ 
unsigned dpb_trkoft; — /% Desplazamiento de pista */ 
” 


/* Formato de entrada del directorio de disco */ 


struct dar e 
“char de_usernor /% Número de usuario o OXES si entrada Libre 4/ 
char de_fnameC11)) /% Nombre de fichero [8] y tipo 13] */ 

/% Número de extensión de esta entrada */ 

/% Número de registros de 128 bytes utilizados 
en el último bloque +/ 

/. Los bloques pueden ser de un único byte 
(0 de dos bytes */ 


/s Parámetros requeridos por el disco para Lectura/escritura a nivel del BIOS */ 
struct gro 
ú 


short dr_disko [e Disco lógico A = 0,8 =1... */ 
unsigned dr_t lu Pista (para SETTRK) */ 

/r sector (para SETSEC) */ 

/% Dirección de La memoria intermedia (para SETDMA) +/ 


/% Bloque de control de búsqueda utilizado por Las funciones de rastreo de directorio */ 
struct _scb 


Número(s) de usuario a contrastar */ 
Nombre y tipo de fichero */ 
Número de extensión */ 
Bytes ficticios para hacer esto cono 
un bloque de control de fichero */ 
short scb_lengthr Número de bytes a comparar */ 
short scb_diskI Disco en curso a buscar */ 
unsigned Gcb_adisk Mapa de bits de Los discos a buscar 
el bit más a La derecha es para el disco 





» 


/x Definiciones relacionadas con La tabla de códigos */ 
Wdefine CT_SNF OXFFFF — /% Cadena no encontrada */ 


struct et /+ Definición de La estructura de La tabla de códigos */ 


unsigned _ct_codes /u código */ 
ghar est /* Apuntador a cadena */ 
, 





Figura 11-2. (Continuación.) 


Capítulo 11: Programas de utilidad adicionales 423 





/x Estructura para Los vectores de bits */ 


struct by 
0 


unsigned by_bytes; /% Número de bytes del vector +/ 
char mbv_biTs) 


E / Apuntador al priner byte del vector de bits */ 
ghar wbv_endr /+ Apuntador al byte que sigue al vector de bits */ 


Je Final de LIBRARY-H 2/ 





Figura 11-2.  (Continuación.) 





Funciones de biblioteca 














Esta sección describe las funciones de biblioteca y las secciones desde el 
fichero de cabeza que deben ser incluidas al principio de cada programa de 
utilidad. 


Un cambio menor a lenguaje C 


Un problema menor con el compilador C BDS es que no soporta l 
enteros “cortos”, o números enteros que tengan sólo un único byte de 
longitud. Es conveniente declarar ciertos valores como cortos para que | 
sirvan de recordatorio a la definición de tipo estándar. Por consiguiente, el l 
compilador C BDS deberá ser “engañado” declarando estos valores como si l 
fueran simples caracteres. Para ello, el fichero de cabeza de biblioteca | 
contiene la declaración l 


Hdefine short char. 


que se muestra en la figura 11-2, sección a. 

El “define” indica a la primera parte del compilador C, el pre- 
procesador, que sustituya la hilera “char” (que declara en una variable tipo 
carácter) siempre que encuentre la cadena “short” (que normalmente 
declararía un número entero corto en C estándar). 

Obsérvese que las cadenas de caracteres incluidas entre “*/+” y “«/” se 
ven como comentarios y son ignoradas por el compilador. 


Llamadas al BDOS 


La biblioteca estándar de funciones que viene con el compilador C 
BDS incluye una función para hacer llamadas al BDOS, denominada 


























424  CP/M Manual para programadores 


Llamadas al BIOS 


Acceso al bloque de configuración del BIOS 







“bdos”. Toma dos parámetros, y una llamada típica es de la fo 
siguiente: 


bdos(c.de): 


o DAY 








El parámetro *c” representa el valor que será situado en el registro C, 
es el número de código de la función del BDOS. El “de” es el valor que 
colocado en el par de registros DE. : 
La cabecera de biblioteca contiene definiciones (+ definición de deck 
ciones) para las funciones del BDOS 14 a 32, haciendo estas funciones 
fáciles de utilizar (figura 11-2, c). La función 32 (obtención/fijación nú 
de usuario en curso) tiene dos definiciones; el parámetro “de” se utiliza 
para diferenciar si ha de realizarse una función de obtención o de fijación. 






La biblioteca estándar C BDS contiene también dos funciones que. 
hacen llamadas directas al BIOS. Estas son “bios” y “biosh”. Difieren 
únicamente en que la función bios devuelve el valor al registro A al volver 
de la rutina del BIOS, mientras que la biosh, como su nombre indica, 
devuelve el valor al par de registros HL. Ejemplos de su uso son 


bios(jump_number ,bc); 


y 
biosh(jump_number,bc,de); 


Ambas funciones toman como primer parámetro el número de la 
instrucción de salto del vector de saltos del BIOS al cual hay que transferir 
el control. Por ejemplo, el punto de entrada de estado de consola es el tercer 
JMP del vector. Numerando desde 0, éste sería el salto número 2. 

El fichero cabecera de biblioteca contiene 4 definiciones para los saltos 
del BIOS del 2 al 21 (figura 11-2, d). El último grupo de estas 4 definiciones 
(19 a 21) es para las sumas “particulares” a los vectores de salto del BIOS 
estándar descritos en el capítulo 8. 

Recuérdese, sin embargo, que el uso de llamadas directas al BIOS hace 
más difícil mover los programas de un sistema a otro. 


Como se recordará, el bloque de configuración es una colección de 
estructuras de datos del BIOS. Estas estructuras se utilizan bien para 
almacenar creaciones reales de ciertas opciones seleccionables por el 
usuario o para indicar otras estructuras de datos importantes del BIOS. 
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Uno de los saltos “particulares” añadido al vector de saltos del BIOS 
transfiere el control a una rutina que devuelve de dirección a la memoria de 
una estructura de datos especifica. Por ejemplo, si un programa de utilidad 
necesita situar la palabra del BIOS que determina desde qué dispositivo 
fisico hay que leer la entrada de la consola, puede transferir el control al 
salto 21 del vector de saltos del BIOS (actualmente el salto 22.) con un 
valor de código 5 en el registro C. Este salto transfiere el control al código 
CB$Get$Address, que a su regreso fijará el HL en la dirección del vector de 
redireccionamiento de entrada de consola. El programa de utilidad puede 
entonces leer de esta variable o escribir en ella. El fichero de cabecera de 
biblioteca contiene declaraciones de definición relativas a los valores de 
código con nombres nemónicos (figura 11-2, e). 

Se necesitará recurrir al código fuente de la figura 8-10 para determinar 
si la dirección devuelta por la función del BIOS es la dirección del elemento 
de datos o la dirección de una tabla de alto nivel que a su vez señala el 
elemento de datos. 

Para acceder a la fecha actual del sistema, por ejemplo, habrá que incluir 
el código siguiente: 
char *ptr_to_date; /* Declaración de apuntador a fecha */ 
ptr_to_date = biosh(CB_DATE); /* Obtención de dirección */ 


El ptr_to_ date puede utilizarse entonces para acceder directamente a la 
fecha. 

Durante la depuración inicial de una utilidad es útil poder interceptar 
todos estos accesos al bloque de configuración, en parte para reasegurarse 
de que el programa de utilidad está trabajando como debe y en parte para 
asegurarse de que la rutina del BIOS está devolviendo las direcciones 
correctas a las estructuras de datos. Sin embargo, la biblioteca de utilidades 
contiene una función, “get_cba”, que obtiene la dirección del bloque de 
configuración (figura 11-1, a). 

Al principio aparece que get_cba se declara como una función que 
devuelve un apuntador a los caracteres. Esto no es estrictamente cierto. A 
veces la dirección que devuelve indicará caracteres, otras veces números y a 
veces estructuras (tales como la de la tabla de teclas de función). 

La instrucción “printf” se ha dejado en la función como una anticipa- 
ción a la utilidad de depuración. Si se necesita ver alguna salida de 
depuración siempre que se utilice la función get—cba, bórrese el “/+” y el 
**s/” que rodean a “printf” y recompilese la biblioteca. 


Acceso a la tabla de teclas de función del BIOS 





El BIOS que se muestra en la figura 8-10 contiene el programa para 
reconocer cuando una secuencia de escape de entrada indica que se ha 
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Acceso a la tabla de dispositivo del BIOS 


Pulsado una de las teclas de función del terminal. En lugar de dew 
precisamente la secuencia de escape, el controlador de la consola iny 
una hilera de caracteres previamente programada en la corriente de entr 
de la consola. Por ejemplo, en un terminal DEC VT-100, cuando se pulsa 
tecla de función PFI, el terminal emite la siguiente secuencia de ca 
ESCAPE, “O”, *P”. La tabla de teclas de función contiene el “OP” y 
hilera de caracteres terminada en byte 00H para inyectar en la corriente 
entrada de la consola. En la figura 8-10, la hilera del ejemplo es “FUNC- 
TION KEY 1”, LINE FEED. El fichero de cabeza de biblioteca contiene 
declaración para la estructura de la tabla de teclas de función (figura 11-2,h). 
Obsérvese el uso de “z£define” para declarar la longitud de los 
caracteres de entrada emitidos por el terminal, así como la longitud de la 
Cadena de salida. 

Para acceder a la entrada de una tabla de tecla de función, debe 
declararse un apuntador a una estructura ““_fkt” como ésta: 






struct _fkt *ptr_to_fkt; /* Declaración de apuntador */ 
ptr_to_fkt = get_cba(CB_FKT); /* Fijar apuntador */ 
printf("Display the first string : %s", 
ptr_to_fkt => fk_output); 
+Hptr_to_fkt; /x Desplazamiento a entrada siguiente +/ 


La función get—cba se utiliza para devolver la dirección de la primera 
entrada de la tabla de tecla de función y fijar un apuntador en ella. 
Entonces la función printf (parte de la biblioteca C BDS estándar) se 
utiliza para imprimir la primera cadena, que viene sustituida por “%s” en 
la cadena acotada. Obsérvese que la especificación 


+ptr_to_fkt 


no añade precisamente uno al apuntador de la tabla de teclas de función 
—añade todo lo que necesita para desplazar el apuntador a la próxima 
“entrada” en la tabla. 


Las tablas de dispositivo son estructuras importantes para los dispositi- 
vos serie servidos por la consola, auxiliares y controladores de dispositivos 
de listado del BIOS. Se declaran en la línea 1500 de la figura 8-10. 

La función get—cba no devuelve un apuntador a una tabla de dispositi- 
vo específica, sino un apuntador a una tabla de direcciones de tabla de 
dispositivo. Cada entrada de la tabla de direcciones corresponde a un 
número especifico de dispositivo. Si no hay tablas de dispositivo para un 
número especifico de éste, entonces la entrada correspondiente de la tabla se 
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pondrá a cero; el fichero de cabeza de biblioteca contiene definiciones para 
la tabla de dispositivos (figura 11-2, i). 

Las tablas de dispositivo contienen, entre otras cosas, los protocolos de 
líneas serie actuales utilizadas para sincronizar la transmisión y recepción 
de datos por medio de los controladores de dispositivos y de los mecanis- 
mos físicos. Un ejemplo, PROTOCOL, se muestra más adelante en este 
mismo capítulo. El ejemplo de definición de declaraciones y definición de 
estructura que se muestran aquí están modelados para los requerimientos 
de esta utilidad. Los únicos bytes relevantes son los dos bytes de estado 
dt_stl y dt_st2 y la longitud del mensaje utilizado con el protocolo 
ETX/ACK, dt_etxml. Las definiciones que se muestran son para los bits 
específicos de los bytes de estado de la tabla de dispositivo. La utilidad 
PROTOCOL utiliza el bit más significativo para indicar si el establecimien- 
to de un protocolo dado puede coexistir con otros. 

Para acceder a estos campos, utilícese el código siguiente: 


struct _ppdt 


char xpdtC161; — /* Matriz de 16 apuntadores a tablas de dispositivo */ 
Y *ppdt; /x Apuntador a la matriz de 16 apuntadores */ 
struct _dt mdt; /x Apuntador a la tabla de dispositivo */ 


ppdt = get_cba(CB_DTA); /* Fijar apuntador a matriz de apuntadores */ 
dt = prdt tidevice_nol; /* Fijar apuntador a tabla de 
dispositivo especificado */ 


if cdt) 
printf ("WnError - no device table for this device."); 


dt -> dt_etxml = 01 /x Puesta a cero de Longitud de mensaje ETX */ 


Acceso al bloque de parámetros de disco del BIOS 


Algunos de los programas de utilidad mostrados en este capítulo deben 
acceder al directorio de ficheros en un disco lógico dado. El bloque de 
parámetros del disco (DPB) indica el tamaño y la situación del directorio de 
ficheros. La cabeza de biblioteca contiene una definición de la estructura 
que describe el DPB (figura 11-2, n). 

Para situar el DPB, se puede hacer una llamada directa del BIOS a la 
rutina SELDSK, que devuelve la dirección de la cabecera de parámetros del 
disco (DPH). Entonces se puede acceder al apuntador DPB del DPH. 
Alternativamente, usando el BDOS, se puede hacer del disco requerido el 
disco por defecto y solicitar entonces la dirección de sy DPB. El programa 
para el último método se muestra en la función get—dpb incluida en la 
biblioteca de utilidades (figura 11-1, u). 

La función get —dpb utiliza una función BIOS SELDSK en primer lugar 
para ver si el disco específico es legítimo. Sólo entonces utilizará el BDOS. 
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Lectura o escritura de un disco utilizando el BIOS 





Acceso a la entrada del directorio de ficheros 


Cuando se escribe un programa que utiliza llamadas directas al BIOS, 
aumenta la posibilidad de problemas al trasladar el programa desde 
sistema a otro. Sin embargo, en ciertas circunstancias es necesario utilizar 
BIOS. La lectura y la escritura del directorio de ficheros es una de éstas; 
BDOS no puede utilizarse para acceder directamente al directorio. 
cabecera de la biblioteca contiene una declaración de estructura para 
bloque de parámetros que contiene los detalles de una lectura o escri 
“absoluta” del disco (figura 11-2, p). 

Obsérvese el apuntador a la memoria intermedia de datos de 128 by! 
utilizado para mantener uno de los “registros” de CP/M. 

Las funciones de lectura y escritura del disco son rd_disk (figu- 
ra 11-1, k) y wrt-zdisk (figura 11-1, 1). Ambos toman a_drb como 
parámetros de entrada y ambos llaman a la función set disk para hacer 
que el BIOS individual llame a SELDSK, SETTRK y SETSEC. 

Hay que observar especialmente el código set disk (figura 11-1, m) que 
convierte un sector lógico en un sector físico utilizando la tabla de 
traducción de sectores y el punto de entrada SECTRAN del BIOS. 


Todas las partes de los programas de utilidad que acceden a un 
directorio de disco comparten la misma lógica básica sin tener en cuenta su 
tarea especifica. Esta lógica puede describirse de la mejor manera en 
pseudocódigo: 


mientras (no al final del directorio) 
, 


( 

acceso a entrada siguiente del directorio 

si (esta entrada coincide con el actual criterio de búsqueda) 
ñ 


( 
procesamiento de la entrada 
h 


) , 


Existen dos caminos para implementar esta lógica. El primero utiliza el 
BIOS para leer el directorio. Las entradas se presentan al programa de 
utilidad exactamente como ocurren en el directorio de ficheros. El segundo 
utiliza las funciones del BDOS de búsqueda del primero y búsqueda del 
próximo y accede al directorio fichero a fichero mejor que mediante la 
entrada. Este último método es más adecuado para utilidades que procesan 
ficheros más que entradas. la utilidad ERASE, descrita más adelante en este 
capitulo, ilustra este segundo método. 
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En la biblioteca están previstos tres grupos de funciones: acceder a la 
próxima entrada del directorio, buscar coincidencia entre el nombre y la 
entrada en curso al apretar tecla de búsqueda y asistir con procesamiento al 
directorio. 


Funciones de acceso al directorio 


Un cierto número de funciones están relacionadas con el acceso al 
directorio de ficheros. El primer grupo de tales funciones realiza lo 
siguiente: 


get nde (obtención de la próxima entrada al directorio; figura 11-1, n) 
Esta función devuelve un apuntador a la entrada siguiente del 
directorio o devuelve cero si se ha alcanzado el final del directorio. 


open— dir (apertura de directorio; figura 11-1, 0) 
Esta función se llama por medio de get nde para abrir un directorio 
para procesamiento. 


rw- dir (directorio de lectura/escritura, figura 1-1, p) 
Esta función lee o escribe el sector del directorio en curso. 


err_—dir (error del directorio, figura 11-1, q) 
Esta rutina de propósito general compone un mensaje de error si el 
BIOS indica que tiene problemas bien leyendo o escribiendo en el 
directorio. 





Todas estas funciones utilizan un bloque de parámetros de directorio 
para coordinar su actividad. La cabecera de biblioteca contiene las defini- 
ciones para esta estructura (figura 11-2, 1), así como definición de declara- 
ciones para códigos de operación utilizados en las funciones de acceso al 
directorio (figura 11-2, m). 

Antes de llamar get_nde, el programa de llamada necesita fijar 
dp—open a cero (forzando una llamada a open—dir) y el campo de 
dp-— disk al disco lógico correcto. La función open— dir establece todo lo de 
los campos restantes, utilizando get-—dpb para acceder al bloque de 
parámetros del disco para el disco especificado en dp disk. 

De los restantes indicadores, dp—end se fijará a uno en la realidad, 
cuando se alcance el final del directorio, y dp— write deberá ser distinto de 
cero para que rw-_ dir escriba el sector en curso en el disco. 

La función get nde incluye todo lo concerniente a la lógica necesaria 
para trasladarse de la entrada de un directorio a la próxima, leyendo en el 
sector siguiente cuando sea necesario y escribiendo el sector previo si el 
indicador dp—write ha sido fijado a un valor distinto a cero por el 
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Funciones de comparación del directorio 


programa de llamada. Cuenta también el número de entradas del di 
procesadas, detectando e indicando el final del directorio. 
El programa al principio de la función llama open— dir si el indicador 
dp—open es falso. Obsérvese el código al final de open_dir que fija 
número de bloques por entrada del directorio (cp nabpde). Este número 
está calculado desde el número máximo de bloques del bloque de pará; 
tros del disco. Si es mayor de 255, cada bloque debe ocupar una palabra 
habrá ocho bloques por entrada de directorio. Si hay 255 o menos bloques, 
cada uno tendrá una longitud de un byte y habrá 16 por entrada. El 
del bloque en Kbytes se calcula por medio de una sencilla fórmula. 
En los primeros pasos de las utilidades de depuración, ha de ponerse un 
comentario en la línea que realiza la llamada al wrt_ disk. Esto prevendrá 
que se escriba sobre el directorio. Entonces se pueden comprobar también 
aquellas utilidades que intentan borrar entradas del directorio sin riesgo de 
dañar cualquier dato del disco. 
La última función de este grupo, err—dir, es una función de manejo de 
errores corriente para cuidar los errores realizados mientras se lee o $ 
escribe el directorio. 


El segundo grupo de funciones que acceden al directorio de ficheros 
seleccionan por comparación cada entrada del directorio según uno 
criterios de búsqueda específicos. Estos incluyen las siguientes funciones: 


setscb (fijación de bloque de control de búsqueda; figura 11-1, 1) 
Un bloque de control de búsqueda (SCB) es una estructura que 
define las entradas del directorio que hay que seleccionar para 
procesamiento. 


comp-—fname (comparación de nombre de fichero; figura 11-1, f) 
Esta función compara el nombre de fichero en la entrada del 
directorio con una especificada en el bloque de control de búsqueda. 


La cabecera de biblioteca contiene la definición de la estructura para el 
bloque de control de búsqueda (figura 11-2, q). Este SCB es una estructura 
hibrida. La primera parte de ella es un cruce entre un bloque de control de 
fichero (FCB) y una entrada de directorio. Los últimos tres campos, 
scb—length, scb— disk y scb—adisks, son peculiares del bloque de control 
de búsqueda. Obsérvese que su longitud total es la misma que en el FCB, de 
forma que puede utilizarse la función estándar C BDS, set_fcb. Esta 
función fija el nombre y tipo de fichero en un FCB, reemplazando “+” por 
tantos caracteres **?” como se requiera, y entonces pone a cero todos los 
bytes no utilizados. 


Capítulo 11: Programas de utilidad adicionales 431 


El campo sch—length indica a la función comp-— fname (comparación 
de nombre de fichero) cuántos bytes de la estructura deben ser comparados. 
Este campo se pondrá a 12 para comparar el número de usuario, el nombre 
de fichero y el tipo, o a 13 para incluir el número de extensión. 

Obsérvese que scb— disk es el disco en curso que ha de buscarse, siempre 
que scb__adisks sea un mapa de bits con un bit a 1 correspondiendo a cada 
uno de los 16 posibles discos lógicos que han de ser buscados. 

El bloque de control de búsqueda es inicializado por la función setscb. 

Obsérvese la forma del nombre de fichero que el setscb espera recibir. 
Esto se describe en los comentarios al principio de la función. 

Algunos programas de utilidad utilizan sus propias versiones especiales 
de setscb, volviendo a tomar su ssetscb (setscb especial) para evitar que la 
versión de la biblioteca sea enlazada (linked) con los programas. 

La función complementaria comp-— fname se utiliza para comparar los 
primeros bytes de la entrada actual del directorio con los bytes correspon- 
dientes del SCB. 

La función comp fname realiza una comparación de cadenas especiali- 
zada del número de usuario, el nombre y tipo de fichero y, opcionalmente, 
el número de extensión. Un carácter **?” en el nombre, tipo y extensión de 
fichero del bloque de control se corresponderá con cualquier carácter de la 
entrada del directorio. Sin embargo, en el número de usuario del SCB, un 
*)” corresponderá sólo a un número de valor 0 a 15; no equivaldrá a una 
entrada del directorio que tenga el byte de número de usuario puesto a ESH 
(o OxE5, como notación hexadecimal de C). 

Esta función devuelve también uno de varios valores para indicar el 
resultado de la comparación. Estos valores están definidos en el fichero de 
cabecera de biblioteca (figura 11-2, j). 


Funciones de procesamiento del directorio 


El grupo final de funciones que tienen acceso al directorio son aquellas 
que ayudan al procesamiento de las propias entradas del directorio. Estas 
funciones utilizan una definición de estructura para acceder a cada entrada 
del directorio (figura 11-2, 0). 

Una sentencia de unión se utiliza para los números de bloques. Estos 
pueden ser entradas de uno o de dos bytes, dependiendo del número 
máximo de bloques que deban ser representados. La sentencia dice al 
compilador C del BDS si habrá una matriz de 16 bytes de números enteros 
cortos (caracteres) o una de ocho enteros de dos bytes sin signo. 

Las funciones contenidas en este grupo pueden dividirse en tres sub- 
grupos: 


e Aquellos que se enfrentan con la conversión de las entradas del 
directorio para su composición en la consola, 
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e Aquellos que se enfrentan con un “mapa de disco” —una mat 
conveniente para representar discos lógicos y los números de ust 
que contienen. 


e Aquellos que se enfrentan con los “vectores de bits” —una repr 
tación conveniente de cuáles son los bloques que están en uso 
disponibles en un disco lógico. 


La biblioteca sólo contiene una función para convertir un nombre 
fichero de entrada al directorio en una forma adecuada para componer 
la consola. Esta es la función conv_dfname (figura 11-1, h). Toma ka 
información de la entrada del directorio especificada (o, según convenga, 
bloque de control de búsqueda) y la formatea en una cadena de la sigui 
forma: 


uu/d: filename. typ 


El “uu” especifica el número de usuario y el “d” especifica la identifi 
del disco. 

El código repetitivo al final de la función es necesario para asegurar 
los caracteres del tipo de fichero no tienen fijados sus bits de mayor orden. 
Estos bits son los atributos del fichero. Si están fijados, pueden hacer que 
los caracteres no sean componibles en algunos terminales. 

El segundo subgrupo de funciones, aquellas que manipulan un “mapa 
de disco”, producen una matriz que aparece como ésta: 


Discos 


Números de usuario =-> -Totales- 
0.1.2.3 4567 8 91011 12 13 14 15 Utilizados Libres 


Dr. mo<- 


Este mapa de disco se utiliza por varios programas de utilidad. Por 
ejemplo, la utilidad SPACE compone un mapa de disco que muestra, para 
cada disco lógico del sistema y para cada usuario de cada disco lógico, 
cuántos Kbytes de espacio del disco están en uso. El total a la derecha 
muestra el total de espacios usados y libres. En otro ejemplo, la utilidad 
FIND muestra cuántos ficheros de cada disco y de cada número de usuario 
coinciden con el nombre de búsqueda. 

Cada programa de utilidad que utiliza un mapa de disco se codifica: 


unsigned disk_mapL16JC18]; 
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Existen dos funciones en la biblioteca para tratar el mapa de disco: 


dm-—clr (borrado del mapa de disco; figura 11-1, s) 
Esta función llena todo el mapa de disco con ceros. 


dm- disp (composición del mapa de disco; figura 11-1, t) 
Esta función visualiza las líneas de título horizontal y vertical para el 
mapa de disco y convierte entonces cada elemento del mapa de disco 
en un número decimal. 


La primera función, dm-—clr, utiliza una de las funciones C estándar 
del BDS para fijar un bloque de memoria a un valor especifico. Considera 
que el mapa de disco es de 16x 18 elementos, cada uno de dos bytes de 
longitud. 

La segunda función, dm disp, imprime líneas horizontales sólo para 
aquellos discos especificados en el parámetro del mapa de bits. Aqui se 
muestra un ejemplo de su salida: 


0.1. 2. 3 4 ... 10 11 12 13 14 15 Utilizados Libres 
1 


EN 241 
$6 20 74 50 3 245 779 
-- Ninguno == o 1024 


(NOTA: Todos Los grupos de usuarios se mostrarán en el terminal.) 


El último subgrupo se enfrenta con el procesamiento de “vectores de 
bits”. Un vector de bits es una hilera de bits empaquetada en bloques de 
ocho bits por byte. Cada bit está direccionado por su número correspon- 
diente en el vector; el primer bit es el número 0. 

Un ejemplo de por qué se utilizan los vectores de bits es un programa de 
utilidad que necesite examinar el directorio de un disco y construir una 
estructura que muestre cuáles son los bloques que están en uso. Puede 
hacerlo accediendo a cada elemento activo del directorio y, para cada 
número de bloque distinto a cero, situando el número de bit correspondien- 
te en un vector de bits. 

La cabecera de biblioteca tiene una definición de estructura para un 
vector de bits (figura 11-2, s). Este vector contiene la longitud total del 
vector de bits en bytes y dos apuntadores. El primero señala el comienzo 
del vector, el segundo el final. Los bytes que contienen los propios bits del 
vector están asignados por la función alloc —una de las funciones C 
estándar del BDS. 

Las siguientes funciones de vector de bits están previstas en la biblioteca: 


bv_ make (realizar vector de bits; figura 11-1, cc) 
Esta función asigna memoria para el vector de bits (utilizando el 
mecanismo estándar del BDS C) y fija todos los bits a cero. 
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bv_fill (llenado del vector de bits; figura 11-1, dd) 
Esta llena un vector especifico, fijando cada byte en un 
especificado. j 


bv_set (fijación del vector de bits; figura 11-1, ee) 
Esta fija a uno el bit especificado de un vector. 


bv_test (comprobación del vector de bits; figura 11-1, ff) 
Esta función devuelve un valor cero o uno, reflejando la fijación 
bit especificado de un vector de bits. 


bv_nz (vector de bits distinto de cero; figura 11-1, gg) 
Esta devuelve cero o un valor distinto de cero para reflejar si 
algún bit a uno en el vector de bits especificado. 


bv—and (vector de bits AND; figura 11-1, hh) 
Esta función realiza un AND booleano entre dos vectores de bits y 
coloca el resultado en un tercer vector. 


bv—or (vector de bits OR; figura 11-1, ii) 
Esta es similar a la bv—and, excepto que realiza un OR inclusivo de: 
los vectores de entrada. 


bv—disp (visualización de vector de bits; figura 11-1, jj) 

Esta función compone una línea de título e imprime entonces 
contenidos del vector de bits especificado como una serie de ceros y 
unos. Cada bit está formateado para hacer más fácil de leer la salida. 


La función bv— make utiliza la función alloc para asignar un bloque de 
la parte no utilizada de la memoria entre el final de un programa y la base 
del BDOS. Requiere que dos estructuras de datos sean declaradas al 
principio del programa. Estas estructuras se declaran en el fichero de la 
cabecera de biblioteca (figura 11-2, b). 

La función bv—fill utiliza la función setmen del BDS C estándar. 

La función bv_set convierte el número de bit en un desplazamiento 
sobre el byte desplazando el número de bit tres lugares a la derecha. Los 
tres bits menos significativos del número de bit original especifican qué bit 
del byte adecuado necesita ser operado (OR). 

La función bv-_ test es efectivamente el reverso de bv_set. Accede al bit 
específico y devuelve su valor al programa que llama. 

La función bv—nz registra todo el vector de bits buscando el primer 
byte distinto de cero. Si todo el vector es cero, devuelve un valor cero. En 
otro caso, devuelve un apuntador al primer byte distinto de cero. 

Las dos funciones bv—and y bv—or toman tres vectores de bits como 
parámetros. El primer vector se utiliza para contener el resultado tanto de 
operar con AND o con OR el segundo y el tercer vector. Ambas funciones 
suponen que el vector de salida ya ha sido creado utilizando bv_ make. El 
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más corto de los tres vectores terminará la función bv—and o bv_or; es 
decir, estas funciones terminarán cuando se alcance el final del primer 
vector (el más corto). 

La última función, bv_— disp, compone la línea de titulo especificada por 
el programa de llamada, y entonces compone todos los bits del vector, con 
el número de bit del primer bit de cada línea mostrado a la izquierda. 

Ninguno de los programas de utilidad usa bv_ disp —se ha dejado en la 
librería simplemente como ayuda para depuración. 

Aquí hay un ejemplo de la salida del bv—disp: 


Vector de bits : Bloques en uso 





O 1 0000 0000 0001 1000 1000 0001 1111 1111 1111 1117 
M0 1 1111 1111 1111 1111 1111 1111 1110 1011 0000 0000 
80 1 1100 0000 1111 1100 1111 1001 1100 0000 1001 1111 
120 1 1110 1100 0001 1111 0000 0000 1101 1000 0001 1110 
160 1 1111 1111 1110 1111 1110 1111 0000 O111 0000 0111 
200 : 1111 0010 


Comprobación de parámetros especificados por el usuario 


El lenguaje C proporciona un mecanismo para acceder a los parámetros 
especificados en la zona de parámetros de orden. Proporciona una cuenta 
del número de parámetros introducidos, “argc” (cuenta de argumentos), y 
una matriz de apuntadores para cada una de las cadenas de caracteres, 
“argv” (vector de argumentos). Al principio de la función principal de cada 
programa se deben definir estas dos variables como sigue: 





main(argc,argv) 

L 

int arge; /x Contador de argumentos */ 

char *argvl]; /%* Matriz de apuntadores a cadenas de caracteres */ 


: /* Resto de La función principal */ 
> 

Consideremos el caso minimo —una linea de órdenes únicamente con 
el nombre del programa: 


A>command 


El convenio es que el primer argumento de la línea es el nombre del 
propio programa. Por tanto, argc se pondrá a uno y argv[0] será un 
apuntador al nombre del programa, “orden”. 

Ahora consideraremos un caso más complejo —una línea de órdenes 
con parámetros como el siguiente: 





A>command paraml 123 
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En este caso, argc será tres; argv[1] será un apuntador a paraml; 
argv[1][0] accederá al carácter O (el primero) de argv[1] —en este caso 
carácter “p”. 

Para detectar si el segundo parámetro está presente y es numérico, 
programa será: 


if (isdigit(argvE1J0D)) 
t 
/* Procesamiento de dígito */ 
else 


/* Parámetro no presente o con carácter 
alfabético en primer Lugar */ 


En la mayoría de las utilidades, se obtendrá un programa mucho más 
“amistoso” si el usuario necesita sólo caracteres específicos suficientes de 
parámetro para distinguir el valor introducido de otros valores posibles, 
Por ejemplo, consideremos un programa que pueda tener como parámetro 
uno de los siguientes valores: 300, 600, 1200, 2400, 4800, 9600 6 19200. Seria 
conveniente que el usuario necesitara mecanografiar únicamente el primer. 
número, mejor que tener que introducir rayas enteras de claves redundan- 
tes. embargo, los valores 1200 y 19200 serían entonces ambiguos. El 
usuario tendría que introducir 12 ó 19, Los usuarios novatos prefieren a 
menudo especificar los parámetros completos para claridad y seguridad. 

La biblioteca C estándar proporciona una función de comparación de 
cadenas de caracteres, stremp. Desgraciadamente, esta función no prevé la 
comparación descrita anteriormente. Sin embargo, la biblioteca posee dos 
funciones especiales que lo hacen posible: sstremp (comparación de subca- 
denas, figura 11-1, d) y usstremp (comparación de subcadenas en mayúscu- 
las, figura 11-1, e). La última función es necesaria cuando se necesita 
comparar una subcadena que pueda contener caracteres en minúscula, y 
convierte los caracteres en mayúsculas antes de la comparación. 

Para asistir a la manipulación de cadenas de caracteres, se han incluido 
dos funciones adicionales en la biblioteca. Estas son strscn (examen de 
cadenas, figura 11-1, b) y ustremp (comparación de cadenas en mayúsculas, 
figura 11-1, c). 








m de tablas de código 


Una tabla de código es una simple estructura usada por todos los 
programas de utilidad que aceptan parámetros que pueden tener cualquiera 
de varios valores. La cabecera de biblioteca contiene una definición de 
estructura para tablas de código (figura 11-2, r). 
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Una entrada de tabla de código contiene un valor de código sin signo y 
un apuntador a una cadena de caracteres. Se utiliza en los programas de 
utilidad siempre que hay necesidad de relacionar algún número de código 
arbitrario o una configuración de bits con una hilera de caracteres ASCII. 
Por ejemplo, para programar un chip generador de relación de velocidad de 
transmisión (baud-rate) a varios valores requiere diferentes constantes de 
tiempo para cada valor. Los usuarios no necesitan saber cuáles son estos 
números; sólo necesitan estar preparados para especificar el valor de la 
velocidad de transmisión como una cadena ASCII. 

Por tanto, una tabla de códigos se fija como sigue: 


Constante de velocidad 
de transmisión 


0x35 
0x36 
0x37 
O0x3A 
0x3C 
Ox3E 
0x3F 


Nombre de usuario 


Un programa de utilidad necesita ahora estar preparado para realizar 

varias operaciones utilizando la tabla de código: 

e Dado el parámetro de entrada en la zona de parámetros de la orden, 
la utilidad debe comprobar si la cadena ASCII está en la tabla de 
código, componiendo todas las opciones legales en la consola si no 
está, y si está, devolviendo el valor del código para procesos 
subsiguientes. 


Dada la constante actual (contenida en el BIOS), la utilidad deberá 
registrar la tabla de códigos y componer la cadena ASCII correspon- 
diente para decir al usuario su valor baud actual, 


La biblioteca incluye funciones especializadas para hacer esto, más 
algunas funciones adicionales para hacer más generalmente utilizables las 
tablas de códigos. Estas funciones son: 


ct_ init (inicialización de tabla de códigos; figura 11-1, v) 
Esta función inicializa una entrada específica de una tabla de 
códigos, fijando el valor del código y el apuntador a la cadena de 
caracteres. 


ct_pare (código de retorno de parámetro de tabla de códigos; figu- 
ra 11-1, w) 
Esta realiza la comparación entre una subcadena de mayúsculas con 
una cadena de clave especificada, devolviendo bien un error (el valor 
CT_SNF —hilera no encontrada—) o bien un valor de código. 
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ct_code (código de retorno de tabla de códigos; figura 11-1, x) 

Esta función es similar a ct_parc en que examina la tabla 
códigos y devuelve el código correspondiente. Difiere en la forma 
realizar la comparación. Se compara la cadena completa de búsqt 
da con la cadena de la entrada de la tabla de códigos. Existe 
concordancia sólo cuando todos los caracteres son iguales. 


et_disps (visualización de cadenas de tabla de códigos; figura 11- l, 
Esta función visualiza todas las cadenas en una tabla de có 
dada. Se utiliza bien cuando el usuario ha introducido una 
no válida o cuando el programa de utilidad requiere que se muest 
las opciones que están disponibles para un parámetro. 


ct_index (retorno de índice de tabla de códigos; figura 11-1, z) 
Dada una cadena, esta función busca en la tabla de códigos 
devuelve el índice de la entrada que tiene una cadena que coi 
con la de búsqueda. El índice no es el valor del código; es el nú 
de la entrada de la tabla. 


ct_stri (índice de cadena de tabla de códigos; figura 11-1, aa) 
Dado un número de índice de entrada, esta función devuelve 
apuntador a la cadena en aquella entrada. 





ctstre (código de cadena de tabla de códigos; figura 11-1, bb) 
Dado un número de código, esta función devuelve un apuntadora 
cadena en la entrada que tiene un número de código que coi 


Acceso a un directorio por medio del BDOS 


Un problema asociado al acceso directo al directorio de ficheros, 
se ha ilustrado en funciones anteriores, es que el programa se presente con: 
entradas de directorio en el orden exacto en que ocurren en él. Para algunos 
programas, tales como aquellos que procesan grupos de ficheros, es mejor 
utilizar las funciones de búsqueda primera y de búsqueda del siguiente 
BDOS para acceder al directorio. 

Utilizando el BDOS, el programa puede procesar el nombre del primer 
fichero para confrontarlo con la clave de búsqueda ambigua, volver después 
al BDOS para obtener el nombre del fichero siguiente, etc. La cabecera de 
biblioteca contiene una definición de estructura para un bloque de control 
de ficheros CP/M (figura 11-2, k). 

Obsérvese que el primer byte del FCB es un número de disco más que el 
número de usuario de la entrada del directorio. Obsérvese también el uso de 
una sentencia para describir los números de bloque. 

La biblioteca estándar del C BDS contiene una función, setfcb, a la que 
se ha dado la dirección de un FCB y un apuntador a una cadena que 
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contiene un nombre de fichero. Convierte cualquier “*x” en el nombre en el 
número adecuado de *?” y llena el resto del FCB con ceros. 

La biblioteca ejemplificada contiene las funciones siguientes, diseñadas 
para el acceso al directorio de ficheros del BDOS: 


get_nfn (obtención del nombre de fichero siguiente; figura 11-1, i) 
Esta función posee un apuntador a un nombre de fichero ambiguo y 
un apuntador a un FCB. Vuelve con el FCB fijado para acceder al 
próximo fichero que coincida con el nombre ambiguo. 


srch_ file (búsqueda de fichero; figura 11-1, j) 
Esta función, utilizada por get—nfn, lanza tanto una llamada de 
búsqueda primera como una llamada de búsqueda del siguiente del 
BDOS. 


conv_fname (conversión del nombre de fichero; figura 11-1, g) 
Esta función convierte un nombre de fichero de un FCB en una 
forma adecuada para visualización en la consola. Es similar a la 
función conv_dfname, descrita anteriormente, excepto que envia 
sólo el disco, nombre de fichero y tipo (no el número de usuario) en 
la forma siguiente: 


d:fiLename.typ 
Para señalar a la función get_nfn que se desea el primer nombre de 
fichero, hay que fijar el bit más significativo del primer byte, el número de 


disco. 
Aquí se muestra un ejemplo de cómo usar la función get—nfn: 


struct _fcb feb; /* declaración de bloque de control de fichero */ 


setmem(fcb,FCB_SIZE,O);  /* Puesta a cero del Fi 
fcb.fcb_disk = 0x80; /* Marcar el FCB para " 


*/ 
rimera vez" */ 





while (get_nfntfcb, "BiXYZX.%")) 


A /* Hasta que get_nfn devuelve cero */ 


/* Apertura de fichero utilizando el FCB */ 


1. (/* No al final del fichero */) 
/* Procesamiento del registro siguiente o 
> carácter en fichero */ 
A /* Cerrar fichero */ 


La cadena entre comillas “B:XYZx.*” podría ser también sólo un 
apuntador a cadena o un parámetro de la línea de orden, argv[n]. 

La última función para el proceso del directorio de ficheros del BDOS, 
conv fname, se utiliza para convertir un nombre de fichero para salida por 
un terminal. De nuevo, el código repetitivo al final borra los bits de 
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atributos de fichero para evitar cualquier efecto secundario desde 
terminal. 





Programas de utilidad que mejoran el CP/M estándar 





Este grupo de utilidades se ha diseñado para mejorar aquellos si 
trados por Digital Research. No gozan de las ventajas del BIOS mej 
de la figura 8-10 y pueden utilizarse en cualquier instalación con la 
sión 2.2 del CP/M. 

Con la excepción de la utilidad ERASE, todas las utilidades registran! 
directorio de ficheros utilizando llamadas al BIOS, como se di 
anteriormente en este mismo capítulo. 


ERASE—Una forma segura de borrar ficheros 


Existen dos inconvenientes en el procesador de órdenes de co 
construido con la orden ERA. En primer lugar, borrará indiscrimi 
mente grupos de ficheros. En segundo lugar, si se tiene un nombre 
fichero con caracteres no gráficos o en minúsculas, no se puede usar 
orden ERA, porque el CCP convierte los caracteres de los parámetros de 
orden a mayúsculas y da por finalizado un nombre de fichero al encont 
cualquier carácter extraño en la cadena. 

La utilidad ERASE que se muestra en la figura 11-3 borra grupos 
ficheros, pero pide al usuario la confirmación antes de borrar cada uno de 
ellos. 

Mejor que utilizar el BIOS para acceder a la entrada de cada directori 
utiliza la función get — nfn, que llama entonces al BDOS. Por tanto, El 
funciona igualmente bien para ficheros que tienen múltiples entradas en el 
directorio. Puede utilizar la función de borrado de ficheros del BDOS 
(Delete) para borrar todas las extensiones de un fichero dado. 
A continuación se da un ejemplo de diálogo de consola que muestra 
ERASE en operaci 





P3A>zerasexCR> 
ERASE Version 1.0 02/23/83 (Library 1.0) 
Usage : 

ERASE (d:3file_name.typ 


P3A>erase x.com<CR> 
ERASE Version 1.0 02/23/83 (Library 1.0) 





Erase A:UNERASE .COM y/n? n 
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Erase A:TEMP1  .COM y/n? y <s= ¡Será borrado! 
Erase A:TEMP2 — .COM y/n? n 
Erase A:TEMP3  .COM y/n? n 
Erase A:TEMPA4  .COM y/n? y 
Erase A:ERASE — .COM y/n? n 


<== ¡Será borrado! 


Borrado de ficheros 
File A: TEMP1 COM erased. 
File A:TEMP4 COM erased. 





Máeláne UN "1.0 02/24/83" 


71 ERASE 
Je Esta función borra Lógicamente el tichero(s) especificado utilizando La 
función delete de BDOS. */ 


Minclude <LIBRARY.H> 


atruct _fcb amb_fcbs Bloque de control de fichero con nombre ambiguo */ 
struct feb 1cb7 Usado por Las funciones de búsqueda del BDOS */ 


char fí1e_namet203) Formato para visualizar d:Nombre-de-fichero. tipo */ 
ahort curZaiski Disco lógico en curso al principio del programa */ 
ERASE salva el FCB de todos Los ficheros 
que serán borrados en La matriz 
Siguiente */ 
Adefáne MAXERA 1024 
struct _fcb era_ICDLMAXERAJ: 
Ant counts Cuenta del núnero de ficheros a borrar */ 
Ant counts Utilizado para acceso a era_fcb durante el borrado */ 


maintaroc,argw) 
short argcr /% Cuenta de argumentos */ 
par maras /x Vector de argumentos (apuntador a una matriz de caracteres) */ 


Print ('AMERASE Version %s (Library %s)",VN,LIBUN); 
argo Comprobación de uso */ 
bdos (GETDISK) y /« Obtención de disco por defecto en curso */ 


/% Inicialización de cuenta de ficheros a borrar */ 


/» Fijación de nombre de fichero ambiguo */ 
/% Comprobación de si se utiliza el disco por detecto */ 


bos(SETOISK,amb_fcb.fcb_disk + 131 /n Fijación del disco especificado +/ 


/* Conversión del nombre de fichero ambiguo para salida */ 
conv_tname(amb_1cb,111e_name)y 
printt("AminSearching for file(s) matching %s.".file_name)? 


le Fijación del bloque de control de fichero para indicar primera búsqueda »/ 
feb. feb_disk i= 0x807 — /% OR en el bit más sianificativo */ 


Ir Mientras no se Llegue al final del fichero, fijar el FCB al nombre 
siguiente que coincida */ 
While (oe _ninam_1cb, 100) 
conv_fname(fcb,file_name): 
/% Pregunta de borrado o no de fichero / 
pránttciimiErase %s y/n7 “,file_name)1 
AN Ctoupper(getchar O) mm Y) 
ñ 
pránti(” con 4111 be erasedi0); 
1% Añadir FCB en curso a matriz de FCB!S */ 
movmemifcb, hera fcblecount++), FOBSIZE) 1 
/* Comprobación de tabla no completa +/ 





Figura 11-3. ERASE.C, una utilidad que solicita confirmación antes de borrar. 
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AN Cecount == MAXERA) 
( 


AntfCsimHarning 1 Internal table nou full, No mor 
Antftiin until those already specified have bel 
y /% Salto fuera del bucle mientras +/ 






, 
Y 1» Procesadas todas Las entradas al directorio */ 


Af tecounto 
Prántrcimnt 





Ang files nou...97 


/x Procesamiento de cada uno de Los FCB's en La matriz, borrando Los ficheros */ 
tor (count = 05 /x Comienzo con el primer fichero en La matriz */ 
Sount < ecountr  /r Hasta procesamiento de todas Las entradas activas */ 
coUnt++ /* Desplazamiento hasta el FCB siguiente */ 
0 
cony_fname (Lera _fcbtcount),file_name)1 








10 (Bos (DELE a febEcountd) es 1) la error? */ 
erimtiUimio07Error trying to erase %s",111e name)? 
else 1% Fichero 





Pramtr coin F Ade 





ed. ".fi1e_name); 


bdos (SETDISK,cur_disk); /* Puesta a dísco en curso */ 
Y 





chk_usetarge) /* Comprobación de uso */ 
/* Esta función comprueba que se haya especificado el número correcto 
de paránetros, avisando instrucciones en caso contrario. */ 












/% Parámetros de entrada */ 
Ant arger 7 Cuenta del número de argumentos en Línea de orden +/ 


ñ 
/* El valor mínimo de argc es 1 (por el propio nombre del programa); 
por tanto, argc es siempre mayor en una unidad al núnero 
de parámetros de La Linea de orden */ 


AN Cargc 1= 2) 
Ñ 


Antf (rinUsage 1%) 
Anti (ANMIERASE (dr )141e_name,typ")1 
stos 

y 





Figura 11-3. (Continuación.) 


UNERASE—Recuperación de ficheros borrados 


UNERASE, como su nombre indica, puede utilizarse para “resucitar” 
un fichero borrado accidentalmente. Sólo los ficheros cuyos bloques no han 
sido asignados nuevamente a otros ficheros pueden resucitarse. La utilidad 
UNERASE mostrada en la figura 11-4 construye un vector de bits de todos 
los bloques utilizados por las entradas activas del directorio. Entonces 
construye un vector de bits de todos los bloques requeridos por el fichero a 
recuperar (UNERASE'd). Si un AND booleano entre los dos vectores 
produce un vector distinto de cero, entonces uno o más de los bloques que 
originalmente pertenecian al fichero borrado se encuentran ahora asignados 
a otros ficheros del disco. 
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Adefine YN "1.0 02/12/83" 


¿1 UNERASE 
Esta utilidad es La inversa de ERASE. Restaura 
al directorio Los ficheros especificados cambiando el primer 
byte de su entrada al directorio (OxES) al núnero de usuario 
especificado. +/ 








Binclude <LIBRARY.M> 














struct _dirab dár_pbs /+ Bloque de parámetros de manejo del directorio */ 
EUA OE dica 7% Apuntador a La entrada del directorio */ 

ret /* Bloque de control de búsqueda +/ 

pe /e SCB activado para coincidencia con todos Los ficheros */ 
struct Bloque de parámetros de disco de CP/M +/ 
Mruct /x Vector de bits de bloques utilizados */ 
struct 7 Vector de bits para fichero a recuperar / 
Mruct Tbv extentss Jr Vector de bits para extensiones a recuperar */ 
char f41e_namet20); /* Fornateado para visualizar un/de:Nonbre=de-tichero.tipo +/ 
short cur_dtaks /* Disco lógico en curso al principio del programa 

NZ= mapa mostrado del núnero de ficheros */ 

Ant county /* Utilizando para acceso al núnero de bloques en cada 


entrada del directorio */ 


Ant /% Usuario sobre el que se recupera el fichero */ 





maintargc, arg) 
amort arger /% Cuenta de argumentos */ 
char sargvidr /% Vector de argumentos (apuntador a matriz de caracteres) */ 





y 
Printf ("ANUNERASE Version %s (Library %s)".VN,LIBVN) 
hr targo o /% Comprobación de uso */ 

curZólsk = bdos (OETDISK)1 1% Comprobación de disco por defecto en curso */ 








/* Utilizando una versión especial de La utilidad bloque de control 
de búsqueda fijar, disco, nombre, tipo (no ambiguos) y número de usuario 
para comparar Únicamente entradas suprimidas y Longitud para comparar 
Usuario, nombre y tipo. 

Esta versión especial devuelve también el disk_id tomado 
del nombre de fichero en La Linea de orden. */ 

AN (Ugir po.dp disk = asetacb(scb, argvL12,OxES, 12)) == 01 

í 








Utilización del disco por defecto */ 
dir_pb.dp_gisk = cur_disk) 
Y 

else 
( lx Disco A= 0, 8 =1, (para SELDSK) +/ 








dir_pb.dp_a: 
> 


Primtf(“AnSearching disk Xd." dir pb.dp_disk)» 








AMtstrsentaco,"7")) /* Comprobación de nombre ambiguo */ 
ñ 


printf ("WnError -- UNERASE can only revive a single file at a tine); 
or 





Y 


/* Activación de un bloque de control de búsqueda especial que contrasta 
con todos Los ficheros existentes, */ 








Mretrcb(acba, 00.0%, 27,12)) /r Fijar nombre de fichero e inicializar SCB +/ 
MM largo o /* Número de usuario no especificado +/ 
, Ir = bdo (OETUSER, OXFF) y /* Obtención de número de usuario en curso */ 
else 
1 
user = atotarovt21)7 1» Obtención de núnero especificado a/ 





AN laser > 15) 





rintI("AnUser number can only be 0 15.%); 
eator 
> 





Figura 11-4, UNERASE.C, un programa de utilidad que “resucita” ficheros borrados. 
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1% Construcción de un vector de bits que muestra Los bloques en uso 
actualmente. SCB se ha activado para contrastar con todas Las entradas 
activas del directorio en el disco. */ 

burld_bvíinuse_bv, seba)? 


/x Construcción de un vector de bits para el fichero a recuperar 
mostrando qué bloques se precisan para él. */ 
Af Ubutld_bv(file_bv,1eb)) 
q 


Primtf("1nNo directory entries found for file %a.", 
arovt1d)s 

ettos 

y 


/x Realización de La op. (AND) entre Los dos vectores de bits. »/ 
bv_andifile_bv, inuse_bv,file_bv)o 


/* Comprobación de resultado distinto de cero -- sí es así, uno o 
is bloques requeridos por el fichero borrado están 
actualmente usados para un fichero existente y el fichero no 
Puede ser recuperado. */ 
ar os azi eb) 
0 
printf Ciin-=- This file cannot be restored as some parts of 14%) 
printf("in — have been remused for other files) ==="); 
eto; 


/% Continuación de La recuperación del fichero cambiando todas Las entradas 
al directorio para contener el número de usuario especificado. 
Nota: Para el mismo nombre y tipo de fichero pueden existir 
varias entradas al directorio y hasta con el mismo núnero de 
extensión. Por esta razón se mantiene un mapa de bits 
de Los números de extensión recuperados -- No serán recuperados núneros 
de extensión duplicados. */ 


/x Fijar el vector de bits para más de 127 extensiones recuperadas */ 
bv_makelentents,16)7 pr 16 + 8 bits */ 


/% Fijación del directorio a cerrado y forzar la función get_nde 
para abrirlo. */ 
dar pb. dp_open = 01 


/* Mientras no se Llegue al final del directorio devolución de apuntador 
a entrada siguiente. */ 

while(dir_entry = gel_ndeldar_pb)) 

0 


/% Comprobación de coincidencia de nombre, tipo y usuario = 0xES */ 
41 Ccomo Amame co. dr Centro) == NAME.EOS 
í 
/% Comprobación de si esta extensión ha sido 
ya Pecunerada +/ 
40 Cow te olla ten a dir entry > de extent) 
1 Je Si, lo ha sido */ 
pramtr cami tertent ia of a Aanored.*, 
irLemtry O decentent argvlidds 
continues Te No recuperaría 2/ 
5 
A /% Indicación de extensión recuperada +/ 
bv_settextenta,dir_entry > de_extent)r 
dir lentry O dazunirno = users e Entrada recuperada */ 
dir pb. dp write == dy Ja Necesidad de escritura en sector anterior */ 
PAM ria tE cent exa Dl Ye umerared. 
entry 
> 


File Xs unerased in User Number Za." 
arovlld user 


bdos (SETDISK, cur_dtak)1 /s Puesta a disco en curso */ 
Y 








Figura 11-4. (Continuación.) 
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bulld_bvtbw, sebo /* Construcción del vector de bits (del directorio) */ 
Ir Esta función examina el directorio del disco especificado en el bloque 
de parámetros del directorio (declarado como variable global) 
y construye el vector de bits específicado mostrando todos Los bloques 
Utilizados por ficheros que coinciden con el nombre en el bloque 
de control de búsqueda. */ 


/s Parámetros de entrada */ 

ktruet by mov /% Apuntador al vector de bits */ 

struct Zscb mscbs 7% Apuntador al bloque de control de búsqueda +/ 
Je Utiliza también el bloque de parámetros del directorio */ 


/4 Parámetros de salida 
Se creará el vector de bits especificado que tendrá a 1 Los bits 
correspondientes a bloques encontrados en una entrada del directorio 
que coincide con el bloque de control de búsqueda. 


 Bevuelve también el núsero de entradas coincidentes. +/ 


unsigned abnor /% Número de bloque +/ 


struct _dpb mdpby /* Apuntador al bloque de parámetros del disco en el BIOS */ 
Ant county 7+ Cuenta de entradas al directorio coincidentes v/ 


meount = 01 /% inicialización de cuenta */ 
Doe oet_deb(dir_pb.dp_disk)1 /* Obtención de dirección del bloque de parámetros del disco */ 


Je Se hace el vector de bits con un byte por cada ocho 
bloques + 1 +/ 
40 Citby_makelby, (dpb -> deb_maxabn 2)3)+1))) 
7 


printf("WnError == Insufficient memory to a bit vector. 01 
eator 
y 


/s Fijación del directorio a "cerrado" para forzar La función 
get_nde para abrirlo. */ 
r pb. dp open = 01 





/s Exanen del directorio construyendo el vector de bits »/ 
uns le(dir_entry = get_nde(dir_pb)) 
0 
/+ Comparación de número de usuario (que puede ser DXES), 
nombre y tipo de fichero. */ 
41 (come_fname(acb,dir_entry) == NAME_EQ) 
í 


+emcountr /* Actualización cuenta de coincidencias 4/ 

tor (count = 01 /+ Comienzo con el priner bloque */ 
Eount <dir_pb.d_nabpdes /2 Para núnero de bloques por entrada al directorio */ 
Sountes) 


/x Puesta a uno del bit apropiado para cada número 
de bloque distinto de cero */ 
/* Suposición de 8 números de 2 bytes */ 


dirab.de_Longlcountdr 


y 
1 Suposición de 1 número de 16 bytes */ 
q 


gro = dir entry > _dtrab.de_shorticounta 


Af (abro) by_setíbv,abno)y /* Puesta a uno del bit */ 
Y 


» 
atun counts /+ devolución del número de entradas coincidentes */ 


Chk_usetargc) /* Comprobación de uso */ 

/n Esta función comprueba que se haya especificado el número 
correcto de parámetros, avisando instrucciones en caso 
contrario. */ 


/* Parámetros de entrada +/ 
int aros /* Cuenta del número de argumentos en Línea de orden */ 








Figura 11-4, (Continuación.) 
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/* El valor mínimo de argc es 1 (por el propio nombre del programa); 
por tanto, argc es siempre mayor en una unidad al número 
de parámetros de La Línea de orden */ 











Af Large mm 1 ti argc > 3) 
ñ 









Mt CtinUsage 107 
Primtf("WNVUNERASE (d131Ilename.typ (user)”): 
PrimticiimitOnly a single Unambiguous 









1le name can be 





ams 






entor 
y 
) 1% Final de chk_use */ 







aselscb(acb, frame user, length) /% Versión especial del bloque de control de búsqueda */ 
/v Esta función fija el bloque de control de búsqueda 

de acuerdo con el nombre de fichero 

especificado. 

El mombre de fichero puede presentarse en Las formas siguientes: 

Nonbre-de=f ichero 

Nombre=de=fichero. tipo 
d:nombre-de-fichero. tipo 











La función Liga el mapa de bits de acuerdo con Los discos en Los que 
se busca. Para cada uno de Los discos relacionados, comprueba si se 
ha generado algún error en La selección del disco les decir, si existen 
Las tablas de disco en el BIOS para él). */ 


















Ir Parámetros de entrada */ 
struct cb mich) /% Apuntador al bloque de control de búsqueda 
char sfñame) /* Apuntador al nombre de fichero */ 

short users /% Núnero de usuario a buscar */ 









Número de bytes a comparar */ 








/% Parámetros de salida 
Número de disco buscado (A = 1, B= 
./ 





EE) 





ñ 
short disk_tar /% Número de disco a buscar +/ 








tIcb(scb, fname) y /* Fijación del bloque de control de búsqueda cono sí 
se tratara de un bloque de control de fichero. */ 
mor /% Fijación de disk_id antes de que ses escrito 
r el número de usuario */ 
ción del número de usuario */ 
¡ón del número de bytes a comparar */ 






lak_1d = acb => scb_us 


















acb -> acb_ure 
*0b > 

return disk 
) /r Final de setsco 4/ 


no = users 
An 








Figura 11-4. (Continuación.) 









Una complicación más ocurre si dos o más entradas del directorio del 
fichero borrado tienen el mismo número de extensión. Esto puede ocurrir si 
el fichero se ha creado y borrado varias veces. Bajo estas circunstancias, 
UNERASE recupera la primera entrada con un número de extensión dado 
que encuentra, y compone un mensaje en la consola tanto cuando se 
recupera una extensión como cuando se ignora. 

Debido a la naturaleza complicada del proceso de UNERASE, esta 
utilidad puede procesar sólo un nombre único y no ambiguo de fichero. 

El siguiente diálogo de consola muestra a UNERASE en operación: 


PaA>ir 
Ar UNERASE COM: TEMP2 COM 1 TEMP3 COM? ERASE COM 
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P3A>unerase<CR> 
UNERASE Version 1.0 02/12/83 (Library 1.0) 


UNERASE (d:)filename.typ (user) 
Only a single unambiguous file name can be used. 


P3A>unerase tempi.com<CR> 
UNERASE Version 1.0 02/12/83 (Library 1.0) 
Searching disk A. 
Extent NO of TEMP1.COM unerased. 
Extent 40 of TEMP1.COM ignored. 


File TEMP1.COM unerased in User Number 3. 


POA>dir e.comcCR> 
Ar UNERASE COM 1 TEMP1 COM + TEMP2 COM : TEMP3 com 
Ar ERASE com 


P3A>unerase temp5,com<CR> 

UNERASE Version 1.0 02/12/83 (Library 1.0) 
Searching disk A. 

No directory entries found for file TEMPS.COM. 


FIND—Encuentro de fichieros “perdidos” 


La utilidad FIND mostrada en la figura 11-5 busca todos los números 
de usuario en los discos lógicos especificados, comparando cada entrada 
con un nombre de fichero ambiguo. Entonces puede visualizar bien un 
mapa de disco que muestre cuántos ficheros concordantes se han encontra- 
do en cada número de usuario para cada disco o el número de usuario, el 
nombre del fichero y el tipo para cada entrada de directorio comparada. 

Se puede utilizar FIND para localizar un fichero específico o un grupo 
de ficheros, como se muestra en el siguiente diálogo de consola: 


P3B>[ind<CR> 
FIND Version 1.0 02/11/83 (Library 1.0) 
Usage : 
FIND d:filename.typ (NAMES) 
*:filename.typ (All disks) 
ABCD. .OP:filename.typ (Selected Disks) 
NAMES option shows actual names rather than map. 


P3B>find aby. *<CR> 
FIND Version 1.0 02/11/83 (Library 1.0) 
Searching disk 1 A 
Searching disk : B 
Numbers show files in each User Number. 
--- User Numbers --- Dir. Entries 
0.1.2.3 4 5 ... 11 12 13 14 15 Used Free 
Az E. 8 8 23 233 
B: 66 20 74 55 23 252 772 


P3B>Tind *1%.com<CR> 

FIND Version 1.0 02/11/83 (Library 1.0) 
Searching disk : A 

Searching disk 1 B 

Searching disk 1 C 
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— User Numbers --- Dir. Entries 

0.1.2.3 4 +. 11 12 13 14 15 Used Free 

Az s 23 233 
Bo 61 5 4013 252 772 
Cr -- None -- 16 112 


P3B>find *.com names<CR> 

FIND Version 1.0 02/11/83 (Library 1.0) 
Searching disk : B 

O/B1CC .COM 0/B:CC2 «COM O/B:CLINK COM 2/B:CLIB 
1/B1CPM61 — .COM 1/B:MOVCPM .COM 1/B:PSWX  .COM O/B:SUBMIT 
«COM 1/B:CPM60 .COM O0/B:DDT .COM_ 0/B:EREMOTE 
O/B1SPEEDSP .COM O0/B:PIP COM O/B:PROTOSP .COM O/B:RX 
O/BITXA «COM O/B:EPUB  .COM O/B:EPRIV  .COM O/B:WSC 
0/B1X «COM O/BICRCK  .COM O/B:XSUB_ .COM O0/B:DU 
O/BIQERA  .COM O/BIÍFINDALL .COM O/B:MOVEF  .COM O/B:REMOTE 
O/BILOCAL —.COM O/B:DUMP  .COM O/B:MRESET .COM O/B:ELOCAL 
O/B1PUTCPMFS.COM O/BITEST  .COM O/B:FDUMP  .COM O0/B:INVIS 
0/B1L80 «COM O/BILIST .COM O0/B:PUB COM O/B:LOAD 
O/B1MAC «COM 0/B:SCRUB  .COM O/B:RXA COM 0/B:STAT 
0/BxTX «COM 0/B:ERASEALL.COM  0/B:HM -COM_ 0/B:MSFORMA 
O/B:STATUS .COM O/B:UNERA .COM O/B:MSINIT .COM O/B:VIS 
O/B1WSVTIP .COM 0/B:XD .COM O/B:NEWVE — .COM O/B:DDUMP 
0/B1FORMATMA.COM O/B:PRIY_  .COM O/BIFCOMP  .COM O/B:DDUMPA 
O/B1PUTSYSIC.COM 0/B:DDUMPNI .COM O/B:DSTAT .COM O/B:ASM 
2/B1CDBTEST .COM O/B:OLDSYS .COM 0/B:E COM 2/B:F/C 
3/BIERASE —.COM 3/B:FUNKEY .COM 3/B:DATE  .COM 3/B:FIND 





Press Space Bar to continue... 

3/BISPACE  .COM 3/B:UNERASE .COM 3/B:MAKE  .COM 3/B:MOVE 
1/B1PUTSYSWX.COM 3/BITIME  .COM 3/B:ASSION .COM 3/B:SPEED 
3/B1PROTOCOL.COM O/B:PRINTC .COM 3/B:T COM 


Adefine YN "1.0 02/11/83" 






/% FIND - Esta utilidad puede visualizar un mapa mostrando qué discos y en 
qué números de usuario existen ficheros que coinciden con el nombre 
ambiguo especificado o bien Los nombres reales que coinciden. */ 








Winclude <LIBRARY.H> 
















ruet _girpb dir_pbr /* Bloque de parámetros de manejo del directorio */ 
Btruct Tdi dir entry /* Apuntador a entrada al directorio (en 
dir_pb) */ 






struct _scb scbj /* Bloque de control de búsqueda */ 















char file_nanet20%7 /x Formateado para visualizar : un/d:Nombre-de=fichero.tipo */ 








short cur_disks /x Disco Lógico en curso al comienzo del programa */ 
Ant county /* Cuenta de coincidencias (números de ficheros coincidentes) + 
Ant dacounty /x Cuenta de coincidencias por disco +/ 

Ant Acount /* Cuenta de Líneas (para Líneas visualizadas) +/ 











Ant 






2 flags /% 0 = mostrar nombres de fichero que coinciden. 
NZ = mostrar mapa de número de fichero */ 






/x La matriz siguiente se utiliza para tabular Los resultados para cada 
Unidad de disco, y para cada núnero de usuario en ella. 

En suna, se han añadido dos usuarios "extra" con valores "Libre" 

y "utilizado". */ 








Figura 11-5. FIND.C, un programa de utilidad que localiza ficheros o grupos de 
específicos. 
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M entidades utili 
Mdefine FREEZCOUNT 17 7% Número de usuario para entidades Libres */ 


maintaroc,argv) 
short argcr /x Cuenta de argumentos 2/ 
E] Tx Vector de argumentos (apuntador a una matriz de caracteres) */ 


Printf ('IMFIND Version %s (Library %s)",VN,LIBUN)1 
Chk_use large) Je Comprobación de Uso */ 
curZdlsk = bdos(OETDISK)+ /x Obtención de disco en curso por defecto */ 


dm lridisk_map)7 /u Puesta a cero del mapa de disco */ 


/* Fijación del bloque de control de búsqueda 
disco, nombre, tipo, núnero de extensión y número de bytes a 
comparar —- en este caso contrastar todos Los usuarios pero únicamente 
La extensión O */ 
tscb(scb,argvE12,"2",0,13)1 — /% Fijación de disco, nombre y tipo »/ 


map_flag = usstromp("NANES",arovl21); — /% Fijación de indicador para opciones de napeado */ 
Icount = dncount = mcount = 01 /% Inictalización de contadores */ 
for (scb.1cb_disk = Or /x Comienzo con disco Lógico Az */ 


ln Hasta disco lógico P: */ 
hcboNcb dishes) /x Desplazamiento a disco lógico siguiente */ 





/* Comprobación de sí el disco en curso se ha seleccionado para búsqueda */ 
Af CIUacb.acb_adisks R CL CC scb.acb_disk)) 
continues lr No, ignora este disco +/ 


primtr("inSearching disk 1 Xe",(scb.scb disk + “A2DD5 
1% actualización cuenta de Lineas */ 


disk = scb.scb_disk1  /r Fijación del disco a buscar */ 
Ja Puesta a cero de contador de coincidencias */ 


/% Si se han de visualizar Los nombres de fichero */ 
Putchart2Wm")1  /% Movimiento hasta columna 1 */ 


/% Fijación del directorio a "cerrado" y forzar La función get_nde 
para abrirlo */ 
dir pb.de_open = 05 





/* Mientras no se Llegue al final del directorio, fijar apuntador 
a entrada siguiente */ 
Wile(dir_entry = gel_ndeldir_pb)) 
ñ 





/* Comprobación de entrada utilizada para actualización 
de contadores Libre/utilizado */ 


Af (dir_entry -> de_userno == OxES) — /% No utilizada */ 
disk maptscb. 1cb_diskIUFREE_COUNTI++p 
7% En uso +/ 
drek_mapLacb. acb_di sk JLUSED_COUNT19+7 


/* seleccionar únicamente Las entradas activas que están en La prinera 
extensión (numeradas 0) del fichero que coincide con el nombre 
proporcionado por el usuario */ 


mm 
(dir_entry -> de_userno 1= OxES) AL 
(dirZentry > dele 
(comp_fname(scb, dir_entry) == NAME_EO) 
> 

ñ 





mcounte+ /% Actualización cuenta coincidencias */ 
dncount++ /% Cuenta por disco */ 


Af (map_fla9) — /s Comprobación de opción de salida */ 
. 


/x Actualización mapa de disco »/ 








Figura 11-5. (Continuación.) 
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Qlsk_maplacb.scb_disKkICdir_entry -> de_usernoles; 
y 


14 Visualización de nombres */ 
0 
conv_dfnamelscb.acb_disk,dir_entry,11le_name)y 
Printrixs "filename 


/* Comprobación de necesidad de comienzo de Línea nueva */ 
Af CI tdmcount X 4)) 
ñ 
putehar (An) 
Af Cericount > 18) 

( 
lcount = 05 
Pr CanPre 
jetchar O) 
utehar (An) 
) 


> 12 Final de directorio %, 
) /s Búsqueda en todos Los discos 


Af imap_fla9) 
1 


prántícian Mumbers show files án each user number.")1 
printícan User Numbere Dir. Entries 


mAs (di aK map, sc. 5cb_adisks)7 /x Visualización mapa de disco */ 


Af Umcount as 
PLANUIONO == Ate Not Found 34 


bdos (SETDISK,cur_disk)1 /4 Puesta a disco en curso */ 
y 


/% Comprobación de uso */ 
función comprueba que se haya especificado 

el núnero correcto de parámetros, avisando instrucciones 

en caso contrario. 


/x Parámetros de entrada */ 
Ant arger /* Cuenta del número de argumentos en Linea de orden */ 
0 


/* El valor mínimo de argc es 1 (por el propio nombre del 
programa); por tanto, es siempre mayor en una unidad al número 
de parámetros de La línea de orden */ 


Af Carge mm 1 fl arge > 3) 
q 


printf ("inUsage 107 
printf ("3MVtFIND d:filename.typ (NAMES) ")7 

PrAntrCrimVt o rfálename.typ CALI diakio0)r 
Printiciinvt  ABCD.-OP1filename.typ (Selected Disks)" 
printf ("inVINAMES option shous actual names rather than map:")) 
sitos 

y 











Figura 11-5. (Continuación.) 


SPACE —Muestra el espacio de disco utilizado 


La utilidad SPACE que se muestra en la figura 11-6 registra los discos 
lógicos especificados y compone un mapa de disco que muestra, para cada 
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número de usuario, en cada disco lógico, cuántos Kbytes han sido utiliza- 
dos. Visualiza también el número total de Kbytes utilizados y los que 
quedan libres en cada disco lógico. 

A continuación se muestra un ejemplo de diálogo de consola que 
presenta a SPACE en operación: 


P3B>: 
SPACE Version 1.0 02/11/83 (Library 1.0) 
Usage: 
SPACE » (ALL disks) 
SPACE ABCD..OP (Selected Disks) 


P3B>space *<CR> 
SPACE Version 1.0 02/11/83 (Library 1.0) 
Searching disk : 
Searching disk : 

rching disk : 


A 
B 
c 


Numbers show space used in kilobytes. 
r Numbers === Space (Kb) 
9. 2 10 11 12 13 14 15 Used Free 
18 202 258 1196 
692 432 656 2364 996 
140 140 204 


hdeline VN "1.0 02/11/89" 


JA SPACE —- Esta utilidad visualiza un napa mostrando La cantidad de memoria 
Cexpresada en porcentajes relativos) ocupada por cada número 
de usuario para cada disco lógico. Muestra también La cantidad 
de espacio Libre. */ 


Binclude <LIBRARY.M> 


struct _direb dir_pb) /* Bloque de parámetros de manejo del directorio */ 
SAruet Zóbr male antrys /* Apuntador a entrada al directorio */ 

struct Zscb sebj /x Bloque de control de búsqueda */ 

struct Zdpb dp; /+ Bloque de parámetros de disco de CP/M */ 


char file_namet2031 1% Fornateado para visualizar: und/d:Nombre-de=fichero.tipo */ 


short cur_dtsko /% Disco Lógico en curso al principio del programa 
NZ = mostrar mapa de número de ficheros %/ 

Ant county /% Utilizado para acceso a Los números de bloque 
en cada entrada del directorio */ 

int users 1. Utilizado para acceso al mapa de disco cuando se calcula */ 


/* La matriz siguiente se utiliza para tabular Los resultados para 
cada unidad de disco, y para cada número de usuario en el 
En suna, se han añadido dos usuarios "extra" con valores "Libre" 
y "utilizado" 
“ 
unsigned dlak_mapti6JC18) /e Disco A -> P, usuarios O -> 15, Libres, usados +/ 
define USED_COUNT 16 7% Número de usuario para entidades utilizadas */ 
Udefine FREEZCOUNT 17 /% Número de usuario para entidades Libres */ 


maintargc, arov) 
short argcr /s Cuenta de argunentos */ 

char marovEl) /% Vector de argumentos (apuntador a una matriz de caracteres) */ 
0 





Figura 11-6. SPACE.C, una utilidad que visualiza la cantidad de memoria de disco utilizada o 
disponible. 
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printf ("ANSPACE Version %s (Library Xx)", VN,LIBVN)y 
chk_usetargc) Y Comprobación de uso */ 
Sur Zaisk = bdor(OETDISK)1 /x Obtención de disco en curso por defecto */ 


dm_clridisk_map)1 /x Puesta a cero del mapa de disco */ 


msetacb(scb,argvt11)1 Ir Versión especial: fijación de disco, 
nombre y tipo */ 


for (scb.1cb_disk = 01 /x Comienzo con disco Lógico Az */ 
b:acbdisk € 161 /x Hasta disco Lógico P: */ 
ED rob Z81skes) /x Desplazamiento a disco Lógico siguiente +/ 


/« Comprobación de sí el disco en curso se ha seleccionado para búsqueda */ 
AN CI Uscb.scb_adisks L (1 CO scb.scb_d14K))) 
continues /% No, ignorar este disco */ 


printf ("inSearching disk 1 %o",(scb.scb disk + “A0D)7 
dir_pb.dp_disk = scb.acb_diski  /* Fijación al disco objeto de busqueda */ 


1 Fijación del directorio a "cerrado" y forzar La función get_nde 
para abrirlo */ 
dir _pb.dp_open = 01 


no se Llegue al final del directorio, tijar apuntador 
la siguiente */ 
*_ndeldir_pb)) 


AN (gir_entry -> de_userno == OXES) 
continues 1% Ignorar entradas no activas */ 


topico = ¡ón /x Comienzo por el primer bloque +/ 
count € dir_pb.de_nabedes — /a Para núnero de bloques por entrada del directorio 


/* suposición de 8 números de 2 bytes / 


cb_giskILdir_entry -> de userno] 
+= (dir_emtry > _dirab.de_lomglecunt) > 0.7140) 
Y 
Ja suposición de 16 núneros de 1 byte */ 
q 
disk_maplscb.5cb_diskIUdir entry -> de_usernol 
+2 (dir_antry -> _dirab.de_shorticount] > 07110) 
Y 
> /x Procesados todos Los bloques */ 
1% Final de directorio para este disco */ 


1» Cálculo de La memoria utilizada multiplicando el número 
de bloques contados por el número de Kbytes en cada 
bloque. */ 


for (user = 01  /* Comienzo por usuario 0 */ 
user < 161 /* Final con usuario 15 »/ 
User se) /% Movimiento al número de usuario siguiente */ 
e 
/u Cálculo de tamaño ocupado en Kbytes */ 
disk maptscb.1cb diskICuser] *= dir pb.dp absiz 
Jn Realización de La suma para este disco * 
gisk_mapCscb.scb_disKkICUSED_COUNTI += disk _maplscb.scb_d15kILuserdy 
Y 


/* Espacio Libre = (número de bloques * núnero de Kbytes por bloque) 
- Kbytes utilizados 
- Entradas del directorio * 32/1024 ... o dividido por 32 +/ 
disk_maptacb.scb_d18kJCFREE_COUNTI = (dir pb.dp_nab = dir_PD.dP_absize) 
— disk maptscb. scb_d1 sk ICUSED_COUNTI 
- (air pb.de_nument >> 5)7 /% Igual que / 32 */ 
/. Procesados todos Los discos */ 


pránticran Numbers show space used in kilobytes.*)7 
Prántrcn User Numbers === Space (K0)%)1 


dm_displdisk_map, scb.scb_adisks)1 — /% Visualización del mapa de disco */ 











Figura 11-6. (Continuación.) 
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bdos(SETDISK,cur_d1Kk)1 /% Puesta a disco en curso */ 
y 


sieticb(acb,Idisks) — /a Versión especial de fijación de bloque de control de búsqueda +/ 


Iu Esta función activa un bloque de control de búsqueda de acuerdo con 
los discos lógicos especificados. El disco se especifica como : 
una cadena sinple de caracteres sin separadores. Un asterisco significa 
"todos Los discos". Por ejemplo — 


ABONO (discos Az, Br, Gi, 
. Ctodos Los discos por Los que SELDSK tiene tablas) 


Fija el mapa de bits de acuerdo con Los discos que deben ser objeto 
de búsqueda. Para cada disco Seleccionado, comprueba 51 se ha generado 
algún error durante La selección del disco (es decir, si existen tablas 
para el disco en el BIOS). 

El nombre y tipo de fichero y el núnero de extensión se fijan a 
coincidencias con todas Las entradas posibles al directorio. */ 


/s Parámetros de entrada */ 
struct cb mecb; /% Apuntador al bloque de control de búsqueda %/ 
char "1d1sksr /% Apuntador a Los discos lógicos */ 


1 Parámetros de salida 
Ninguno. 

“Y 

í 

int disko /% Número de disco actualmente objeto de comprobación +/ 

unsigned adís! 7 Mapa de bits para discos activos */ 


agil = 01 /* suposición de que no existen discos activos */ 


11 natal) /+ Algunos valores especificados */ 
1 
AS 
q 
adiska = OXFFFF+ 1n Fijación de todos Los bits */ 
y 


/+ Comprobación de sí todos Los discos */ 


. 1% Fijación de discos específicos */ 
Unile(migiaks)  /s Hasta alcanzar final de discos +/ 


/* Construcción del mapa de bits por obtención del 
14. del disco siguiente (A - P), convirtiéndolo en un 
núnero en el rango (0 - 15) y desplazando a la 
izquierda tantos Lugares como el valor 1 y haciendo 
el OR con el disco activo en curso. 
»/ 
adisks i= 1 CC toupper(midisks) Ar 
hldiaer /+ Desplazamiento a carácter siguiente */ 
y 
r 
r 
/r utiliza únicamente el disco por defecto en curso */ 
0 
/x Fijación del bit correspondiente al disco en curso */ 
adísks = 1 <£ bdos(GETDISK); 
y 


/r Fijación del núnero de usuario, nombre y tipo de fichero y extensión a * 
de manera que coincidirán todas Las entradas activas del directorio */ 
ln 0123456789012 »/ 
atrcpy(bscb —> 4cb_userno, "2777272777272%)1 


/* Realización de Llamadas a La rutina SELDSK del BIOS para asegurar 
que todas Las unidades de disco activas tienen definidas tablas 
de disco en el BIOS. En caso contrario, puesta a cero 
de Los bits correspondientes en el mapa de bits. */ 


for (disk = 01 /* Comienzo con el disco Az +/ 
gisk <16r /x Hasta el disco P: */ 
disko 1% Utilización del disco siguiente */ 





0 
REO) 
continues /* Evitar selección de discos no especificados */ 


Figura 11-6. (Continuación.) 
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Af (btoWM(SELDSK,díak) == 0) /% Realización ce Llamada a SELDSX del BIOS */ 
A 7% Devolución de O si disco no válido +/ 
/u Puesta a cero del bit correspondiente en la máscara 
haciendo La operación AND con La máscara que tiene 
todos Los demás bits a uno. +/ 
adísks he (UL Co disk) * OFFER): 
y 
» 


SCD -> scb_adisks = adísks:  /% Fijación de mapa de bits en scb */ 
) /% Final ssetscb */ 


Largo /x Comprobación de uso +/ 
función comprueba que se haya especificado el número 
correcto de parámetros, avisando instrucciones en caso 
contrario. */ 





/. Parámetros de entrada */ 
Ánt argcs /x Cuenta del núnero de argumentos en Linea de orden */ 
t 


/* El valor mínimo de argc es 1 (por el propio nombre del programa); 
por tanto, argc es siempre mayor en una unidad al número 
de paránetros de La Linea de orden */ 


Af Cargc Im 2) 
0 








primtí(inUsage 1% 
printf (TANMVISPACE » STC 
printf ("WIMVISPACE ABCD. .OP (Selected Dísks)")1 





eutor 
y 


) /% Final chk_use 4/ 








Figura 11-6.. (Continuación.) 


MOVE —Transferencia de ficheros entre números de usuario 


La utilidad MOVE que se muestra en la figura 11-7 transfiere ficheros de 
un número de usuario a otro en el mismo disco lógico. El movimiento se 
realiza cambiando el número de usuario de todas las entradas relevantes del 
directorio. Esto es mucho más rápido que copiar los ficheros. Evita también 
tener copias múltiples del mismo fichero en el disco. 

Aquí se muestra un diálogo de consola que presenta a MOVE en 
operación: 


PIBx 
MOVE Version 1.0 02/10/83 (Library 1.0) 
Usage 2 





MOVE difilename.typ to_user (from_user) (NAMESY 
mifilename.typ (All disks) 
ABCD. .OP:filename.typ (Selected Disks) 
NAMES option shows names of files moved. 








P3B>dir *.com<CR> 

B1 ERASE COM 1 FUNKEY COM 1 DATE  COM1 FIND com 
Bi SPACE COM 1 UNERASE COM 1 MAKE COM 1 MOVE com 
Bi TIME COM: ASSIGN COM 1 SPEED COM 1 PROTOCOL COM 
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P3B»move «com O names<CR> 
MOVE Version 1.0 02/10/83 (Library 1.0) 


Moving file(s) 3/B1????????.C0M -> User O. 

O/BIERASE .COM O/BIFUNKEY .COM O/BIDATE .COM O/BIFIND  .COM 
O/BISPACE .COM O/BI1UNERASE .COM O/BIMÁKE  .COM O/BIMOVE COM 
O/BITIME  .COM O/BrASSION .COM O/BÍSPEED .COM 0/B:PROTOCOL.COM 


PaBruser O<CR> 


POB>dir 
Bi ERASE COM : FUNKEY COM 1 DATE COM: FIND com 
B1 SPACE COM 1 UNERASE COM 1 MAKE COM 1 MOVE com 


Bi TIME COM 1 ASSION COM 1 SPEED COM 1 PROTOCOL COM 


Adefáne YN "1.0 02/10/89" 


AH MOVE == Esta utilidad transfiere ficheros de un número de usuario a otro 
en el mismo disco Lógico. Los ficheros no se copian realmente, 
sino que se cambian sus entradas al directorio. */ 





Binclude <LIBRARY.M> 


struct _direb dir_pbr /* Bloque de parámetros de manejo del directorio */ 
struct Tair edir_entryr /« Apuntador a entrada del directorio */ 
b scbr /+ Bloque de control de búsqueda */ 





1% Tamaño de La memoria intermedia de directorio */ 
/% Memoria internedia de directorio */ 





/u fornateado para visualizar: un/d:Nombre-de-fichero.tipo */ 
Tu NZ para visualizar nombres de ficheros transferidos */ 








/+ disco lógico en curso al principio del programa +/ 
/% Número de usuario desde el que se transfieren ficheros */ 
/% Número de usuario al que se transfieren ficheros */ 








int mcountr Cuenta de coincidencias (número de ficheros coincidentes) +/ 
int dacounty /% Cuenta de coincidencias por disco */ 
Ant Lcountr 7% Cuenta de Lineas (a visualizar) */ 


/% Cuenta de argumentos */ 
/% Vector de argumentos (apuntador a 





triz de caracteres) */ 











printf ("AMMOVE Version Ls (Library Xs 





UN, LIB) 1 
chk_usetaracir /% Comprobación de uso */ 





atoltarevt21)1 /% Conversión de número de usuario a entero */ 
Fijación y comprobación de número de usuario en destino */ 
A1Uto_user > 15) l 


0 
printf ("WnError =- the destination user number cannot be 
y 





eater than 15.%)1 Il 


/* Fijación número de usuario en curso */ 
trom_user = bdos (OETUSER,OXFF)1 





/* Comprobación de especificación de número de usuario fuente */ 
1 Craig st lara vt311o1)) 
y 


/* Fijación y comprobación de número de usuario fuente */ 
ANUCIrOm_ us 
í 


rm atolías 





vE31)) > 15) 








FANLECWnError == the source user number cannot be gr 
eutor 

y 

/* Fijación de nombre de supresión de indicador */ 


ter than 13.01 











Figura 11-7.. MOVE.C, un programa de utilidad que cambia números de usuario de los ficheros. 
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name_flag = usstromo("NAMES",argvL41)7 
) 
/% Número de usuario fuente no especificado */ 


1% Fijación de indicador de supresión de nombre desde parámetro +/ 
flag = usstromp("NAMES", argvE31)5 


1% Para simplificar La lógica de Lo que sigue, name_flag debe hacerse 
NZ si es igual a NAME_EQ, o D si es otro valor */ 
name_fla9 = (name_flag == NAME_EQ 7 1:10: 


Af (to_user == from_user) 1% A = desde +1 
0 
Primtf(AnError — “to” user number is the same as from user nunber.*); 
eatos 
Y 


/* Fijación del bloque de control de búsqueda, nombre de fichero, 
tipo, núnero de usuario, nombre y tipo. Como el núnero de extensión 
o forma parte de La comparación, se encontrarán todas 
Las extensiones de un fichero dado. */ 

setscb(scb,argvt1), from_user, 2,1917 


Cur_disk = bdos (OETDISK)1 /x Obtención del disco en curso por defecto */ 
lcount = dicount = meount = 0y  /% Inicialización de contadores */, 


for (scb.scb_disk = 05 /x Comienzo con disco Lógico Az */ 
scb.scb disk < 161 /x Hasta el disco lógico P: */ 
RS /x Desplazamiento a siguiente disco lógico */ 


/% Comprobación de que se ha seleccionado para búsqueda el disco en curs 
AN (Ulscb,scb_adisks (1 <í scb.sco d1akI)) 

continue /a No, Sgnorar el disco */ 

/% Conversión del nombre y número de usuario de búsqueda para salida +/ 
conv_dfnamelscb.scb_d18k, «cb, f11e_name); 
printicinintoving File(s) %a => User %d.",11le_name,to_urer)y 


leountes; /v Actualización contador de Líneas */ 


dir_pb.dp_disk = scb.scb_dísky /% Fijación al disco objeto de búsqueda */ 
dncount ="01 /x Puesta a cero del contador de coincidencias del disco */ 


Af (name_f1a9) /x Si se han de visualizar Los nombres de fichero +/ 
Putehar(/1m“)1  /% Desplazamiento a columna 1 / 


/* Fijación del directorio a "cerrado" y forzar La función get_nde 
para abrirlo */ 
dir_pb.da_omen = 01 


/x Mientras no se Llegue al final del directorio, fijar apuntador 
a entrada siguiente */ 
while (dir_entry = get_nde(dir_pb)) 
t 
/x Dar como coincidentes todas Las entradas que tengan el núnero 
de usuario, nombre y tipo de fichero correctos y un número 
de extensión cualquiera. */ 
sm 
(dir _entry > de_userno ln OxES) £e 
(comp_fname(scb.d1r_entry) == NAME_EQ) 
, 
0 


Gir entry > de_userno = to users /% Movimiento a nuevo usuario */ 
Je Petición de escritura de sector anterior */ 
Gir_pb.do_urite > 1; 


meounte+y /x Actualización de cuenta de coincidencias +/ 
Ancounte+y /» Cuenta por disco */ 


Af (name_flag) — /* Comprobación de opción de salida */ 


conv_dfname(scb. scb_d15k,d1r_entry,file_name)y 
primtrczs 9 filename)? 





/* Comprobación de necesidad de comienzo de nueva Línea */ 





Figura 11-7.  (Continuación.) 
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Af CU lamcount % 49) 

0 

putchar(/im)7 

AY ericount ) 16) 

13 

lcount = 01 
ÍMtfinPress Space Bar to continue 
tehar Os 
Achar (An 07 


Af tmcount == 0) 
Primti(ón —- No Files Moved =="): 


bdos (SETDISK, cur_disk)1 — /% Puesta a disco en curso */ 
a 


chk_usetargc) /% Comprobación de uso */ 
/r Esta función comprueba que se haya especificado 
el húnero correcto de parámetros, avisando instrucciones 
en caso contrario. */ 


/% Parámetros de entrada */ 
Amt argo; Ye Cuenta del múnero de argunentos en Línea de orden +/ 
ñ 


/* El valor minimo de argc es 1 (por el propio nombre del programa); 
por tanto, argc es siempre mayor en una unidad al núnero 
Se parámetros de La Linea de orden. */ 


Af large == 1 tl aroc o 
( 
Prámtf CinUsage 1%)7 
Prámti ("in VIMOVE di filename. tro to user (f 
prámtrisimyt 
PrAMEACANVA  ABCDA 
printf (C'NNVINAMES option shows 
Sator 
y 





, 








Figura 11-7. (Continuación.) 


Otras utilidades 


Los programas de utilidad descritos en esta sección no son en absoluto 
un conjunto completo. Puede desearse desarrollar muchos otros programas 
útiles especializados. Algunas posibilidades son: 


FILECOPY 
Una versión más especializada de PIP podría copiar grupos de 
ficheros especificados ambiguamente. De especial importancia sería 
la capacidad de leer un fichero que contenga los nombres de los 
ficheros que se han de copiar. Una opción útil sería la posibilidad de 
detectar el valor del bit de atributo de fichero no utilizado y copiar 
únicamente ficheros en que ha sido cambiado. 


PROTECT/UNPROTECT 
Este par de utilidades permitiría “esconder” ficheros en números de 
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usuario mayores que 15. Los ficheros asi escondidos no serían 
accesibles más que por medio de un procesamiento de UNPRO- 
TECT, y al mismo tiempo trasladándolos de nuevo al rango normal 
de números de usuario. 


RECLAIM 
Esta utilidad leería todos los sectores de un disco (utilizando el 
BIOS). Todos los sectores dañados que se encuentren podrán ser 
suprimidos lógicamente mediante la creación de una entrada en el 
directorio de ficheros, con los números de bloques que “reservarian” 
efectivamente los bloques que contuvieran los sectores dañados. 


OWNER 
Dado un número de pista o de sector, esta utilidad accederá al 
directorio y determinará cuál o cuáles ficheros están utilizando esa 
parte del disco. Esto es útil si se tiene un sector o pista dañados en 
un disco. Entonces se puede determinar cuáles son los ficheros que se 
han dañado. 





[ Programas de utilidad para el BIOS mejorado 





Esta sección describe algunos programas de utilidad que trabajan con el 
BIOS mejorado que se muestra en la figura 8-10. Algunas de estas utilidades 
trabajan directamente con los dispositivos fisicos del sistema, que pueden 
variar de una computadora a otra. La cabecera de biblioteca contiene 
%declaraciones de definición para números de dispositivo y nombres para 
dispositivos físicos (figuras 11-2, f y 11-2, g). 

Estas Asentencias de definición se utilizan para construir una tabla de 
códigos de dispositivos fisicos. Si se tienen más dispositivos físicos o se 
desea cambiar los nombres con los que se hace referencia a los mismos, se 
necesitará cambiar estas definiciones. 

Todas estas utilidades comparten algunas características en la forma en 
que son invocadas. Si se llaman sin parámetros, visualizan instrucciones en 
la consola relativas a la clase de parámetros disponibles. Si se llaman con la 
palabra “SHOW” (o “S”, “SH”, etc.) como parámetro, visualizan la 
situación actual de cualquier atributo de la utilidad. 


MAKE—-Conversión de ficheros en “invisibles” o “visibles” 


La utilidad MAKE que se muestra en la figura 11-8 está diseñada para 
operar en conjunción con la opción de ficheros públicos implementados en 
el BIOS mejorado de la figura 8-10. Tiene dos formas de operación 
—Conversión de ficheros en “invisibles” o “visibles”. 
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Un fichero invisible es uno del usuario O que ha sido puesto en modo de 
sólo lectura y sistema. Cuando la opción de ficheros públicos está disponi- 
ble, estos ficheros no pueden verse cuando se utiliza la orden DIR, ni 
pueden ser borrados accidentalmente. 

Un fichero visible es el que se ha fijado en modo de lectura/escritura y de 
directorio. 

Cuando los ficheros se han hecho invisibles, se transfieren desde el 
número de usuario actual al usuario 0. Cuando se hacen visibles, son 
transferidos desde el usuario O al número de usuario en curso. 

A continuación damos un ejemplo de diálogo de consola que muestra a 
MAKE en operación: 


P3B>make<CR> 
MAKE Version 1.0 02/12/83 (Library 1.0) 


Usage : 
MAKE d:filename.typ INVISIBLE (NAMES) 
VISIBLE 
mifilename.typ (ALL disks) 
ABCD. .OP:filename.typ (Selected Disks) 
NAMES option shows names of files processed. 


PaB>dir *.com<CR> 
Br ERASE COM: UNERASE COM: ASSIÓN COM: PROTOCOL COM 


P3B>»make x.com invisible names<CR> 
MAKE ion 1.0 02/12/83 (Library 1.0) 


Moving files from User 3 to O and making them Invisible. 
Searching disk : B 


O/B:ERASE — .COM made Invisible 
O/B:UNERASE .COM made Invisible 
O/B+ASSIGN  .COM made Invisible 
0/B:PROTOCOL.COM made Invisible 


P3B>make erase.com visible names<CR> 
MAKE Version 1.0 02/12/83 (Library 1.0) 


Moving files from User 0 to 3 and making them Visible. 
Searching disk : B 


3/BIERASE —.COM made Visible in User 3. 





Adefine VN "1.0 02/12/83" 


Je MAKE - Esta utilidad contiene en realidad dos progranas similares; 
dependiendo cada uno de un parámetro especificado en la 
Únea de orden. 


INVISIBLE encuentra todos Los ficheros especificados, Los transfiere 
al usuario O y Los pone en modo sistema y en estado de 

sólo lectura. Estos ficheros pueden ser utilizados por números de usuario 
gistintos de cero sí se activa La prestación de ficheros públicos 

Gel BIOS. 





Figura 1-8. MAKE.C, una utilidad que convierte los ficheros en “invisibles” y protegidos o los 
hace “visibles”, accesibles y no protegidos. 
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VISIBLE es el opuesto al anterior. Los ficheros especificados se 
transfieren al número de usuario én curso y tambiado a modo 
directorio y estado de Lectura/escritura. */ 


Winclude <LIBRARY.H> 








struct _dirpb dir_pbj /* Bloque de parámetros de manejo del directorio */ 
ruet Zdir =dir. /* Apuntador a entrada del directorio */ 
ruet Zacb scb; /* Bloque de control de búsqueda */ 
short t3_users /x Núnero de usuario al que deben ponerse Los ficheros +/ 
short from_users /% Número de usuario desde el que se transferirán Los ficheros */ 
char file_namet20)5 /% Formateado para visualización: un/d:Nombre-de-fichero. tipo +/ 
/% NZ para visualización de Los nombres de fichero transteridos */ 
short cur_diskr /+ Disco Lógico en curso al comienzo del programa +/ 
Ant mccunto /* Cuenta de coincidencias (número de nombres coincidentes) */ 
short invisible /% NZ cuando el parámetro específica invisible */ 
char «operation; 7% Apuntador a "visible" o "invisible" »/ 


/x Cuenta de argumentos */ 
/x Vector de argumentos (apuntador a matriz de caracteres) */ 





PrAntf ("AMMAKE Version %s (Library %8)",UN,LIBVN)? 





Chk_usetargc)r /x Comprobación de uso */ 
CurZdlsk = bdos(OETDISK)1 /x Obtención de disco en curso por detecto */ 
cont == 01 /% Inicialización contador +/ 


/+ Fijación del indicador de invisible de acuerdo con el paránetro */ 
Anvisible = Usstromp "VISIBLE", argvL21)7 





1» Frjación de Los núneros fron_user y to_user (usuario desde y hacta) dependiendo 
del programa construido y de Los parámetros especificadas. */ 


Af invisible) 











0 
from_user = bdos(GETUSER,OXFF); /* Obtención número de usuario en curso */ 
to_uler = 01 /% Transferencia de ficheros siempre a usuario O */ 
operation = "Invisible"? 1% Fijación de apuntador a cadena +/ 

y 

Lu visible m/ 

4 

fromuser = 05 /x Transferencia siempre desde usuario 0 */ 
to_user = bdos(GETUSER,OXFF)) — /* Obtención de Usuario en curso */ 
operation = "Visible"? 1» Fijación de apuntador a cadena */ 


y 


1% Fijación del bloque de control de búsqueda, disco, nombre, tipo, núnero 
de usuario, de extensión y número de bytes a comparar —— én este caso, 
se comparan todas Las extensiones del usuario == desde. */ 

metscb(scb,argvE1J,from_user,2",13)7 — /% Fijación de disco, nombre y tipo */ 


name_11. 





= usstrompL"NAMES",argvl31)1 — a Fijación indicador de supresión de nombre según parámetro 3 */ 


/* Para simplificar La Lógica de Lo que sigue, nane_flag debe hacerse 
NZ si es igual a NAME_EQ, o D sí es otro valor */ 
name_flag = (name_flag == NAMEZEO 7 11 0) 


1% Conversión de nombre y número de usuario para salida */ 
ESA 

from User %d to Xd and making them %a 

from_user, to_user, operation); 





for (scb.scb_disk = 01 /% Comienzo con disco Lógico A: */ 
scb.scbzgink < 161 /x Masta el disco Lógico P: */ 
cb; ScD_dbskes) /* Desplazamiento a siguiente disco Lógico */ 


/* Comprobación de que se ha seleccionado para búsqueda el disco en curso */ 
Af (CCscb.scb_adisks L (l (0 scb.scb d1sk))) 
continues 1% No, ignorar este disco */ 








Figura 11-8.. (Continuación.) 
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printic%inSearchino disk 1 Lo", (scb.acb_dlak + “AD)7 


dir_pb.de_disk = scb.scb_diski  /* Fijar disco objeto de búsqueda */ 


41 (name_fla9) /+ 51 se han de visualizar Los nombres de fichero */ 
Butcharc/1m/)1  /% Desplazamiento a columna 1 */ 


/u Fijación del directorio a "cerrado" y forzar la función get_nde 
para abrirlo. */ 
gir_pb.do_open = 01 


/* Mientras no se Llegue al final del directorio, fijar apuntador 
a entrada siguiente. */ 
unida (dir_entry = gel_ndeldar_p0)) 
É 


/+ dar como coincidentes todas Las entradas que tengan el número 
de usuario, nombre y tipo de fichero correctos y un Número 
de extensión cualautera. */ 
































me 
(dir_entry -> de_userno I= OxES) 18 
Kcoms_Fname(scb, dir_entry) == NAME_E0) 
, 
0 
mcount++ /% Actualización cuentas de coincidencia */ 
41 invisible) 
Ñ 1% Fijación bits ms */ 
dir_entry —> de_fnamel8) i= 0x801 
FnameL9) 1= 0x801 
Ja Visible +/ 
0 /+ Borrado de Los bits ms »/ 
gir_entry > meL8] h= 0971 
Hnamet9) ha 0x7Fr 
/% Transferencia a núnero de usuario correcto */ 
dir_entry => de_userno = to_useri 
/* Indicación de escritura de sector anterior */ 
dir pb.do_urate = ds 
/+ Comprobación de visualización de nombre */ 
Af (name_flag) 
í 
conv_dfname(scb.1cb_disk,dir entry, f1le_name)r 
PrImtrOimitds made Za in User 0. 
1Íle_nama, operation, to_user)r 
, 
) 
Y Ja Procesadas todas Las entradas al directorio */ 
, /u Procesados todos Los discos */ 


AN (count == 0) 
Printi(%in —— No Files Proct 





bdow(SETDISK,cur_diak)1 /% Puesta a disco en curso */ 
y 


chk_usetargo) /* Comprobación de uso */ 
/x Esta función comprueba que se haya especificado 
el número correcto de parámetros, avisando instrucciones 
en caso contrario. */ 


»/ 
/% Parámetros de entrada */ 
Ant arocr 7» Cuenta del número de argumentos en Línea de orden */ 
ñ 
/* El valor minino de argc es 1 (por el propio nombre del programa); 
por tanto, argc es siempre mayor en una unidad al núnero 
de parámetros de La Línea de orden. */ 
AN largo mu 3 tl argo == 4) 


returnr 





A 








Figura 11-8. (Continuación.) 
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0 

Printi(iinUsage 17 

printf (:AMVNAKE difilename.typ INVISIBLE (NAMES)")1 

prántitiimt VISIBLE*)1 
MUECA rf blename.typ CALL disks) "7 
MtfCTAMVE  ABCD. -OPr filename. typ (Se! D: 
MUTUA NAMES option shows names of files proc 
tor 





Figura 11-8. (Continuación.) 


SPEED— 





jación de relación de velocidad (baud-rate) 


La utilidad SPEED que se muestra en la figura 11-9 fija el valor de la 
velocidad de transmisión para un dispositivo serie especifico. A continua- 
ción se presenta un ejemplo de diálogo de consola que muestra alguna de 
las opciones: 





POB) gpeed<CR> 

SPEED 1.0 02/17/83 

The SPEED utility sets the baud rate 
Us. 


'ed for each physical device. 
e is : SPEED physical-device baud-rate, or 
SPEED SHOW (to show current settings) 
Valid physical devices are: 
TERMINAL 
PRINTER 
MODEM 


Valid baud rates are: 








P3IB>Apeed showsCR> 

SPEED 1.0 02/17/83 

Current Baud Rate 
TERMINAL set to 9600 baud. 
PRINTER t to 9600 baud. 
MODEM set to 9600 baud. 








P3B>speed m 19<CR> 
SPEED 1.0 02/17/83 
Current Baud Rate settings are : 





TERMINAL set to 9600 baud. 
PRINTER to 9600 baud. 
MODEM set to 19200 baud. 


P3B>Apeed xyz 12<CR> 
SPEED 1.0 02/17/83 
Physical Device “XYZ” invalid or ambiguous. 
Legal Physical Devices are : 
TERMINAL 
PRINTER 
MODEM 
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edefine VN “ANSPEED 1.0 02/17/83" 


/* Esta utilidad fija La relación de velocidad de transmisión para 
cada dispositivo físico. */ 


Vinclude <LIBRARY.H> 
struct _ot ct pdevtMAXPDEV + 22) /x Tabla de dispositivo físico */ 


/n 1tens de hardware específico */ 
/x Relación de velocidad para puertos serie (baud rate) */ 


Adefine BOO 0x35 /% 300 baudios */ 

define BS00 — 0x36 /x 600 baudios */ 

Mdefine BI200 0x37 /x 1200 baudios */ 

Maefine B2400 Ox3A /x 2400 baudios */ 

Mdefine BA00 0x3C /+ 4800 baudios */ 

Mdefine B9600 —0x3E /x 9600 baudios */ 

Bdefine B19200 0x3 /+ 19200 baudios */ 

Mlruct et et.brelod — /* Tabla de códigos para relación de baudios (entrada de repuestos) */ 


/n Parámetros en Linea de orden */ 
define PDEY argvl1]  /s Dispositivo físico */ 
adefíne BAUD arovi2)  /* Relación de baudios (baud rate) */ 








Ant argot 
char margvid), 

ñ 

Bramtrimo)  /% Visualización de mensaje de "funcionando" +/ 


Te Activar tabla de códigos */ 
Larsc)y  /* Comprobación de uso correcto */ 








/% Comprobación de existencia de petición de mostrar valores en curso */ 
Af Cusstromp("SMOM", argvE11)) 

g /% No, suposición de petición de fijación */ 
A _baud(BAUD))) /a Fijar velocidad de transmisión */ 





jet_baudiget_pdev(PDEV) 
y 





show_baudr Ir Visualización de valores en curso */ 
> /% final de programa */ 


teo /x Fijación de tabla de dispositivo físico */ 





Ja Inicsalización tabla de dispositivo físico +/ 





Et_Anitict_pdevtOJ, T_DEVN,PN_T)1 Ja Terminal */ 
EtTAMit (ot PdevC 1; PZDEVN/PNZP) 1 /% Impresora */ 
Et TAMit (ot pdevC2), M_DEVN, PAZ)» 12 Modem +/ 


ENTAMAt tot pdevta1/CT_SNE, ve7)1 /9 Finalizador */ 
/* Inicialización tabla de velocidad de transmisión */ 

et_4nst(et_brL0J,B300, "300")+ 

<UTAnit (et brE12,B800, *$00")1 

<tZAnit (ct ZbrE22,B1200, "1200")1 

St TAnát (ct ZbrE3), 82400, "2400")1 

EtAnitiot 

Et ZAnit (ct ZbrES), B9600, "9600")7 

etZAmit (ct -brE6),B19200, "19200")1 

ERTAMAt CCU TDrE7I,CT_SNE,0m "dp a Finalizador */ 

y 









unsigned 

Jet pdev(ppdev) 1. obtención de dispositivo físico */ 

7% Esta función devuelve el código de dispositivo físico especificado 
por el usuario en La Línea de orden. */ 

char "epdev) a Apuntador a cadena de caracteres */ 

0 

unsigned retvalr /% Devolución de valor */ 





pdevr /* Obtención de código para cadena ASCII +/ 
/* Si no se encuentra La cadena */ 





retval = ct parciot pdev 
41 (retyal Zn CT_SNF) 





Figura 11-9. SPEED.C, una utilidad que fija la velocidad de transmisión para un dispositivo 
específico. 
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Ñ 

printf (*AMOO7Physical Device “%s” ia Invalid or ambiguous.", 
Pdev)r 

printr("inLegal Physical Devices are 1 "1 
ct dispstct_pdev)r /x Visualización de todos Los valores +/ 
ettos 
y 

return retval; 1% Devolución de código */ 


Ir Esta función devuelve La constante de tiempo de la velocidad de transmisión 
para la velocidad especificada por el usuario en La Línea de órdenes */ 
char mpbaudy /* Apuntador a cadena de caracteres */ 
0 
unsigned retvalr /% devolución de valor =/ 
retval = ct_parciot br,pbaud);  /* Obtención de código para cadena ASCII */ 
AN (retval == CT_SNF) 7% Si no se encuentra La cadena */ 
ñ 
primtf(%An1007Baud Rate “%s” 4s invalid or ambiguous.*, 
Pbaud)? 
printi("inlegal Baud Rates are; 05 
Cl dispstetibros /* Visualización de todos Los valores */ 
editor 
7 
return retvals Devolución de código »/ 
Y 


set_baud(pdeve, baude) Fijación de La velocidad del dispositivo específico */ 
int pdeves Código del dispositivo físico */ 
short bauder Código de La velocidad de transmisión */ 
En algunos sistemas éste es Un 
valor de dos bytes (sin signo) */ 
E 
short mbaud_rcr Apuntador a La constante de relación de velocidad +/ 
En algunos sistenas éste es Un 
valor de dos bytes (sin signo) +/ 
/* Nota: Los códigos respectivos para acceder a Las constantes de relación 
de velocidad via La función get_cba son: 
Dispositivo NO = 19, M2 =21, 42 =23. Esta función utiliza 
esta relación matemática 2/ 


1% Fijación de apuntador a constante de relación de velocidad +/ 
baud_re = get_cba(CB_DO_BRC + (pdeve << 1))1 


1% Fijación de constante de relación de velocidad v/ 
mbaud_re = baudes 


le Llanada a La rutina de inicialización del BIOS +/ 
bios (CIOINIT,pdeve)7 
; 


probado /% Mostrar velocidad de transmisión en curso */ 


Ant pde: /% Número de dispositivo físico */ 
short baude: /+ Código de velocidad de transmisión «/ 
Jn En 2lounos sistemas bete es 
valor de dos bytes (sin signo) * 
short mbaud_rcr /% Apuntador a La constante de relación de velocidad */ 
/* En algunos sistemas éste es un 
valor de dos bytes (sin signo) +/ 
/* Nota: Los códigos respectivos para acceder a Las constantes de relación 
de velocidad via La función get_cba son: 
Dispositivo NO = 19, M1 ="21, M2 = 23. Esta función utiliza 
esta relación matemática” */ 


Printf(AnCurrent baud rate settings are 2%); 


for (pdeyn = 01 pdevn <= MAXPDEV; pdewn ++) /% Todos Los dispositivos fisicos */ 


Ñ 
/* Fijación de apuntador a constante de relación de velocidad =— 
el código para La función get_cba se calcula añadiendo 
el núnero de dispositivo físico *2 al código de relación 
de velocidad para el dispositivo AD */ 








gura 11-9. (Continuación.) 
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baud re 





_Sba(CB_DO_BRC + (pdewn << 1))1 


/. Fijación de constante de relación de velocidad */ 
baude = abaud_rcr 
Primtf(%Anitks set to %s baud.”. 


etet_pdey,pdevn),  /* Obtención de apuntador a nombre de dispositivo */ 
tretetbr.baude) ); /* Obtención de apuntador a relación de velocidad */ 





Chk_usetargc) /x Comprobación de uso correcto */ 


int argo; /x Cuenta de argumentos */ 
A y 


AN Largo == 1) 

ñ 

PrintI(iinThe SPEED utility sets the baud rate 

mtrcrinUsage ls 1 SPEED “al-device bauc 

prántrcin SPEED SOM (to 
Primtf("ininvalid physical devices ares "1 
Cl dispstct_pdev)1 
printr(invalid baud rates arer )r 
St dispstct_br)r 
eios 
3 


led for each physical device.")7 
ate arms 
¡ou current settinos)")7 








1 








Figura 11-9. (Continuación.) 


PROTOCOL —. 





¡jación de protocolos de línea se: 





La utilidad PROTOCOL que se muestra en la figura 11-10 se utiliza 
para fijar el protocolo para un dispositivo serie específico. 

Los controladores de cada dispositivo físico pueden soportar varios 
protocolos de línea serie. Los protocolos se dividen en dos grupos, 
dependiendo de si se aplican a la salida de datos o a la entrada de la 
computadora. 

Obsérvese que los protocolos de salida DTR y de entrada RTS pueden 
coexistir con otros protocolos. La estrategia es, en primer lugar, fijar el 
protocolo basado en carácter requerido y entonces fijar el protocolo 
DTR/RTS. Un ejemplo de esto se muestra en el siguiente diálogo de consola: 


P3B>erotocol<CR> 
PROTOCOL Vn 1.0 02/17/83 
PROTOCOL sets the physical devices serial protocols. 
PROTOCOL physical-device direction protocol ímessage-length) 


Legal physical devices are : 
TERMINAL 
PRINTER 
MODEM 


Legal direction/protocols are : 
Output DTR 
Output XON 
Output ETX 
Input RTS 
Input XON 


Message length can be specifed with Output ETX. 
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P3B>erotocol show<CR> 

PROTOCOL Vn 1.0 02/17/83 
Protocol for TERMINAL - None. 
Protocol for PRINTER - Output XON 
Protocol for MODEM - Input RTS 


PaB>erotocol mo e 126<CR> 
PROTOCOL Vn 1.0 EEES 
Protocol for TERMINAL - None. 
Protocol for PRINTER - Output XON 
Protocol for MODEM - Output ETX Message Length 128 bytes. 


P3B>erotocol m e d<CR> 
PROTOCOL Vn 1.0 02/17/83 
Protocol for TERMINAL - None. 
Protocol for PRINTER - Output XON 
Protocol for MODEM — Output DTR Output ETX Message Length 
128 bytes. 










Ane YN "AMPROTOCOL Yn 1.0 02/17/89* 
PROTOCOL -- Esta utilidad fija el protocolo de puerto serie para el dispositivo 
físico especificado. Cono alternativa visualiza Los protocolos 

en curso para todos Los dispositivos serte. */ 





Minclude <LIBRARY.M> 


/s Tablas de códigos utilizados para relacionar cadenas ASCIL con códigos */ 
struct et et iprototas /+ Tabla de código para protocolos de entrada */ 

ruet Zot ctZoprototaJ) ” de códigos para protocolos de salida */ 
ruet Tot ctlaprotot71) le códigos para protocolos de visualización */ 
Fuet TEL CUPOOVEMAXPDEV + 221 /% le dispositivo fisico +/ 
¡ruet Zet ctlot3d) /s Entrada, salida */ 


























ránetros en la Línea de orden */ 
rayE1) — /r Dispositivo físico */ 
Es) /% Entrada, salida */ 
Wdefáne PROTO argvi3] — /* Protocolo */ 
Woefine PROTOL argvl4] /r Longitud del mensaje del protocolo */ 














Anto (Nr ¡zación del mensaje de "funcionando" 4/ 
seur Os /u Activar tablas de códigos */ 
Chk_uselargci1  /+ Comprobación de uso correcto */ 








/x Comprobación de petición de mostrar valores en curso 4/ 
AN Cuestrom("SHON",argvL11)) 

No, se supone que es necesaria fijación */ 
(PDEV) /+ Dispositivo físico */ 





¡et_proto(get_pa 








/% Entrada/salida y protocolo */ 
get protolget_10(10).PROTO), 
PROTOL)» /% Longitud de mensaje de protocolo */ 


, 
show_proto()+ 

) /* final de programa +/ 

setup /+ Fijación de las tablas de códigos para este programa */ 


e 
/% Inicialización de La tabla de dispositivo físico */ 








et_initict_pdevt01,0,PN_T)1 /% Terminal +/ 
CtAnit (et pde 1D, 1/PNCPr /x Impresora */ 
CUZAMit (ct pdevE21,2/PNMT a Modem +) 
CtZimit (et pdevl31,CT_SNF, “a")y /% Finalizador */ 


Figura 11-10. PROTOCOL.C, una utilidad que fija el protocolo que gobierna la entrada y la salida 
de un dispositivo serie específico. 
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/% Inicialización de tabla de entrada/salida */ 
et_Anit(et_10L03,0, "INPUT=") y 
Et TAmit (ct TiOLA, 1, "OUTPUT") y 
Et TAnit (ot TLOL27,CT_SNF, a)7 





1% Finalizador */ 


/x Inicialización de tabla de protocolo de salida +/ 
<t_init(ct_oprotoLOJ,DT_ODIR, "DTR")» 
Et TAnit (ct oprotoL11;DTZOXON, "XON")7 
Et init (ct Zoprotot2,DT-OETX, *ETX")1 
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St AMit (ct oprotol3),CT_SNF, 1") y 


/% inicialización de tabla de 
et Anit(ct_iprototoJ,DT_IRTS, "RTS". 
EtZAmit(ctTAprotoL11/DTZIXON, 

Et TAMit let Aprotol2),CT_SNF, 








lprotoL13, DT” 





ATAMitCctZOprotoL42, DTIXON, “1 
AnAt tot ZdprotoLS1,CTZSNE, mdp 





unsigned 
get pde va 





char appdev) 
ñ 
unsigned retvalr 








retyal = ct_parciol pdev,ppdev)s /a 
AN retyal 22 CT_SNP) A 
0 
printer 





prdev)r 


et dispstct_pdev)r 1 
eñor 
3 


return retyal 1 











char pio; 
0 
unsigned retvalr 1 
retyal = ct parciot to/ptod)  /e 
AN Cretval 22 CT_SNF) A 
ñ 
Primtf(AN1007 Input /Output 
pio) 
printr(i"inlegal values are 
19 
return retvaly 1 
y 
unsigned 


get prototouteut,poroto) 











char mpprotor 








ñ 
unsigned retval 1 


Af Coutaut) 1 
e 


/% Inictalización de protocolo de visualización */ 


XON; "Output XON") 1 

ZOETX; "Output ETX")7 

ARTS; "Input RTS") 
 xON" 


dev) /n obtención de dispositivo físico */ 
/% Esta función devuelve el código de dispositivo físico 
especificado por el usuario en La Línea de orden. */ 
/* Apuntador a cadena de caracteres */ 


/% Devolución de valor */ 


1007Physical Device “%s" is invalid or ambiguous.". 


printí("inLegal Physical Devi 


/« obtención de parámetro de entrada/salida */ 
/* Apuntador a cadena de caracteres */ 


/* Esta tunción devuelve el código del 
por el usuario en La Línea de orden. */ 
ant outeut; 7 


para salida, =0 para entrada +/ 
/* Apuntador a cadena de caracteres */ 


1% Finalizador */ 


protocolo de entrada */ 
, 


/% Finalizador */ 





Obtención de código para cadena ASCII */ 
Si no se encuentra La cadena */ 


ares 
Visualización de todos Los valores */ 





Devolución de código */ 


Devolución de valor +/ 


Obtención de código para cadena ASCII */ 
Si no se encuentra La cadena */ 


direction “Xs” ls invalid or ambiguous.”, 


Visualización de todos Los valores */ 


devolución de código */ 


protocolo especificado 


Devolución de valor +/ 


Salida especificada +/ 








Figura 11-10. (Continuación.) 
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/* obtención de código para cadena ASCII */ 














retyal = "ct parciot_oproto,peroto)? 
AN Lretyal == CT_SNF) 7% Si no se encuentra La cadena +/ 
Ñ 
07; PT EMLECAOO7Output Protocol “Za” 45 invalid or ambiguous. 
Printf("inLegal Output Protocols are; "5 
et dispstet_oproto); — /x Visualización todos Los protocolos válidos */ 
años 
1 
, 
else /x Entrada especificada */ 


ñ 
/* Obtención de código para cadena ASCII */ 

retyal = ct parciot iproto,pproto); 

AN Cretval == CT_SNF) /* Si no se encuentra La cadena +/ 
1 





printf ("1007 Input Protocol “%a” 
roto)» 





invalid or ambíguous.*, 





Input Protocols are 1 "1 
(et_iproto»  /r Visualización todos Los protocolos vá 





> 
» 
return retvatr 1% Devolución de código »/ 


Fijación de protocolo para dispositivo físico */ 
Código de dispositivo físico */ 

Byte de protocolo */ 

Apuntador a Longitud de protocolo */ 





struct ppt 
Ñ 


char mpatt16)1 /* Matriz de 16 apuntadores a tablas de dispositivos */ 
1 
struct ppdt mppdty /x Apuntador a La matriz de tablas de dispositivo */ 





ruet Za mato /% Apuntador a tabla de dispositivo */ 


dt = get_cba(CB_DTA)) /e Fijación de apuntador a matriz de apuntadores */ 
at = ppdt => patipdeved; 








10 000. /* Comprobación de validez del apuntador a la matriz */ 
0 
printf ("WnError == Array of Device Table Addr 18 not set for device Wa." 
Pdevor 
estos 
y 
Af (protoc k Ox8000) — /* Comprobación de si el byte de protocolo se fija 
directamente o debe ser operado (OR) */ 
ñ Leo a 
gto at_st) im (protoc 4 0x7F)1 
y 


else 
1% Fijado directamente +/ 


« 
gt > dt_stl = (arotoc A 0x7F)S 
Y 


AN Utarotos 4 OX7F) mu DTZOETX) /% 5) ENVACK, comprobación de Longitud 
de mensaje » 


n 
AN (digit Umpplengtn)) /* Comprobación de Longitud presente */ 
h 
/* Conversión de La Longitud a binario y fijación del campo 
de tabla de dispositivo. */ 
gto dtetxml = atolípplengtn)r 
y 








ahow_proto() /+ Mostrar valores de protocolo en curso */ 
q 


struct _ppdt 
0 


Figura 11-10, (Continuación.) 
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In Matráz de 16 apuntadores a tablas de dispositivos */ 
eN 
struct _ppdt mppdty /% Apuntador a La matriz de tablas de dispositivo */ 
ruet at mat /* Apuntador a tabla de dispositivo */ 
Ant pdever /+ Código de dispositivo físico */ 
struct _et máprotor /+ Apuntador a protocolo de visualización */ 


Prato 





/t_cba(CB_DTA)1 /a Fijación de apuntador a matriz de apuntador */ 
/x Para todos Los dispositivos físicos */ 

tor (pdeve = 01 pdeve <= MAXPDEV1 pdevces) 
M 


/. Fijación de apuntador a tabla de dispositivos */ 
dt = prat —> Patlpdevedr 


41 tato /* Comprobación de validez de apuntador a matriz */ 
0 
primti(iimiProtocol for %s - ".ct_stretet pdev,pdeve)) 
/m Check 41 any protocols set m/ 
Ar CICOt => dt_atl E ALLPROTO)) 
Ñ 
Prámtf (None. ")1 
continues 
> 


1 Fijación de apuntador a tabla de protocolos de visualización */ 
dproto = ct_dprotor 
Wide táprolo => _ct_code 1 CT_SNF) 

( 





/* Comprobación de fijado bit de protocolo */ 
11 Cóproto => _ct_code Lat => dt_st1) 
e 7% Visualización de protocolo */ 
primtriras ".dproto > _ctapdr 
Y 
sodprotor /* desplazamiento a entrada siguiente »/ 
) 
/x Comprobación de protocolo ETX/ACK y 
Longitud de mensaje a visualizar */ 
Ar dat => Stata E DT_OETA) 
pranif(” Message length %d by 
RAS] 








/« Comprobación de uso correcto */ 
/« Cuenta de argumentos en Línea de orden */ 





AN Carac mm 1) 
ñ 


FAME ("ANPROTOCOL. 
Mt CAMAAPROTOCOL 


tx the physical devices serial protocols."); 
levice direction protocol (me Lengtno)s 




















Figura 11-10. (Continuación.) 


ASSIGN —Asignación de dispositivos fí: 





cos a lógicos 





La utilidad ASSIGN mostrada en la figura 11-11 pone a uno los bits 
necesarios de los bits de redireccionamiento de entrada/salida física del 
BIOS. Asigna la entrada/salida de un dispositivo lógico a un dispositivo 
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físico. La entrada sólo puede darse desde un solo dispositivo físico, mientras 
que la salida puede ser dirigida a múltiples dispositivos. 

He aquí un ejemplo de diálogo de consola que muestra a ASSIGN en 
acción: 
P3B> 
ASSIGN Vn 1.0 02/17/83 
ASSIÓN sets the Input/Output redirection. 

ASSION logical-device INPUT physical-device 


ASSION logical-device OUTPUT physical-devi (i 
ASSION SHOW (to show current assignments) 








_dev2..) 


Legal logical devices are 1 
CONSOLE 
AUXILTARY 
LIST 


Legal physical devices are 1 
TERMINAL 
PRINTER 
MODEM 


P3B>». 1how<CR> 

ASSIGN Vn 1.0 02/17/83 

Current Device Assignments are 1 
CONSOLE INPUT igned to - TERMINAL 
CONSOLE OUTPUT is assigned to - TERMINAL 
AUXILIARY INPUT is assigned to -— MODEM 
AUXILIARY OUTPUT is assigned to - MODEM 
LIST INPUT is assigned to - PRINTER 
LIST OUTPUT is assigned to — PRINTER 


P3Brassian a o tm escR> 
ASSIGN Vn 1.0 02/17/83 
Current Device Assignments ; 
CONSOLE INPUT is assigned to — TERMINAL 
CONSOLE OUTPUT is assigned to - TERMINAL 
AUXILIARY INPUT is assigned to - MODEM 
AUXILIARY OUTPUT is igned to - TERMINAL PRINTER MODEM 
LIST INPUT is assigned to - PRINTER 
LIST OUTPUT is assigned to — PRINTER 























lefáne YN "1NASSION Vn 1.0 02/17/83" 
Binclude <LIBRARY.H> 
struct _ot ct pdevIMAXPDEV + 22) /x Tabla de dispositivo físico */ 


/% Nombres de dispositivo Lógico */ 
Maetíne LN_C "CONSOLE" 


Mgetíne LNZA — "AUXILIARY" 
Odefine UN "LIST" 
struet _ctct_1devtad: /* Tabla de dispositivo Lógico */ 


struet et ct_iot3)) 1 Entrada/salida */ 


/% Parámetros en Línea de orden */ 
lefine LDEV argyl1]  /r Dispositivo lógico */ 
lefáne 10 argvt21 /x Entrada/salida +/ 





Figura 11-11. ASSIGN.C, una utilidad que asigna la entrada y salida de un dispositivo lógico a 
dos dispositivos físicos. 
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maintargc,argv) 








Visualización de mensaje de funcionando */ 


PrámtruNo u 
Retour Or /a Activar tablas de códigos */ 


Chk_uselarac)y  /* Comprobación de uso correcto */ 





/x Comprobación de petición de mostrar valores en curso */ 
Aro OSHO", ara c 177) 
1 /* No, suposición de fijado necesario */ 


10 us 





Ir NOTA: El número de dispositivos físicos a tratar 
viene dado por argc - 3 */ 
 s19n(get_1dev(LDEV) , 9et_10(10),arge — d,arov)1 














, 
setup /* Fijación de tablas de código para este prog 
Ñ 

/% Anicialización de La tabla de dispositivos fisicos */ 
et_imit(ct_paevLO2,0,PN_T)1 fu Terminal +/ 
SUTIL Lct pde VE 1d, 1 /PNCPOS /e Impresora */ 
SU TAmit Lct pdevE2),2,PN701 1% Modem +/ 


etTAnit tot pdevt31,CT_SNF, ad) /2 Finalizador */ 


/% Inicialización tabla de dispositivos lógicos +/ 








et_ámittet_1devL02,0,LN_C)r erminal */ 
St mit Cot ZIdeVE1a, 1, UNA) Ve auxiliar +/ 
EtTAmit (ct TIdevE2),2,LN 7101 Fu Listado */ 


Etinitit 





devt31,CT_SÑE,“e*oy /8 Finalizador */ 





/* Anicialización tabla de entrada/salida +/ 
et_Amit(et_40C03,0, "INPUT")7 
Et Amitiet1oL1), 1: "OUTPUT")0 


CUA MA t(ot OLI. CT_SNE, 1% Finalizador */ 





, 


unsigned: 

et Idevip1dev /* Obtención dispositivo Lógico +/ 

Te Esta función devuelve el código del dispositivo Lógico 
especificado por el usuario en La Línea de orden. */ 











char apldevi /* Apuntador a cadena de caracteres */ 
t 
ur 1d retvali /x Devolución de valor */ 
relval= ct parciot_Idev,pldev)1 74 Obtención de código para cadena ASCII */ 
SY (retval En CT_SNF) 1% $1 no se encuentra La cadena */ 
q 
primtf("Wni007Logical device “%s” is invalid or ambiguous.". 
1dev)5 
printií"WnLegal logical devices ares": 
Cl dispstet_Idev)1 /+ Visualización de todos Los valores */ 
señor 
y 
return retvalr 1% Devolución de cádigo */ 
y 
unsigned 
9el_lo(pio) /* obtención de parámetro de entrada/salida */ 
char pios /% Apuntador a cadena de caracteres */ 
ñ 
unsigned retval; /% devolución de valor */ 
retval = ct parcíct_to,pto)7 — /a Obtención de código para cadena ASCII */ 
Ma /% $3 no se encuentra La cadena */ 


Prámtf("An1007Imput/output direction “Le” ls invalid or ambiquous.". 
plo) 








printt(*nlegal values are 1 ds 

Ct dispstot_10)1 /+ Visualización de todos Los valores */ 
años 

y 





Figura 11-11. (Continuación.) 
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return retvali /x Devolución de codigo «/ 

y 

set_assign(ldeve, output, arg, argv) /+ Fijar asignación Credireccionamiento de E/S) */ 
Ant ldevor /x Código de dispositivo Lógico */ 

Ant cuteutr /x Código de redireccionamiento de E/S */ 

Ant argcr /x Cuenta de argumentos a tratar */ 

char Rargvtdr /x Réplica de parámetros para función principal */ 

Ñ 

unsigned aredirs /x Apuntador a palabra de redireccionamiento +/ 

Ant pdever /x Código de dispositivo físico */ 





unsigned rd_yalr 1% Valor de redireccionamiento */ 
/* Obtención de dirección de palabra de redireccionaniento de E/S */ 


Este programa supone que Los valores del código get_cba 
están ordenado: 
Dispositivo KO, entrada y salida 
ispositivo 41, entrada y salida 
'spostrivo M2, entrada y salida 










El código get cba se calcula multiplicando el código 

del dispositivo légico por 2 (desplazamiento de 1 bit a la 
izquierda) y añadiéndoLo al código para dispositivo 10 

entrada. Finalmente se añade La variable de salida (0 = entrada, 
1= salida) ef 

Coba (Ce.Cl + Úldeve << 1) + output); 





regir 





ró_val = 0) /* AniciaLización de valor de redireccionamiento +/ 


/* Para salida La asignación puede hacerse a varios dispositivos fisicos, 
de manera que este programa pueda efectuarse varias veces */ 




















de A 
/x Obtención de código para cadena ASCII +/ 
/% NOTA: Los parámetros de dispositivo físico empiezan 
con el parámetro 3. Sin embargo, arge es un contador 
decrenentador del número de dispositivos físicos 
tratados. Por tanto, argc + 2 causa que sean procesados 
en orden inverso (e£ decir, de derecha a izquierda 
en la Linea de orden) */ 
pdevo = ct_parciot_pdev,argvlargo + 23)1 
Af Ladeye == CT_SNF) /x Si cadena no encontrada */ 
ñ 
rANtE C'NANDO7Physical device “%s” 15 invalid or ambiguous.*, 
argvlargo + 21); 
Legal physical devices are 1 07 
_dispstctpde)r /x Visualización de todos Los valores */ 
eos 
el 
/x Repetición del bucle tantas veces como parámetros haya 
(únicamente para salida) */ 
else 
0 
/* Construcción de nuevo valor de redireccionamiento realizando La operación OR con el bit a 
uno desplazado a la izquierda tantos Lugares cono pdevc. */ 
rav iO ee peor 
y 
Y while Earge ki output)? 
mredir = yd_valr /% Fijación de valor en bloque de configuración */ 
Y 
show_assignt) /n Mostrar velocidad de transmisión en curso */ 
Ñ 
Ant rd_codes /r código de redireccionamiento para get_cba */ 
Ant dawn; /% Número de dispositivo Légico */ 
Ant pdevm /% Número de dispositivo físico */ 
unsigned rd_val; /e Valor de redireccionamiento +/ 
unsigned mprd_valr /* Apuntador a valor de redireccionamiento */ 
/x Nota: Los códigos respectivos para acceso a los valores de redireccionamiento vía 
la función get_cba (obtención de La dirección del bloque de configuración) son: 
Dispositivo 40 entrada de consola =- 5 








Figura 11-11. (Continuación.) 
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Dispositivo HO salida de consola 
Dispositivo 41 entrada auxiliar —- 
Dispositivo AI salida auxiliar 

Dispositivo 42 entrada de Listado 
Dispositivo A2 salida de Listado 










9 
10 
Esta función utiliza esta relación matenática */ 


printf (WnCurrent device assignments are 2%; 





/x Para todos Los códigos get_cba */ 
tor trd_code = CB_Cl; rd_code <= CB_LO; rd_coder») 
% 


" 





Fijación de apuntador a valor de redireccionamiento +/ 
get_cbatra code); 

Te Obtención de valor de redireccionamiento de entrada +/ 
Lom apra /* Realiza también La inversión de byte */ 





pro_val 








1 Visualización de nombre de dispositivo. El código rd_code 
se convierte en número de dispositivo restando del primer 
fúmero de código y dividiendo por dos (desplazamiento un Lugar 
a la derecha). La dirección de entrada/salida se calcula 
3 partir del bit menos significativo de rd_code. */ 


prámti(imVds da la assigned to - 
et_atre(ot_ldev (rd_code — CÉ CI) 9) 1, 
EtstrectZio, (lrd_code E 0x0) + 10))1 


/x Para todos Los dispositivos físicos +/ 
tor (pdevn = 01 pdevn < 165 pdevner) 
Y 
/* Comprobación de asignación del dispositivo tisico en curso haciendo la 
AND con un bit a uno desplazado a La izquierda pdewn veces */ 
40 Crd_val RL «e pen) /a ¿Está activado el disposttivo? */ 
( /x Visualización nombre dispositivo fisico */ 
primito xs" ot_strclet_pdev.pdevn) 1 
y 


/« Comprobación de uso correcto =/ 











intargo; /+ Cuenta de argumentos en Linea de orden */ 
0 
Af Cargo mn 10 
ñ 
printf ('WNASSION sets the Input/Output redi »” 
printf (ANY tASSION 1091: 100 






“al-devi (phy_dev2..1%)5 
Ianments 0) 


printf (WMA tASSION 1091: 

printf (rXnYtASSION SHOW 
al logical devices are 2%)7 

uN 

physical devices are 2% 

y 











Figura 11-11. (Continuación.) 


DATE —Fijación de la fecha del sistema 


La utilidad DATE que se muestra en la figura 11-12 fija la fecha del 
sistema en el bloque de configuración, junto con un indicador que indica 
que la utilidad DATE ha sido utilizada. Otros programas de utilidad 








pueden usar a ésta como comprobación primitiva de si la fecha del sistema 


es actual, 
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A continuación se muestra un ejemplo de diálogo de consola: 


P3B>date<cr> 
DATE VYn 1.0 02/18/83 
DATE sets the system date. Usage is : 
DATE mm/dd/yy 
DATE SHOW (to display current date) 


P3B>gate show<CR> 
DATE Vn 1.0 02/18/83 
Current Date is 12/18/82 


P3B>date 2/23/83<CR> 
DATE Vn 1.0 02/18/83 
Current Date is 02/23/83 






Mdefine YN "ANDATE Un 1.0 02/19/03" 


/* Esta utilidad acepta La fecha en curso cono paránetro de orden, 
La valida y fija la fecha interna del sistema en el BIOS. 
Alternativamente puede ser requerida para visualizar La fecha 



















char 































char mdati 





Ant mm, dd, 
Ant count; /x Cuenta de contraste de Los valores numéricos entrados */ 
Ant countr /% Cuenta utilizada para añadir ceros a la 


pránticos 
date = 
date_flag 





AN Cusstromo ("SHON" 






en curso del sístena. */ 


Winclude SLIBRARY.H> 


/% Apuntador a La fecha en el bloque de configuración */ 
flaos /% Apuntador a indicador de fecha-fijada */ 
/x Variables que contienen nes, día y año */ 











j2quierda en fecha +/ 


maintargc,argv) 
Ant argcr 
char margvid; 






de mensaje de "funcionando" »/ 
/+ Fijación de apuntador a fecha */ 
)TFLAGS)1 /+ Fijación de apuntador a indicador de fecha fijada */ 





_oba(ct 





AN Cargc 12 2) /x Comprobación de petición de ayuda (help) (o necesaria) */ 


show_usetdr  /a Visualiza: 





de utilización correcta y salida */ 





ravE13))  /% Comprobación de mo opción de mostrar */ 
E 
/* Conversión de fecha en mes, día, año «/ 
mcount = sscanflaravL1I,"HO/%8/%9”, tm, 8d, Ly y) 7 
At Umcount 12 3) /* Entrada no numérica */ 
show User /% Visualización de utilización correcta y salida */ 





/% NOTA: La comprobación de validez que sigue es simplista, 
pero puede ser ampliada para realizar una comprobación 
más sensible al contexto, dias en el mes, 
años bisiesto, etc. */ 


























Af (mm > 12 11 mm < 1) * /% Comprobación de mes, día y año válidos */ 
ñ 
Printf(“1nMonth = %a 4s 1llegal.*.mm)1 
show_use Or /r Visualización de utilización correcta y salida */ 
y 
M1 (98 y 31 11001) 
ñ 
Primtf("inDay = Xd is 1llegal.*,dd)1 
show_usetdr  /4 Visualización de utilización correcta y salida */ 
N 
AN yy y 90 11 yy € 89) /9 <o== NOTA 1 9/ 
0 
Printi(inYear = xd ds illegal. yo 
poe Os 1% Visualización de utilización correcta y salida */ 


11-12. DATE.C, una utilidad que hace que la fecha actual forme parte del sistema. 
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/* Conversión de Los enteros anteriores en una cadena formateada */ 
intt (date, "X20/X20/424".mn, dd, yy)1 

8) = 0x0A) /* Terminación con salto de Linea */ 

Batetor 00%) /* Finalizador de nueva cadena */ 








/+ Cambio de“ 1/ 2/ 3" en "01/02/03" +/ 
for (count = 07 count < 75 counte=3) 
( 
Af (datelcount) == - 
dateteounta = “0% 





Puesta a uno del indicador que indica que ha sido puesta La fecha */ 
1= DATE SETS 








mdate_11 
J 


primti(óAnYiCurrent Date ds %s",date)o 
Y 


show_use O /% Visualización de uso correcto y salida */ 

t 

Printi ("ANDATE sets the system da 
ANtE CTAMMDATE mn/dd/yy")5 

Printí ("An VIDATE SHOW (to display current date)Wn")r 

eatos 

y 





Usage ds 10r 














Figura 11-12, (Continuación.) 


TIME—Fijación de la hora del sistema 


La utilidad TIME que se muestra en la figura 11-13 fija la hora del 
sistema. Igual que DATE, TIME fija un indicador para que otras utilidades 
puedan comprobar si la hora del sistema está actualizada. 

He aquí un ejemplo de diálogo de consola: 

P3B>t ime<CR> 
TIME Vn 1.0 02/18/63 
TIME sets the system time. Usage is : 


TIME hht:mmt:ss3) 
TIME SHOW (to display current time) 





P3B>time show<CR> 
TIME Vn 1.0 02/18/83 

Current Time is 13:08:44 
P3B>Lime S147<CH> 
TIME Vn 1.0 02/18/83 

Current Time is 05:47:00 











Adefine YN “ANTIME Un 1.0 02/18/89* 





Ir Esta utilidad acepta La hora cono parámetro de orden, La valida 
y fija la interna del sistema en el BIOS. 
Atternativamente visualiza La hora del sistema. */ 





Vinclude <LIBRARY.M): 


char "times 1% Apuntador a hora en el bloque de configuración */ 
Char mtime_seto /+ Apuntador a indicador de hora fijada */ 








Ant hh. mm, 7a Vartables que contienen horas, minutos, segundos */ 
Ant county Ja Cuenta para contrastar Los valores numéricos entrados +/, 
Ant counts Ta Cuenta utilizada para añadir ceros a la izquierda de La hora */ 





Figura 11-13. TIMEC, una utilidad que hace que la hora actual forme parte del sistema. 
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maintargc,argw) 
Ántiargcs 
char rargvidr 
ñ 
Prantr (uN) /% Visual ización de mensaje de "funcionando" +/ 
time = get_cba(CB_TIMEA)) /* Fijación de apuntador a hora »/ 
time_f1a9 = get_cba(CB_DTFLAOS)1 /x Fijación de apuntador a indicador 
de hora fijada */ 
hh mn ss + Os /% Inicialización de La hora si no se han especificado 
Los minutos y Los segundos +/ 
Af Largo 1= 2) /% Comprobación de petición de ayuda (help) lo necesaria) */ 
shower /+ Visualización de uso correcto y salida */ 
11 Cusstremp("SHOW",argvt13)) — /% Comprobación de no opción SHOW +/ 
Ñ 
/x Conversión de La hora en horas, minutos y segundos */ 
mcount = sscantlargvi11,"%d:%d:%0", Ahh, hmm, Las)1 
M1 Umcoun to /x Entrada no nuérica e/ 
show_use(dz  /+ Visualización de Uso correcto y salida */ 
Mo 12 /* Comprobación de horas, minutos y segundos válidos +/ 
( 


printf ("AMNOO7Hours = Xd 44 4llegal.*.hmdr 
how_use(d;  /% Visualización de uso correcto y salida 4/ 








y 
Af tom > 59) 

ñ 

Primtf("AMOO7Minutes = Xd da 4llegal.*mm)r 

show_use Or /r Visualización de utilidad correcta y salida +/ 


» 
41 (0 > 59) 
( 


show_use 7 /+ Visual ización de 
printf (AMiO07Seconds = %a is 411 
y 


¡tiLidad correcta y salida +/ 
AS 








/* Conversión de Los enteros anteriores en una cadena formateada */ 
sOrAntí (tame, “A2d1X2d1%20", hh. mm, 955 

timeC8) = OX0A5 /x Terminación con salto de Linea */ 

támeL91 = X0%; /% Finalizador de nueva cadena */ 





/x Cambio de “1: 2: 3" en "01:02:03" */ 
for (count = Oy count < 7) counte=3) 
t 


Af CtimeLcount] == 2 0) 
timelcount] = “0% 
, 
/x Puesta a uno del indicador que indica que ha sido puesta La fecha +/ 
le TIME_SET 





mtime_01, 
y 


printi("imviCurrent Time ds 4%, Lime)r 
Y 


show_use() /% Visualización de uso correcto y salida »/ 
0 

Printi(0ANTINE sets the system time, Usage ds 0%; 
PrAntICAÉVUTIME Ah Cammtiaa 1177 

Printi(AntTIME SHOM (to display current timeJin"); 

edtor 

Y 




















Figura 11-13. (Continuación.) 


FUNKEY —Fijación de las teclas de función 


La utilidad FUNKEY que se muestra en la figura 11-14 fija las cadenas 
de caracteres asociadas con teclas de función específicas. En la cadena de 
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caracteres especificados, el carácter “<' se convierte en un carácter LINE 
FEED (salto de línea). He aquí un ejemplo de diálogo de consola: 








<CR> 
FUNKEY sets a specific function key string. 
FUNKEY key-number "string to be programmed<” 


(Note 2 “<” is changed to line feed.) 





( key=number is from 0 to 17.) 
( string can be up to 16 chars.) 
FUNKEY SHOW (displays settings for all keys) 


P3B>funkey showiCR> 
FUNKEY Vn 1.0 02/18/83 
- Key RO = “Function Key 1<” 
Key M1 = “Function Key 2<” 


P3B>funkey O "PIP BisAsM.M[VI<"<CR) 


P3E>funkey show<CR> 

FUNKEY Un 1.0 02/18/83 
Key 10 = “PIP Bi=A:%.X[V1<" 
Key 41 = “Function Key 2<” 





Adefine YN "ANFUNKEY Yn 1.0 02/18/83" 


Binclude <LIBRARY.H> 





MOST 7e Apuntador a tabla de teclas-función */ 
maintargc,argv) 


char marovid 


Af Cargo mm l ii argc > 3) 





4f Cusstromo ("SHOW", argvE11)) 
M 





/% Número de tecla función a programar */ 
not2011 /* Cadena para tecla-tunción */ 


ahow_us 





» 


_Eba(CB_FKT)1  /s Fijación de apuntador a tabla de teclas=función */ 


AN (Itadi9it(aravE11C01)) 
( 
Prámtf ("ANNOO7%s" da 
arovt1D)5 
ahow_use Or 
y 


Jal function ka 





fmum = atoilaravt11)1 — /% Conversión de número de tecla-función */ 





Af Cimum > FK_ENTRIES) 


Ñ 

Primtf ("AMNO07Function key number Xd too lar 
Shower 

y 


tna 








An ttstrAno) > FK_LENOTH) 
1 
printf (*WMNOO7FUNCtion key string £s too long.")1 








Figura 11-14. FUNKEY.C, una utilidad que fija las cadenas de caracteres asociadas con 


teclas de función específicas. 
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Pfk += fmumy — /* Actualización de apuntador a cadena */ 
/* Copia de La cadena en La tabla de teclas=función */ 


/x Comprobación de tecla-función presente */ 
AN CICPIK > fk_impUtLO1)) 
0 





frumdr 





AMtf CTAMNOO7Error 1 Function Key B%d 15 not set ue to be programme 
shou_use 0) 
r 
strcpylotk => fk_outrut, fetring)r 
y 








/% Función SHOW especificada */ 














Amt (vO7 /% Visualización de mensaje de "funcionando" +/ 
años fans 
Y 
) 
get_fetstrino) /* Obtención de cadena de función de parámetros de orden v/ 
char string0d: /x Apuntador a cadena de caracteres */ 
7 
char mtail /x Apuntador a parámetros de orden */ 
short tcountr /x Cuenta de caracteres totales en paránetros de orden */ 
Ant seno /* Longitud de La cadena */ 
Lat1 = 0x807 La Linea de orden está en La posición DOB0H de La memoria +/ 
tcount = mtaíl+e; Fijación del núnero total de caracteres en La zona de parámetros deorden */ 
slen = 0 /* Inicialización de Longitud de cadena */ 
unile (tcount=- / Para todos Los caracteres en zona de parámetros de orden */ 
7 
40 Cmtalles ae 000) Examen para primeras acotaciones +/ 
Ñ 
Af CItcounto /% No se han encontrado acotaciones */ 


q 
printf ("iM007NO le: 
hov_use dy 





Ang quotes found."» 





, 


++tcountr /* Ajuste del contador de caracteres +/ 
Mile (Ecount /% Para resto de caracteres en zona de parámetros de orden */ 
0 
AN tall mm 2) 
0 





strimotslen] = 10% — /8 Añadir finalizador */ 
break: /* Salida del bucle */ 
y 





stringtslen] = ataíles; /9 Transferencia de carácter en zona de parámetros a cadena +/ 
Af Cstrámolslen) == +<) 















strimglslen] = 0x0A) 
sosleno 
) 
Af Uteount) /% No encontradas marcas de final +/ 
0 
printf (*AM007No trailing quotes found") 
show_use tr 
3 
return sleny /% Devolución de Longitud de cadena +/ 
y 
show_funt) /% Visualización de valores para todas Las teclas=función +/ 
ñ 
struct _1kt mprkto /x Apuntador Local a teclas=función */ 
Ant count; /x Cuenta para acceso a tecla=función */ 
char a1f /w Apuntador a carácter "<" (salto de Línea) +/ 
PfKt = get_cba(CB_FKT)1 /% Fijación de apuntador a tabla de teclas-función */ 
for (count = 01 count <= FK_ENTRIES; count»») 


AN CpfKt => fk_tnputto) /% Tecla programada +/ 
Ñ 


1% Comprobación de final físico de tabla */ 





Figura 11-14, (Continuación.) 
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AN CPIKE > fk_ámput mn OA) 1] 


bre /e Si salto fuera del bucle */ 
Fino. Pfkt > tk oUteUtor 
/* Conversión de todos los caracteres OXDA a "e" +/ 
ende (Um atrscnifs trino, 1012") 
g 








streoyar 








me. 
Y 


printii“inViKey WO = “%s** count, fatring)r 
y 
gorras /* Desplazamiento a entrada siguiente +/ 


y 


show_use 0) 
H 
printf ("ANFUNKEY setr a specific function key string.") 


PrintT(=ANVIFUNKEY ker=number 1O4Zstring to be programmedc1042 ")1 











Prántrcinve (Note 1 “Cds changed to line feed.)%)1 

printicamt c key-number 13 from 0 to 19.3% 
FK_ENTRIES=1)1 

printrcantt Ñ string can be up to Xd chars.J%, 
FK_LENOTM) 1 

printf ("An TRFUNKEY SHOM (displays settings for all keys)%)o 


eator 
Y 








Figura 11-14, (Continuación.) 


lades 





A causa de las limitaciones de espacio, no se pueden mostrar en este 
capítulo todos los posibles programas de utilidad para el BIOS. Otros que 
pueden necesitarse desarrollar para tener un conjunto completo son: 


PUBLIC/PRIVATE 
Este par de servicios conectarán o desconectarán el indicador de 


ficheros públicos, haciendo los ficheros del usuario 0 asequibles a 
otros números de usuario, o lo contrario. 


SETTERM 
Este programa programará la tabla de escape CONOUT, fijando las 


distintas secuencias de escape según se requieran. También puede 
programar los caracteres en la tabla de teclas de función que se 
comparan con las emitidas por el terminal en uso. 


SAVESYS 
Esta utilidad salvará la configuración en curso en el bloque de 


configuración a largo plazo. 


LOADSYS 
Este cargará el bloque de configuración a largo plazo desde una 
imagen previamente salvada. 
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DO 

Esta utilidad copiará la zona de parámetros de orden en una 
memoria intermedia multiorden, cambiando “1” en LINE FEED y 
fijando entonces el apuntador de entrada forzada en la memoria 
intermedia multiorden. Como resultado de ello, los caracteres de la 
memoria intermedia multiorden se introducirán en el flujo de 
entrada de la consola como si hubieran sido mecanografiados de una 
en una orden. 


SPARE 
Esta utilidad trabajará de acuerdo con el manejo de sectores 
dañados de disco rígido en el controlador de disco. Tomará nota de 
los sectores y pistas dañados en el disco rígido. Hecho esto, las 
llamadas siguientes a estos sectores o pistas serán redirigidas a una 
parte distinta del disco. 


Visualización de mensajes 
de error 


Errores varios 





Mensajes de error 





Este capítulo relaciona los mensajes de error que emanan de CP/M 
estándar y de sus programas de utilidad. No incluyen mensajes de error del 
BIOS; estos mensajes, si existen, son producto individualizado de progra- 
madores que escribieron las distintas versiones del BIOS. 

Los mensajes de error se muestran en orden alfabético, seguidos (entre 
paréntesis) por el nombre del programa o el componente de CP/M que 
envía el mensaje. Los mensajes se muestran en mayúsculas, aunque el 
mensaje real que se vea contenga letras minúsculas. Los caracteres adi- 
cionales que se componen para “embellecer” el mensaje se han omitido. 
Por ejemplo, el mensaje “**ABORTED++*” será relacionado como 
“ABORTED”. 

A continuación de cada mensaje hay una aclaración y, cuando es 
posible, alguna información para ayudar a luchar contra el error. 

La última sección del capitulo se enfrenta con errores conocidos o 
peculiaridades del CP/M y de sus utilidades. Léase esta sección de modo que 
se reconozcan estos problemas cuando se presenten. 
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Visualización de mensajes de error 





? (CCP) 


? (DDT) 


2?=(DDT) 


El CCP compone un signo interrogativo si se introduce un nombre de 


orden y no existe el fichero correspondiente de “orden.COM” en el disco. 


También se compone si se omite el número de páginas requerido como 


parámetro en la orden SAVE. 


El DDT envía un signo interrogativo bajo ciertas circunstancias. Debe 


utilizarse el contexto (y algún trabajo de adivinanza) para determinar qué es 
lo equivocado. Aquí hay varias causas específicas de problemas: 


e El DDT no puede encontrar el fichero que se le ha pedido que cargue 
en memoria. Sálgase del DDT e investíguese utilizando DIR o STAT 
(el fichero debe estar fijado en modo sistema y por consiguiente es 
invisible con DIR). 


e Existe un problema con los datos en el fichero HEX que se ha 
encargado cargar al DDT. El problema podría ser un control de error 
de suma (check-sum) en una línea dada o un campo no válido en 
cualquier parte del registro. Inténtese escribir el archivo HEX en la 
consola o utilizar un editor para examinarlo. Es raro encontrar sólo 
uno o dos bits o bytes defectuosos en un fichero HEX; posiblemente 
se hayan estropeado cantidades mayores de fichero. Por consiguiente, 
hay que ser capaz de distinguir el problema de forma correcta y 
rápida. Si se tiene el código fuente para el programa, hay que volver a 
ensamblarlo para producir otra copia del fichero HEX. Si no se tiene 
el código fuente, no hay un camino viable para resolver este problema 
a menos que se esté preparado para crear a mano el fichero HEX 
—una tarea difícil y pesada. 


e El DDT no reconoce la instrucción que se ha introducido cuando se 


utiliza la orden “A” (ensamblaje) para convertir una instrucción en 
código fuente en hexadecimal. Compruébese la línea que se introdujo. 
El DDT no quiere tabuladores en la línea (aunque parezca aceptarlos) 
ni números hexadecimales seguidos de “H”. Compruébese que los 
nemónicos y los operandos son válidos. 


Esta notación críptica se utiliza por el DDT cuando se usa la orden “L” 


(desensamblado de lista) para visualizar alguna parte de memoria en el 


a 
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lenguaje ensamblador primitivo del DDT. El DDT no puede traducir los 
256 posibles valores de un byte. Algunos de ellos no se utilizan en el 
conjunto de instrucciones del 8080. Cuando el DDT encuentra un valor 
intraducible, compone este mensaje como código de instrucción, seguido del 
valor real del byte en hexadecimal. 

Esto se verá si se trata de desensamblar programa escrito para la CPU 
Z80, que ocurre porque utiliza instrucciones 8080 no asignadas. También se 
verá si se intenta desensamblar bytes que contengan cadenas de texto ASCII 
más que instrucciones 8080. 


ABORTED (STAT) 


Si se introduce un carácter del teclado mientras está trabajando STAT 
en el directorio de ficheros fijándolos a $DIR (directorio), a $SYS (sis- 
tema), a $R/W (lectura/escritura) o a $R/O (sólo lectura), entonces 
compondrá este mensaje, detendrá lo que esté haciendo y ejecutará un 
arranque caliente. 

En contraste, si se introduce la orden 


Abstat *.A<Cr> 


para visualizar todos los ficheros de un disco, no hay forma de poder 
abortar el proceso. 


ABORTED (PIP) 


Este mensaje se forma si se pulsa cualquier carácter del teclado mientras 
PIP está copiando un fichero en el dispositivo de listado. 


BAD DELIMITER (STAT) 


Si el BIOS utiliza el método IOBYTE normal de asignar dispositivos 
físicos a lógicos, se utiliza STAT para realizar la asignación. La orden tiene 
este formato: 


STAT RDR:=PTR: 


STAT visualiza este mensaje si no puede encontrar el “*=” en el sitio 
correcto. 


BAD LOAD (CCP) 


Este es probablemente el mensaje de error más oscuro de CP/M. Se 
obtendrá este mensaje si se intenta cargar un fichero COM mayor que el 
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área de programa transitorio. La única solución es construir un sistema 
CP/M que tenga un TPA mayor. 


BAD PARAMETER (PIP) 


PIP acepta ciertos parámetros entre corchetes al final de la línea de 
orden. Se visualiza este mensaje si se introduce un parámetro no válido o un 
valor numérico ilegal a continuación de una letra de parámetro. 


BDOS ERROR ON d: BAD SECTOR (BDOS) 


El BDOS compone este mensaje si las funciones READ y WRITE del 
BIOS vuelven siempre indicando un error. La única respuesta correcta a 
este mensaje es mecanografiar CONTROL-C. El CP/M ejecutará entonces un 
arranque caliente. Si se mecanografía CARRIAGE RETURN, el error será 
ignorado —con resultados impredecibles. 

Un BIOS bien implementado debería incluir la recuperación y el control 
de errores de disco, de forma que el error no fuera comunicado nunca al 
BDOS. Si el BIOS proporciona la opción de ignorar un error, hágase esto 
únicamente cuando se esté razonablemente seguro del resultado o se tengan 
copias adecuadas, de forma que se puedan volver a crear los ficheros. 


BDOS ERROR ON d: FILE R/O (BDOS) 


Se verá este mensaje si se intenta borrar (ERA) un fichero que haya sido 
puesto en modo de sólo lectura. Mecanografiando cualquier carácter en el 
teclado, el BDOS realiza una operación de arranque caliente. Obsérvese que 
el BDOS no indica cuál es el fichero que crea el problema. Esto puede ser un 
problema cuando se utilizan nombres de fichero ambiguos en la orden 
ERA. Utilicese la orden STAT para visualizar todos los ficheros en el disco; 
éste comunicará cuáles están en modo de sólo lectura. 

Este mensaje se forma también si un programa intenta borrar un fichero 
de sólo lectura. De nuevo será difícil determinar cuál de los ficheros causa el 
problema. La única solución es utilizar STAT para intentar inferir cuál de 
los ficheros de sólo lectura puede estar causándolo. 


BDOS ERROR ON d: R/O (BDOS) 


Este parece similar al mensaje anterior, pero se refiere a un disco lógi- 
co completo en lugar de a un fichero de sólo lectura. Sin embargo, se da 
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raramente porque se haya declarado un disco de sólo lectura. Normalmen- 
te, ocurre porque se cambiaron disquetes sin mecanografiar un CONTROL-C; 
CP/M detectará el nuevo disquete y, sin ninguna indicación exterior, lo 
fijará en estado de sólo lectura. 

Si el operador o el programa intentan escribir cualquier dato en el disco, 
el intento será detectado por el BDOS y se visualizará este mensaje. El 
mecanografiado de cualquier carácter en el teclado provoca un arranque 
caliente —y entonces puede actuarse. 





BDOS ERROR ON d: SELECT (BDOS) 


El BDOS visualiza este mensaje si el operador o un programa intentan 
seleccionar un disco lógico para el cual el BIOS carece de las tablas 
necesarias. El BDOS utiliza el valor devuelto por SELDSK para determinar 
si un disco lógico “existe” o no. 

Si se estuvo intentando cambiar el disco por defecto a uno no existente, 
se habrá de pulsar el botón RESET en la computadora. No hay forma de 
salir de este error. 

Sin embargo, si se estuvo intentando ejecutar una orden que accedía a 
un disco no existente, entonces se puede mecanografiar un CONTROL-C y 
CP/M realizará un arranque caliente. 


BREAK x AT y (ED) 


Este es otro mensaje críptico cuyo significado es imposible de adivinar. 
La lista que sigue explica los posibles valores de “x”. El valor “y” se refiere 
a la orden que ED estaba ejecutando cuando ocurrió el error. 





Significado 

Fallo de búsqueda. El ED no encuentra la cadena que se le pidió que buscase. 
Orden no reconocida. 

Fichero no encontrado. 

Memoria intermedia interna del ED llena 

Orden abortada 

Disco o directorio lleno. Habrá que determinar lo que está causando el problema. 


* 
? 
0 
> 
E 
F 


CANNOT CLOSE, READ/ONLY? (SUBMIT) 


SUBMIT compone este mensaje si el disco en el que se está intentando 
escribir su fichero de salida, *$$$,SUB”, está protegido fisicamente contra 
la escritura. No hay que confundir esto con que el disco que está protegido 
lógicamente contra la escritura. 
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La versión estándar de SUBMIT escribe el fichero de salida en el disco 
por defecto en curso, de forma que si es otro que la unidad A:, se puede 
tener la posibilidad de evitar este problema si se cambia a A:, el disco por 
defecto, y entonces se introduce una orden de la forma 


A>submit b:subfile<cr> 


CANNOT CLOSE DESTINATION FILE (PIP) 


PIP compone este mensaje si el disco de destino está protegido 
físicamente contra la escritura. Compruébese el disco de destino. Si está 
protegido contra la escritura, quítese la protección y repitase la operación. 

Si el disco no está protegido, existe un problema de hardware. Los datos 
del directorio escritos en el disco se están escribiendo en un sitio erróneo, 
incluso en un disco equivocado o no se está grabando. 


CANNOT CLOSE FILES (ASM) 
ASM compone este mensaje si no puede cerrar sus ficheros de salida 
porque el disco está fisicamente protegido contra la escritura, o si existe un 


problema de hardware que evita que los datos se escriban en el disco. Véase 
el párrafo anterior. 


CANNOT READ (PIP) 


PIP compone este mensaje si se intenta leer información de un dispositi- 
vo lógico que sólo puede enviar. Por ejemplo: 


A>pip diskfile=LST:<cr> 


PIP compondrá también este mensaje si se le confunde lo suficiente, 
como, por ejemplo, con las instrucciones siguientes: 


Apio 





Le3<cr> 


CANNOT WRITE (PIP) 


PIP compone este mensaje si se intenta enviar (escribir) información a 
un dispositivo lógico que sólo puede ser utilizado para entrada, tal como el 
RDR: (lectora, el nombre anacrónico del dispositivo de entrada auxiliar). 
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CHECKSUM ERROR (LOAD) 


LOAD compone este mensaje si encuentra una línea en el fichero de 
entrada HEX que no tenga el control de suma (check-sum) correcto para 
los datos de la línea. 

LOAD compone también información que ayuda a descubrir el pro- 
blema: 

CHECKSUM ERROR 

LOAD ADDRESS 0110 <- First address on Line in file 
ERROR ADDRESS 0112 <- Address of next byte to be Loaded 
BYTES READ: 


0110: 
0110: 00 33 22 28 02 21 27 02 <- Bytes preceding error 


Obsérvese que LOAD no compone el valor check-sum en sí. Utilicese 
TYPE o un editor para inspeccionar el fichero HEX con el fin de ver 
exactamente lo que está equivocado. 


CHECKSUM ERROR (PIP) 


Si se pide al PIP que copie un fichero del tipo HEX, comprobará cada 
línea del fichero, asegurándose de que el control de suma de la línea es 
válido. Si no es así, PIP compondrá este mensaje. Desgraciadamente, PIP 
no comunica en qué línea está el error —esto deberá determinarse 
inspeccionando el fichero HEX o volviéndolo a crear e intentando de nuevo 
la orden. 


COMMAND BUFFER OVERFLOW (SUBMIT) 


SUBMIT compone este mensaje si el fichero SUB especificado es 
demasiado grande para ser tratado. La memoria intermedia interna de 
SUBMIT es sólo de 2.048 bytes. Hay que reducir el tamaño del fichero 
SUB; quitar las líneas de comentarios o dividirlas en dos ficheros con la 
última línea del primer fichero “sometiendo” al segundo para producir un 
fichero SUBMIT anidado. 


COMMAND TOO LONG (SUBMIT) 


La línea más larga de orden que puede procesar SUBMIT es de 125 
caracteres. No hay otro medio de corregir este error que el de reducir la 
longitud de la línea que lo ha provocado. Habrá que encontrar esta linea 
mediante inspección —SUBMIT no la identifica. 
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Una forma para eliminar unos cuantos caracteres de una línea de orden 
es cambiar el nombre al fichero COM que se está invocando por un nombre 
más corto o utilizar nombres abreviados para parámetros si el programa 
los acepta. 


CORRECT ERROR, TYPE RETURN OR CTL-Z (PIP) 


Este mensaje es un remanente de los días en que PIP acostumbraba a 
leer datos hexadecimales de una lectora de cinta de papel de alta velocidad. 
Si PIP detectaba el final de un rollo físico de cinta de papel, componía este 
mensaje. El usuario podia entonces comprobar para ver si la cinta de papel 
se había roto o si efectivamente habia llegado al final. Si había más cinta 
que leer, el usuario podía introducir un CARRIAGE RETURN para reanudar 
la lectura o introducir un CONTROL-Z para servir de carácter de final de 
fichero. 

En pocas palabras, es poco probable que se presente este mensaje si no 
se tiene una lectora de cinta de papel. 


DESTINATION IS R/O, DELETE (Y/N)? (PIP) 


PIP compone este mensaje si se intenta escribir en un fichero de disco 
que haya sido fijado en modo de sólo lectura. Si se mecanografía “Y” o 
“y”, PIP escribirá el fichero de destino. Deja el fichero de destino en modo 
de lectura/escritura con su estado directorio/sistema invariable. Al mecano- 
grafiar un carácter distinto de “Y” o “y” se hace que el PIP abandone la 
copia y componga el mensaje 
*x NOT DELETED xx 


Puede evitarse, sin embargo, este mensaje si se especifica la opción “w” 
en la línea de la orden PIP. Por ejemplo: 


Apip destfile=srefilelw]<er> 


PIP escribirá entonces sobre los ficheros de sólo lectura sin preguntar. 


DIRECTORY FULL (SUBMIT) 


Este mensaje será compuesto si el BDOS devuelve un error cuando el 
SUBMIT intenta crear su fichero de salida, “$$$.SUB”. Como aproxima- 
ción rápida y general, úsese “STATx+.*” para ver cuántos ficheros y 
extensiones se tienen en el disco. Bórrense las que no se deseen. Usese 
entonces “STAT DSK:” para obtener el número máximo de posibles 
entradas al directorio para el disco. 
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También se puede ver este mensaje si el directorio de ficheros se ha 
deteriorado o si la rutina de formateado del disco abandona éste con el 
directorio de ficheros lleno con alguna configuración distinta de OESH. 

Se puede apreciar si el directorio ha sido dañado utilizando “STAT 
USR:”. STAT compone entonces los números de usuario que contiene el 
fichero. Si el directorio está dañado, normalmente se verán números de 
usuario mayores de 15. 

No es fácil reparar un directorio estropeado. “ERA *.*” borra sólo los 
ficheros para el número de usuario en curso, por lo que habria que 
introducir la orden 16 veces, una para cada número de usuario de 0 a 15. 
También existe la alternativa de reformatear el disco. 


DISK OR DIRECTORY FULL (ED) 


Su mismo título indica claramente a qué se refiere. 


DISK READ ERROR (PIP) 
DISK WRITE ERROR (SUBMIT) 
DISK WRITE ERROR (PIP) 


Estos mensajes serán precedidos normalmente por un mensaje de error 
del BIOS. Sólo se visualizarán si el BIOS regresa indicando un error. Como 
se ha descrito anteriormente, esto no es probable si el BIOS tiene cualquier 
clase de lógica de recuperación de errores. 


END OF FILE, CTL-Z? (PIP) 


PIP compone este mensaje si, cuando copia un fichero HEX, encuentra 
un CONTROL-Z (final de fichero). De nuevo, la idea principal se basa en el 
concepto de la cinta de papel física. Cuando se veía este mensaje se podia 
mirar la cinta de papel en la lectora, y si realmente se habia acabado el 
rollo, introducir un CONTROL-Z en el teclado para terminar el fichero. Al 
dar cualquier otro carácter, PIP habría leído el próximo trozo de cinta. 


ERROR: CANNOT CLOSE FILES (LOAD) 


LOAD compone este mensaje si se ha protegido fisicamente contra la 
escritura el disco en el que se está intentando escribir la salida del fichero 
COM. 
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ERROR: CANNOT OPEN SOURCE (LOAD) 


LOAD compone este mensaje si no puede abrir el fichero HEX que se ha 
especificado como parámetro de la orden. 


ERROR: DISK READ (LOAD) 
ERROR: DISK WRITE (LOAD) 


Estos dos mensajes normalmente serán precedidos de un mensaje de 
error del BIOS. Si éste incluye recuperación de errores de disco, normal- 
mente no se verá este mensaje; el error habrá sido tratado por el BIOS. 


ERROR: INVERTED LOAD ADDRESS (LOAD) 


LOAD compone este mensaje si detecta una dirección de carga menor 
que 0100H en el fichero HEX de entrada. También compone la dirección 
real de entrada desde el fichero, de forma que se pueda examinar el fichero 
HEX y buscar esta dirección para determinar la causa probable del 
problema. 

Obsérvese que DDT, cuando se le pide que cargue el mismo fichero 
HEX, lo hará sin ningún error —y probablemente perjudique los conteni- 
dos de la página base al hacerlo. 


ERROR: NO MORE DIRECTORY SPACE (LOAD) 


Título expresivo por sí mismo. 


ERROR ON LINE N (SUBMIT) 


SUBMIT compone este mensaje si encuentra una línea en el fichero SUB 
que no sabe cómo procesar. Lo más probable es que se tenga un fichero con 
tipo .SUB pero que no contenga texto ASCII. 

La primera línea del fichero SUB es la número 001. 


FILE EXISTS (CCP) 


El CCP compone este mensaje si se intenta utilizar la orden REN para 
cambiar el nombre a un fichero existente con un nombre ya dado a otro 
fichero. 

Utilicese “STATx.x*” para visualizar todos los ficheros del disco. DIR 
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mostrará sólo aquellos que están en modo directorio y no se podrá ver el 
que causa el problema. 


FILE IS READ/ONLY (ED) 


ED compone este mensaje si se intenta editar un fichero que ha sido 
fijado a modo de sólo lectura. 


FILE NOT FOUND (STAT) 
FILENAME NOT FOUND (PIP) 


STAT y PIP componen sus mensajes respectivos si se especifica un 
fichero no existente. Esto sirve tanto para nombres de fichero especificos 
como para ambiguos. 


INVALID ASSIGNMENT (STAT) 


STAT puede utilizarse para asignar dispositivos fisicos a dispositivos 
lógicos utilizando el sistema IOBYTE descrito anteriormente. Compondrá 
este mensaje si se introduce una asignación ilógica. Utilicese la orden 
“STATVAL:” para visualizar la asignación válida. 


INVALID CONTROL CHARACTER (SUBMIT) 


Se supone que SUBMIT es capaz de manejar un carácter de control en el 
fichero SUB —la notación es “*x”, siendo ““x” la letra de control. De 
hecho, la versión estándar de SUBMIT no puede manejar esta notación. 
Existe una mejora disponible en Digital Research para corregir este 
problema. 

Suponiendo que ésta haya sido instalada, SUBMIT compondrá este 
mensaje si se especifica un carácter distinto de “A” a “Z” después del 
acento circunflejo. 


INVALID DIGIT (PIP) 


PIP compone este mensaje si encuentra datos no numéricos donde 
espera un valor numérico. 
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INVALID DISK ASSIGNMENT (STAT) 


STAT compone este mensaje si se intenta fijar un disco lógico en modo 
de sólo lectura y se especifica un parámetro distinto a “R/O”. Obsérvese 
que no hay ningún “$” al principio en este caso (como lo hay cuando se 
desea fijar un fichero a modo de sólo lectura). 


INVALID DRIVE NAME (USE A, B, C, OR D) (SYSGEN) 
SYSGEN compone este mensaje si se intenta cargar el sistema CP/M 
desde una unidad de disco distinta de A, B, C o D, o bien escribir el sistema 
en dicho disco. 


INVALID FILE INDICATOR (STAT) 


STAT envía este mensaje si se especifica un atributo de fichero 
equivocado. Los atributos de fichero sólo pueden ser los siguientes: 


SDIR Directorio 

sSSYS Sistema 

SR/O Sólo lectura 
SR/W Lectura/escritura 


INVALID FORMAT (PIP) 


PIP compone este mensaje si se introduce una orden formateada 
erróneamente; por ejemplo, un carácter “+" en lugar de un “="” (en 
algunos terminales están en la misma tecla). 


INVALID HEX DIGIT (LOAD) 


LOAD compone este mensaje si encuentra un dígito no hexadecimal en 
el fichero de entrada HEX, donde sólo puede aparecer un dígito hex. LOAD 
compone entonces información adicional para comunicar en qué lugar del 
fichero se produjo el problema: 


INVALID HEX DIGIT 
LOAD ADDRESS 0110 <- First address on Line in file 
ERROR ADDRESS 0112 <- Address of byte containing non-hex 
BYTES READ: 

0110: 

0110: 00.33  <- Bytes preceding error 


a 
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INVALID MEMORY SIZE (MOVCPM) 
MOVCPM compone este mensaje si se introduce un tamaño de memo- 


ria no válido para el tamaño de sistema CP/M que se quiere construir. 


INVALID SEPARATOR (PIP) 


PIP compone este mensaje si se intenta concatenar ficheros usando algo 
distinto a una coma entre nombres de fichero. 





INVALID USER NUMBER (PIP) 


PIP compone este mensaje si se introduce un número de usuario fuera de 
los valores 0 a 15 con la opción “[gn]” (donde **n” es el número de usuario). 


NO 'SUB' FILE PRESENT (SUBMIT) 


SUBMIT compone este mensaje si no puede encontrar un fichero con el 
nombre especificado y tipo .SUB. | 


NO DIRECTORY SPACE (ASM) | 
NO DIRECTORY SPACE (PIP) | 


Títulos suficientemente claros. 


NO FILE (CCP) | 


El CCP compone este mensaje si se usa la orden REN (cambio de 
nombre) y no puede encontrar el fichero que se desea nombrar. 


NO FILE (PIP) 


PIP compone este mensaje si no puede encontrar el fichero que se le ha 
especificado. 


NO MEMORY (ED) 





ED compone este mensaje si se sale de la memoria para almacenar el 
texto que se está editando. | 
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NO SOURCE FILE ON DISK (SYSGEN) 


Este mensaje de error puede inducir a equivocaciones. SYSGEN no lee 
ficheros en código fuente. El mensaje debería rezar “INPUT FILE NOT 
FOUND”. 


NO SOURCE FILE PRESENT (ASM) 


En este caso, ASM indica realmente que el fichero en código fuente no 
puede encontrarse, Recuérdese que ASM utiliza una forma extraña para 
especificar sus parámetros. ASM usa el nombre de fichero que se introdujo 
y entonces busca un fichero de ese nombre, pero con tipo .ASM. Los tres 
caracteres del tipo de fichero que se especifiquen se utilizan para representar 
los discos lógicos en los cuales han de ser colocados el fichero fuente, el hex 
y los de listado, respectivamente. 


NO SPACE (CCP) 


El CCP compone este mensaje si se utiliza la orden SAVE y no hay sitio 
suficiente en el disco para acomodar el fichero. 


NOT A CHARACTER SOURCE (PIP) 


PIP compone este mensaje si se intenta copiar caracteres desde un 
dispositivo de salida de caracteres, tal como el dispositivo auxiliar de salida 
(conocido por PIP como PUN:). 


OUTPUT FILE WRITE ERROR (ASM) 


ASM compondrá este mensaje si el BDOS devuelve un error desde una 
operación de escritura de disco. Si el BIOS posee lógica de recuperación de 
errores de disco, no se verá nunca este mensaje. 


PARAMETER ERROR (SUBMIT) 


SUBMIT utiliza el “S” para señalar puntos donde los valores de 
parámetros han de ser sustituidos. Si se tiene un “$” simplemente seguido 
por un carácter alfabético, SUBMIT compondrá este mensaje. Utilicese 
“$$” para representar un “$” real. 
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PERMANENT ERROR, TYPE RETURN TO IGNORE (SYSGEN) 
SYSGEN compone este mensaje si el BIOS devuelve un error desde la 


lectura de un disco o una operación de escritura. Si el BIOS posee lógica de 
recuperación de errores de disco, no debería verse nunca este mensaje. 


QUIT NOT FOUND (PIP) 

PIP compone este mensaje cuando no puede encontrar la cadena 
especificada en la opción “(Qcharacter string*Z)”, que significa “Dejar de 
copiar cuando se encuentre esta cadena”. 

READ ERROR (CCP) 

El CCP compone este mensaje si el BIOS devuelve un error desde la 
lectura de un disco o una operación de escritura. Si el BIOS incluye lógica , 
de recuperación de errores de disco, no debería verse este mensaje de error. 

RECORD TOO LONG (PIP) 
PIP compone este mensaje si encuentra una línea mayor de 80 caracteres 


cuando copia un fichero HEX. Inspeccionar el fichero HEX utilizando la 
orden TYPE o un editor. 


REQUIRES CP/M 2.0 OR NEWER FOR OPERATION (PIP) 
REQUIRES CP/M VERSION 2.0 OR LATER (XSUB) 


Mensajes suficientemente claros. 


SOURCE FILE INCOMPLETE (SYSGEN) 
SYSGEN compone este mensaje si el fichero que se ha solicitado que lea 
es demasiado corto. Utilicese STAT para comprobar la longitud del fichero. 
SOURCE FILE NAME ERROR (ASM) 


ASM compone este mensaje si se especifica un nombre de fichero 
ambiguo; es decir, uno que contenga “*” o “2”, 
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SOURCE FILE READ ERROR (ASM) 


ASM compone este mensaje si encuentra problemas al leer el fichero de 
entrada en código fuente. Compruébese el fichero de entrada utilizando la 
orden TYPE o un editor. 


START NOT FOUND (PIP) 


PIP compone este mensaje cuando no puede encontrar la cadena 
especificada en la opción “(Scharacter string*Z)”, que significa “Empezar a 
copiar cuando encuentre esta cadena”. 


SYMBOL TABLE OVERFLOW (ASMI) 


ASM compone este mensaje cuando se tienen demasiados símbolos en el 
fichero de código fuente. El único recurso es dividir el fichero fuente en 
varias piezas y prepararlo para que las especificaciones ORG (de origen) 
coloquen el código objeto generado de forma que las piezas encajen juntas. 


SYNCRONIZATION ERROR (MOVCPMI) 


Aparte del error de deletreado, este mensaje está diseñado para resultar 
críptico. MOVCPM compone este mensaje cuando el número de serie de 
Digital Research incluido en MOVCPM no coincide con el número de serie 
en la versión de CP/M que se está utilizando actualmente. 


SYSTEM FILE NOT ACCESSIBLE (ED) 
ED compone este mensaje si se intenta editar un fichero que ha sido 


fijado en modo sistema. Utilicese STAT para fijar el fichero en modo 
directorio. 


TOO MANY FILES (STAT) 


STAT compone este mensaje si hay insuficiente memoria disponible 
para ordenar y visualizar todos los ficheros del disco especificado. Inténtese 
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limitar el número de ficheros que tiene que ordenar mediante un uso 
juicioso de nombres de fichero ambiguos. 


UNRECOGNIZED DESTINATION (PIP) 


PIP compone este mensaje si se especifica un dispositivo de destino 
“ilegal”. 





VERIFY ERROR (PIP) 


Si se utiliza la opción “[v]” (verificación) de PIP cuando se copia en un 
fichero de disco, PIP escribirá un sector del disco, lo leerá y comparará los 
datos. PIP compone este mensaje si los datos no corresponden. 

Si existe un problema con el sistema de disco, se habrá visto alguna 
forma de mensaje de error del disco precediendo a éste. Si no hay mensaje 
precedente, entonces se tiene un problema con la memoria principal del 
sistema. 


Wrong CP/M Version (Requires 2.0) (STAT) 


Mensaje suficientemente claro. 


(XSUB ACTIVE) (XSUB) 


Este no es realmente un mensaje de error, pero se puede tomar por tal. 
XSUB es el programa SUBMIT extendido. Sin él, SUBMIT sólo puede | 
alimentar líneas de órdenes al procesador de órdenes de consola. XSUB 
permite entradas carácter por carácter en cualquier programa que use el 
BDOS para leer entradas de consola. 
XSUB se inicializa siendo la primera orden en un fichero SUB. Una vez 
iniciado permanece en memoria hasta que se haya alcanzado el final del 
fichero SUB. Hasta que esto ocurra, XSUB enviará este mensaje cada vez 
que ocurre un arranque caliente como recordatorio de que se encuentra 
aún en memoria. 


El XSUB compondrá este mensaje si está ya activo y se intenta cargarlo 
de nuevo. 


| 

| 

| 

XSUB Already Present (XSUB) 
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Errores varios 








Esta sección se enfrenta con los errores que no son acompañados por un 
mensaje de error. Se incluye aquí para ayudar a reconocer un problema 
después de que haya ocurrido. 

Los errores se muestran agrupados por productos. 


ASM!: No se detecta el final de una operación IF 


Si se utiliza la pseudooperación IF, debe seguirle un ENDIF. ASM 
omite detectar el caso en que el final del fichero fuente se encuentra antes 
del ENDIF. 

Si la condición especificada en la línea IF es falsa, se Puede tener una 
situación en la cual el ASM ignorará la mayoría del fichero fuente sin 
comentarios. 


ASM: Crea un fichero HEX que no puede cargarse 


Si se omite la especificación ORG al principio de un fichero fuente, el 
ASM ensamblará el código originado en el lugar 0000H. Este fichero hará 
caer el sistema si se intenta cargarlo con el DDT. El mensaje “ERROR: 
INVERTED ADDRESS” se mostrará desde el LOAD. 


CP/MI: Se conecta y luego desaparece sin indicación A> 


Después de que el BIOS se ha conectado, transfiere el control al 
procesador de órdenes de consola. El CCP intenta entonces registrar en el 
disco del sistema, leyendo el directorio de ficheros y construyendo el vector 
de situación. Si el directorio de ficheros se ha dañado de forma importante, 
puede ocasionar el fallo de todo el sistema. Usese otro sistema de disco e 
inténtese visualizar el directorio del disco dañado. 


DDT: Carga el fichero HEX y entonces cae el sistema 


DDT no comprueba las direcciones especificadas en un fichero HEX. Si 
se ha olvidado poner una especificación ORG al principio del fichero 
fuente, o más sutilmente, si el programa fuente se ha “enrollado” por tener 
direcciones sobre OFFFFH y “más”, el ensamblador empezará ensamblan- 
do de nuevo en 0000H. 
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DIR: Muestra nombres de archivo raros 


Si se tienen nombres de fichero que parecen raros o las líneas verticales 
de “:” que utiliza el DIR para separar los nombres de fichero están mal 
alineadas, entonces el directorio de ficheros se ha dañado. Una estrategia es 
formatear un nuevo disco, copiando todos los ficheros válidos en él, y 
descartar el disco estropeado. 


DIR: Muestra más de una entrada con el mismo nombre 


Esto puede ocurrir si se utiliza un programa que cree un fichero nuevo 
sin pedir al BDOS que borre cualquier otro existente del mismo nombre. 
También puede ocurrir si se utiliza descuidadamente la utilidad MOVE. 

Para remediar la situación procédase en la forma siguiente: 


e Usese PIP para copiar el fichero específico en otro disco. No debe 
usarse un nombre de fichero ambiguo; especifiquese el nombre del 
fichero duplicado exactamente. PIP copiará el primer fichero que 
encuentre en el directorio. 


e Usese la orden ERA para borrar el fichero duplicado. Esto borrará 
ambas copias del mismo. 


e Usese PIP para copiar el primero de los ficheros. 


STAT: Números de usuario> 15 


Si se usa la orden “STAT USR:” para visualizar qué números de usuario 
contienen ficheros activos y los números de usuario resultan mayores de 15, 
entonces el directorio de ficheros del disco está estropeado. 

Utilicese PIP para copiar los ficheros válidos de los números de usuario 
legítimos y entonces deséchese el disco estropeado. 


SUBMIT: Omite poner en marcha el procedimiento de sumisión 
Hay varias razones por las que SUBMIT no inicia un fichero SUB: 


e Se está utilizando la versión estándar de SUBMIT y el disco en 
curso por defecto es distinto del A:. SUBMIT construye su fichero 
“$$5.SUB” en el disco por defecto, pero el CCP sólo busca en la 
unidad A: “$$$.SUB”. Utilicese el procedimiento siguiente para 
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modificar SUBMIT de forma que construya el fichero “$$5.SUB” 
en A: 


A>DDT SUBMIT. COM<cr> 
DDT VERS 2.2 


NEXT PC 

0600 0100 

-s5bb <- Change Sbb 

OSBB 01 OO<cr> <- from 00 (default drive) 
OSBC 24 .<er> to 01 (drive Az) 


=1% 
ADSAVE 5 SUBMIT. COM<cr> 
A_ 


Si se olvida terminar la última línea del fichero SUB con un 
CARRIAGE RETURN. 


Si el fichero SUB contiene una línea con sólo un CARRIAGE RETURN 
(es decir, una línea en blanco). 





Conjunto de caracteres ASCII 














El código estándar americano para el intercambio de información 
(ASCII) consiste en un juego de 96 caracteres visibles y 32 no visibles. La 
mayoría de los sistemas CP/M utilizan por lo menos un subconjunto del 
conjunto de caracteres ASCII. Cuando el CP/M almacena caracteres en un 
disquete como texto, se utilizan las definiciones ASCII. 

Algunos de los programas de utilidad del CP/M utilizan el código de 
caracteres ASCII. El texto creado utilizando el ED se almacena como 
caracteres ASCII en el disquete. El DDT, cuando visualiza un “volcado” de 
los contenidos de memoria, visualiza tanto la representación hexadecimal 
como la ASCII de los contenidos de la memoria. 

El ASCIT no utiliza un byte completo de información para representar 
un carácter. ASCII es un código de siete bits, y el octavo bit se utiliza a 
menudo para paridad. La paridad es un método de control de errores que 
asegura que el carácter recibido es el que se ha transmitido. Muchas 
microcomputadoras y sus dispositivos ignoran el bit de paridad, mientras 
que otras requieren una de las siguientes formas de paridad: 


Paridad par 
El número de 1s binarios de un byte ¡empre un número par. Si 
hay un número impar de ls en el carácter, el bit de paridad será 
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un 1; si hay un número par de 1s en el carácter, el bit de paridad se 
convierte en un 0. 


Paridad impar 
El número de 1s binarios de un byte es siempre un número impar. Si 
hay un número par de 1s en el carácter, el bit de paridad será un l; si 
hay un número impar de 1s en el carácter, el bit de paridad se 
convierte en 0. 


Otras formas alternativas de codificar la información almacenada por la 
computadora incluyen el EBCDIC de 8 bits (Código decimal de intercam- 
bio codificado en forma binaria extendida), utilizado por IBM y un número 
de esquemas empaquetados en binario, utilizados primariamente para 
representar información numérica. 


Tabla A-1. Códigos de caracteres ASCII. 








0 P 
rfafoja 
2|B|r]|o 
3|ol|s|c 
4|oD|T|a 
s|Eejujle 
sE v]|r 
7|G|w]|eg 
s|ujx]na 
9sprfyYjpi 
¿liz ls 
¿ |k|ojpxk 
<| Elx Ja 
=|m|3|m 
>|N|*I|n 
2|o o 

NUL —Nulo BEL — Timbre de alarma 

SOH — Principio de encabezamiento BS Retroceso 

STX — Principio de texto HT Tabulación horizontal 

ETX — Final de texto LF Salto de línea 

EOT — Final de transmisión VT  Tabulación vertical 

ENQ — Petición FF Salto de página 


ACK Contestación CR Retorno de carro 
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Tabla A-1. (Continuación.) 

































Desplazamiento hacia fuera CAN Cancelación 
Desplazamiento hacia dentro em Final del medio 
Vínculo de escape de datos sua Sustitución 
Control de dispositivo 1 Esc Escape 
Control de dispositivo 2 FS Separador de fichero 
Control de dispositivo 3 Gs Separador de grupo 
Control de dispositivo 4 Rs Separador de registro 
Contestación negativa us Separador de unidad 
Espera síncrona se Espacio 
Final del bloque de transmisión DEL Borrado 
Tabla A-2. Códigos de carácter ASCII en orden ascendente. 
Hexadecimal Binario 
000 0000 20 0100000 
000 0001 sOH 21 0100001 ! 
0000010 SsTx 2 0100010 > 
0000011 ETX 23 0100011 * 
0000100 EOT 24 0100100 s 
0000101 ENQ 25 0100101 % 
0000110 ACK 26 0100110 E 
0000111 BEL 27 0100111 E 
000 1000 BS 28 0101000 ( 
000 1001 HT 29 0101001 ) 
000 1010 LF 2A 0101010 . 
000 1011 vr 2B 0101011 + 
0001100 FF 2 0101100 , 
000 1101 CR 2D 0101101 
0001110 so 28 0101110 E 
0001111 sI 2F 0101111 / 
0010000 DLE 30 0110000 0 
0010001 DCI 31 011 0001 1 
001 0010 DC2 32 0110010 2 
0010011 DC3 33 0110011 3 
0010100 DC4 34 011 0100 4 
0010101 NAK 35 0110101 5 
0010110 SYN 36 0110110 6 
0010111 ETB 37 0110111 7 
001 1000 CAN 38 011 1000 8 
001 1001 EM 39 0111001 9 
001 1010 SUB 3A 0111010 
001 1011 ESC 3B 0111011 2 
0011100 FS 30 0111100 < 
001 1101 GS 3D 0111101 = 
0011110 RS JE 0111110 > 
0011111 US 3E CO ? 
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Tabla A-2. (Continuación.) 








Hexadecimal Binario Hexadecimal Binario 
40 1000000 60 1100000 
41 1000001 A 61 1100001 
42 1000010 B 62 1100010 
4 1000011 Cc 63 1100011 
44 1000100 D 64 1100100 
45 1000101 E 65 1100101 
46 1090110 F 66 1OOHO 
47 1000111 G 67 moon 
48 100 1000 H 68 1101000 
49 100 1001 I 69 1101001 
44 1001010 J 6A 1101010 
4B 1001011 K 6B 1101011 
40 1001100 L 6 1101100 
4D 100 1101 M 6D 1101101 
sE 1001110 N 6E HO 1110 
4F 1001111 o 6F mo1111 
so 1010000 P 70 1110000 
s1 1010001 Q n 1110001 
52 1010010 R n 1110010 
53 1010011 s 73 1110011 
s4 1010100 T 74 1110100 
55 101 0101 U 75 110101 
56 101 0110 me 76 1110110 
57 1010111 w 7 11011 
58 101 1000 x 78 111 1000 
59 101 1001 Y 79 111 1001 
SA 101 1010 z 7A 1111010 
5B 1011011 [ 7B 111011 
nel 101 1100 1 7C 1111100 
5D 101 1101 ] 7D 1111101 
SE 101 1110 A 7E HILO 
sE 1011111 ,s 7F mana 








ASCIL 


A 


¿oneroso 


DEL 





Resumen 
de órdenes CP/M 








Este apéndice resume el formato de la línea de órdenes y la función de 
cada orden incorporada o transitoria de CP/M. Las órdenes figuran en la 
lista en orden alfabético. 





Líneas de orden del ASM 


ASM nombre-de-fichero<cr> Ensambla el fichero nombre-de-fichero.ASM; 
utiliza el disco registrado actualmente para todos los ficheros. 


ASM nombre-de-fichero.opt<cr> Ensambla el fichero nombre-de-fichero.ASM 
en la unidad o: (A:,B:,....P:). Escribe el fichero HEX en la unidad p: 
..P:), o salta si p: es Zi. 
Escribe el fichero PRN en la unidad t: (A:, B:,...,P:), envía a la consola 
si p: es X:, o salta si p: es Zi. 
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Líneas de órdenes del DDT 


DDT<cr> Carga el DDT y espera órdenes del mismo. 


DDT x:nombre.typ<cr> Carga el DDT en la memoria y carga también nom- 
bre.typ desde la unidad x: en la memoria para examen, modificación o 
ejecución. 


Resumen de órdenes del DDT 


Assss Introduce sentencias en lenguaje ensamblador empezando en la direc- 
ción hexadecimal ssss. 


D Visualiza los contenidos de los siguientes 192 bytes de memoria. 


Dssss,ffff Visualiza los contenidos de memoria empezando en la dirección hexade- 
cimal ssss y acabando en la dirección hexadecimal ff. 


Fssss,ffff,cc Llena la memoria con la constante hexadecimal de 8 bits cc empezan- 
do en la dirección hexadecimal ssss y acabando en la dirección hexadeci- 
mal ff. 


G Comienza la ejecución en la dirección contenida en el contador del pro- 
grama. 


G.bbbb Fija un punto de ruptura en la dirección hexadecimal bbbb, empezando 
entonces la ejecución en la dirección contenida en el contador del programa. 


G,bbbb,cccc — Fija un punto de ruptura en direcciones hexadecimales bbbb y ccce, 
empezando entonces la ejecución en la dirección contenida en el contador 
del programa. 


Gssss Comienza la ejecución en la dirección hexadecimal ssss. 


Gssss,bbbb Fija un punto de ruptura en la dirección hexadecimal bbbb y 
entonces empieza la ejecución en la dirección hexadecimal ssss. 


Hx.y Suma y diferencia hexadecimales de x e y. 


Inombre.typ Fija el bloque de control de fichero por defecto utilizando el nombre 
nombre-typ. 


E Hace un listado de las siguientes once líneas del programa en lenguaje 
ensamblador desensamblado de la memoria. 








Apéndice B: Resumen de órdenes CP/M 507 


Lssss Hace una lista de onde líneas del programa en lenguaje ensamblador 
desensamblado de la memoria empezando en la dirección hexadecimal ssss. 


Lssss,fFff Hace una lista del programa en lenguaje ensamblador desensamblado de 
la memoria empezando en la dirección hexadecimal ssss y acabando en la 
dirección hexadecimal ff. 

Mssss, ffff.dddd Traslada los contenidos del bloque de memoria empezando en la 
dirección hexadecimal ssss y acabando en la dirección hexadecimal fffF al 
bloque de memoria que empieza en la dirección hexadecimal dddd. 

R Lee un fichero del disco en la memoria (utilícese antes la orden “*I””). 


REnnnn Lee un fichero del disco en la memoria empezando en la dirección 
hexadecimal nnnn mayor que la normal (úsese antes la orden “I”). 


Sssss Visualiza los contenidos de la memoria en la dirección hexadecimal ssss 
y cambia opcionalmente los contenidos. 


Tnmnn Realiza la ejecución de nnnn instrucciones del programa (hexadecimal). 


Unnmn Ejecuta nnnn instrucciones del programa (hexadecimal), deteniéndose 
entonces y visualizando los contenidos de los registros de la CPU. 


x Visualiza los contenidos de los registros de la CPU. 
Xr Visualiza los contenidos de la CPU o del indicador r y opcionalmente los 
cambia. 


Líneas de orden DIR 


DIR x:<cr> Visualiza el directorio de todos los ficheros en la unidad x:. La unidad 
x: es opcional; si se omite, será utilizada la unidad en curso. 


DIR x:nombre.typ<cr> Visualiza el directorio de todos los ficheros en la unidad 
x: cuyos nombres coinciden con el nombre de fichero.tipo sea o no 
ambiguo. La especificación de unidad x: es opcional; si se omite, se utiliza la 
unidad en curso. 


Línea de orden DUMP 


DUMP x:nombre.typ<cr> — Visualiza las representaciones hexadecimales de ca- 
da byte almacenado en el fichero nombre.typ en la unidad x:. Si el 
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nombre.typ es ambiguo, visualiza el primer fichero que concuerde con el 
nombre ambiguo. 


Línea de orden ED 


ED x:nombre.typ<cr>  Invoca al editor, quien busca entonces el fichero 
nombre.typ en la unidad x: y crea un fichero temporal x:nombre.S$$ para 
almacenar el texto editado. El nombre.typ no es ambiguo. La unidad x: es 
opcional; si se omite, se asume la unidad actualmente en curso. 





Resumen de órdenes del ED 


NOTA: Las órdenes no alfabéticas siguen a la orden “Z”. 


nA Añade lineas. Traslada “n” líneas del fichero original a la memoria 
intermedia de edición. OA traslada líneas hasta que la memoria de edición 
está por lo menos llena a mitad. 


+/B Comienzo/Final. Traslada el CP. 
+B traslada el CP al principio de la memoria de edición 
—B traslada el CP al final de la memoria de edición 


+/-nC Traslada por caracteres. Traslada el CP “n” posiciones de caracteres. 
+ traslada hacia delante 
— traslada hacia atrás 


+/-nD Borra caracteres. Borra “n” caracteres antes o después del CP en la me- 
moria de edición. 
+ borra antes del CP 
— borra después del CP 


E Termina. Termina la edición, cierra ficheros y vuelve al CP/M:; final 
normal. 


nFcadena*Z Encontrar cadena. Encuentra la “enésima” ocurrencia de la cadena, 
empezando la búsqueda después del CP. 


H Traslada a la cabeza del fichero editado. Acaba la edición, vuelve a 
nombrar los ficheros y edita entonces los primeros ficheros temporales. 
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I<cr> Introduce el modo de inserción. El texto del teclado va a la memoria 
intermedia de edición después del CP; salida con CONTROL-Z. 


Icadena*Z — Inserta cadena. Inserta una cadena en la memoria de edición detrás 
del CP. 


Icadena<cr> Inserta línea. Inserta cadena y CRLF en la memoria de edición 
después del CP. 


nJhallarcadena*Zinsertarcadena”Zfinalcadena*Z Yuxtaposición. Comienza 
después del CP, encuentra “hallar”, inserta “insertar” después de ésta y 
borra entonces todos los caracteres siguientes, pero no incluyendo “final” 
repite hasta haberlo realizado “n” veces. 


+/—nK- Mata líneas. Borra “n” líneas. 
+ borra después de CP 
— borra antes del CP 


+/—nL  Traslada por líneas. Traslada el CP al principio de la línea en la que está, 
entonces traslada el CP “n” lineas hacia delante o hacia atrás. 
+ traslada hacia delante 
— traslada hacia atrás 








nMcadenaorden*Z Macroorden. Repite la ejecución de las órdenes ED “cadena- 
orden” “n'” veces. “n”=0, “n”=1, o en ausencia de “n” repite la ejecución 
hasta que ocurra un error. 





nNcadena*Z Encuentra la cadena con autorregistro. Encuentra la “enésima” 
ocurrencia de la misma, añadiendo automáticamente del fichero original y 
escribiendo en el fichero temporal si es necesario. 


O Vuelve al fichero original. Vacía la memoria de edición, vacía el fichero 
temporal, vuelve al principio del fichero original, ignora las órdenes ED 
previas, 


+/—nP Traslada el CP e imprime páginas. Traslada el CP hacia delante o hacia 
atrás una página y visualiza entonces la página siguiente al CP. “nP” 
visualiza “n” páginas, haciendo una pausa después de cada una. 


Q Detiene la edición. Borra el fichero y el bloque temporales, traslada 
archivo, si existe, y vuelve al CP/M; el fichero original no se cambia. 


R<cr> Lee el archivo de traslado de bloque. Copia todo el fichero de traslado 
de bloque X$$$58$$.LIB desde el disco y lo inserta en la memoria 
intermedia de edición después del CP. 
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Rnombre<cr> Lee el fichero de biblioteca. Copia todo el fichero “nombre” 


con extensión LIB desde el disco y lo inserta en la memoria de edición 
después del CP. 


nScadenal *Zcadena2*Z Sustituye cadena. Empezando en el CP, repite ““n” veces: 


encuentra cadenal y la reemplaza por cadena2. 


+/—nT Mecanografía líneas. Visualiza “n” líneas. 


+/-U 


ov 


+/-V 


nw 


nx 


nz 


+= 


+ “n” líneas después del CP 
— “n” líneas antes del CP 
Si el CP no está al principio de una línea: 
OT visualiza desde el principio de la línea hasta el CP 
T visualiza desde el CP hasta el final de la línea 
OTT visualiza toda la línea sin desplazar el CP 


Traducción a mayúscula. Después de una orden +U, la entrada alfa- 
bética a la memoria de edición se traduce de minúsculas a mayúsculas; 
después de —U, no se realiza ninguna traducción. 


Espacio/tamaño libre de la memoria de edición. Visualiza el número 
decimal de bytes libres (vacios) en la memoria de edición y el tamaño total 
de la misma. 


Verifica números de línea. Después de +V, se visualiza un número de 
línea con cada línea. La indicación ED va entonces precedida por el número 
de la línea que contiene el CP. Después de —V, los números de línea no se 
visualizan y la indicación ED es “x”. 


Escribe líneas. Escribe primero “n” líneas desde la memoria de edición 
en el fichero temporal; borra estas líneas de la memoria de edición. 


Transfiere bloque (Xfer). Copia las “n” líneas que siguen al CP desde la 
memoria de edición en el fichero de traslado de bloques temporal 
X55$$8$$$.LIB; lo añade a los contenidos previos de dicho fichero. 


Duerme. Se retrasa en la ejecución de la orden que le sigue. Cuanto 
mayor sea “n” mayor será el retraso; los “n'”” reducidos dan retrasos 
menores. 


Traslada el CP al número de línea “n”. Traslada el CP al principio del 
número de linea “n” (véase “+/—V"”). 


Continúa hasta el número de línea “m”. Un prefijo de orden que da el 
punto final para la orden que le sigue. El punto de comienzo es la situación 
del CP (véase “+/—V”). 


Traslada y visualiza una linea. Abreviatura de +/—nLT. 
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Líneas de orden ERA 


ERA x:nombre.typ<cr> Borra el fichero nombre.typ del disco en unidad x:. 
El nombre y/o el tipo pueden ser ambiguos. La unidad x: es opcional; si se 
omite, se utiliza la unidad en curso actual. 


ERA x:*.*<cr> Borra todos los ficheros del disco en unidad x:. La unidad x: 
es opcional; si se omite, se utiliza la unidad en curso actual. 


Ordenes de edición de línea 


CONTROL-C Vuelve a poner en marcha el CP/M si éste es el primer carácter de la 
línea de mando. Denominado arranque en caliente. 


CONTROL-E  Traslada al comienzo de la línea siguiente. Utilizado para mecano- 
grafiar órdenes largas. 


CONTROL-H o BACKSPACE Borra un carácter y lo elimina de la pantalla 
(versiones 2.0 y posteriores del CP/M). 


CONTROL-J o LINE FEED Lo mismo que CARRIAGE RETURN (versiones 2.0 y 
posteriores del CP/M). 


CONTROL-M Lo mismo que CARRIAGE RETURN (<cr>). 


CONTROL-P Conecta el dispositivo de listado (usualmente la impresora). Púlsese 
otra vez para desconectar el dispositivo de listado. 


CONTROL-R Repite la línea de orden actual (útil con la versión 1.4); verifica que la 


línea esté corregida después de haber borrado varios caracteres (versio- 
nes 1.4 y posteriores del CP/M). 


CONTROL-S Detiene temporalmente la visualización de datos en la consola. 
Púlsese cualquier tecla para continuar. Ñ 


CONTROL-Y o CONTROL-X Borra la línea de orden actual (versiones 1.4 y 
posteriores del CP/M). 


RUBOUT (RUB) o DELETE (DEL) Borra un carácter y lo repite. 
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Línea de orden de carga 


LOAD x:nombre<cr> Lee el fichero.HEX en la unidad x: y crea el fichero de 
programa ejecutable nombre.COM en la unidad x:. 


Líneas de orden MOVCPM 


MOVCPM<cr> Prepara una nueva copia del CP/M que utiliza toda la memoria; 
da el control al nuevo CP/M, pero no lo salva en el disco. 


MOVCPM nn<cr> — Prepara una nueva copia del CP/M que utiliza “nn” Kbytes 
de memoria; da el control al nuevo CP/M, pero no lo salva en el disco. 


MOVCPM + + <cr> Prepara una nueva copia del CP/M que utiliza toda la 
memoria para ser salvada con SYSGEN o SAVE. 


MOVCPM mn + <cr> Prepara una nueva copia del CP/M que utiliza “nn” 
Kbytes de memoria, a salvar con SYSGEN o SAVE. 
“nn” es un número decimal. Puede ser de 16 a 64 para el CP/M 13 0 
1.4, Para el CP/M 2.0 y posteriores “nn” puede ser 20 a 64. 


Líneas de orden PIP 


PIP<cr> Carga el PIP en memoria. PIP indica en la consola las órdenes, las 
ejecuta y entonces vuelve a indicarlo en la consola. 


PIP línea-de-orden-PIP<cr> Carga el PIP en la memoria. El PIP ejecuta la 
orden línea-de-orden-PIP y después sale al CP/M. 


Resumen de órdenes del PIP 


x:nuevo,typ =y:viejo.typ[p]<cr> Copia el fichero viejo.typ en la unidad y: en el 
fichero nuevo.typ en la unidad x:, utilizando parámetros p. 


x:nuevo.typ=y:viejo1.typ[p],z:viejo2.typ[q]<cr> Crea un fichero nuevo, typ 
en la unidad x: que consta del contenido del fichero viejo! .typ en la unidad 


y: utilizando parámetros p seguidos por los contenidos del fichero viejo2.typ 
de la unidad z: usando parámetros q. 


x:nombre.typ=dev:[p]<cr> Copia datos del dispositivo dev: en el fichero 
nombre.typ de la unidad x:. 





dev:= 
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:nombre.typ[p]<cr> Copia datos del nombre.typ en unidad x: en el dis- 


positivo dev:. 


dst:=sre:[p]<cr> Copia datos en el dispositivo dst: del dispositivo src:. 


Resumen de los parámetros de PIP 


Especifica transferencia modo bloque. 

Borra todos los caracteres después de la “enésima” columna. 

Refleja la copia en la consola según se va realizando. 

Elimina los caracteres de salto de línea durante la transferencia. 

Dirige a PIP a copiar un fichero desde el área de usuario “n”. 
Controla el formato de fichero Hex Intel adecuado, 

Ignora todos los registros :00 de las transferencias de fichero Hex Intel. 
Traduce las letras mayúsculas a minúsculas. 

Añade un número de línea a cada línea transferida. 


Se opone a la transferencia de fichero (ignora los indicadores de final de 
fichero). 


Lanza un salto de página después de cada “n” líneas. 

Especifica el cese de copiado después de encontrar la cadena “s”. 

Dirige a PIP a copiar de un fichero de sistema. 

Especifica el principio de copiado después de haber encontrado la cadena *s”. 
Fija los topes de tabulación en cada *“n” columnas. 

Traduce las letras minúsculas a mayúsculas. 

Verifica las copias por comparación después de haber terminado de copiar. 
Dirige a PIP para copiar en un fichero R/O. 


Pone a cero el bit de “paridad” en los caracteres ASCII. 
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Dispositivos de destino de PIP 


CON: PUN: LST: Dispositivos lógicos 

TIY: PIP: LPR 

CRT: UPI: ULI: 

UCI: UP2: Dispositivos fisicos 

OUT: PRN: Dispositivos especiales PIP 


Dispositivos fuente de PIP 


CON: RDR: Dispositivos lógicos 
TTY: PTR: 
CRT: URI: 
UCI: UR2: Dispositivos físicos 


NUL: EOF: INP: Dispositivos especiales PIP 


Línea de orden REN 


REN nuevo-nombre.typ=nombre-viejo.typ<cr> Encuentra el fichero nom- 
bre-viejo-typ y le cambia el nombre a nuevo-nombre-typ. 


Línea de orden SAVE 


SAVE nnn x:nombre.typ<cr> Salva una porción del área de programa transito- 
rio de la memoria en el fichero nombre.typ de la unidad x:, donde nnn es un 
número decimal que representa el número de páginas de la memoria. x: es 
el especificador de unidad opcional. 


Líneas de orden STAT 


STAT<cr> Visualiza atributos y la cantidad de espacio libre para todas las 
unidades de disquete a las que se accede desde el último arranque caliente o 
frio. 

STAT x:<cr> Visualiza la cantidad de espacio libre del disquete en la unidad x:. 
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STAT x:nombre.typ<cr>(CP/M 2.0 y posteriores) Visualiza tamaño y atri- 
butos del fichero(s) nombre.typ en la unidad x:. nombre.typ puede ser 
ambiguo. x: es opcional; si se omite, se supone unidad en curso. 


STAT x:nombre.typ $atr<cr> Asigna el atributo atr al fichero(s) nombredefiche- 
ro.tipo en la unidad x:. Nombredefichero.tipo puede ser ambiguo. La 
especificación de unidad x: es opcional; si se omite, se utiliza la unidad en 
Curso. 


STAT DEV:<cr> Informa de los dispositivos físicos que están asignados actual- 
mente a los cuatro dispositivos lógicos. 


STAT VAL:<cr> Informa sobre las posible asignaciones de dispositivos y sobre el 
resumen de la línea de orden parcial STAT. 


STAT log:=phy:<cr>  Asigna el dispositivo fisico phy: al dispositivo lógico log. 
(puede haber más de una asignación en la línea; cada una deberá estar 
separada por una coma). 


STAT USR:<cr> (CP/M 2.0 y posteriores) Informa sobre el número de usua- 
rio en curso, así como de los números de usuario para los cuales hay ficheros 
en los discos actualmente en curso. 


STAT x:DSK<cr> (CP/M 1.4 y posteriores) Asigna un modo temporal de 
protección de escritura a la unidad x:. 


Líneas de orden SUBMIT 


SUBMIT nombre<cr> Crea un fichero $$$.SUB que contiene las órdenes lista- 
das en nombre.SUB; el CP/M ejecuta entonces órdenes de este fichero 
antes que del teclado. 


SUBMIT nombre parámetros<cr> Crea un fichero $$$.SUB que contiene ór- 
denes del fichero nombre.SUB; ciertas partes de las líneas de orden del 
fichero nombre.SUB son reemplazadas por parámetros durante la crea- 
ción de $$$.SUB. CP/M obtiene entonces órdenes de este fichero mejor que 
del teclado. 


Línea de orden SYSGEN 


SYSGEN<cr> Carga el programa SYSGEN para transferir el CP/M de un 
disquete a otro. 
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Línea de orden TYPE 


TYPE x:nombre.typ<cr> Visualiza los contenidos del fichero nombre.typ de la 
unidad x: en la consola, 


Línea de orden USER 
USER n<cr> Fija el número de usuario en “n”, donde “n” es un número decimal 
de 0 a 15, inclusive. 
Línea de orden x: 


x:<cr> Cambia la unidad de disco actualmente en curso a la unidad x:. La 
unidad x: puede ser de “A” a “P”, 





Resumen de las llamadas 


del BDOS 





Tabla C-1. Definiciones de función del BDOS para la versión 2.2 del CP/M-80. 








Función 
Parámetro(s) | Parámetro(s) 
Nombre | de entrada | de salida Aclaración 
SYSTEM | Ninguno Ninguno Nueva puesta en marcha del CP/M-80 
RESET devolviendo el control al CCP después de 


reinicializar el subsistema del disco, 





CONSOLE | Ninguno A=Caricter | Devuelve el siguiente carácter mecanografiado al 
INPUT programa de llamada de caracteres, 





Cualquier carácter no imprimible se refleja en la 
pantalla (como BACKSPACE, TAR O CARRIAGE 
rerurx). La ejecución no vuelve al programa de 
llamada hasta que se ha mecanografiado un 
carácter. Los caracteres de control del CCP 
estándar son reconocidos y sus acciones 
realizadas (CONTROL? Empieza O termina la. 
impresión, etc.) 
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Tabla C-1. (Continuación.) 


E 
E 


















Ninguno Visualiza el carácter en el registro E en el 
dispositivo de consola. Los caracteres de control 
del CCP estándar son reconocidos y sus acciones 
realizadas (CONTROL? empieza o termina la 


impresión, etc.). 


Devuelve el próximo carácter que se recibe del 
dispositivo de lectura al programa de llamada. 


La ejecución no vuelve al programa de llamada 
hasta que se recibe un carácter. 











PUNCH 
OUTPUT 


LIST 
OUTPUT 


DIRECT 
CONSOLE 


E=Carácter Transmite el carácter del registro E al dispositivo 


de perforación. 





Transmite el carácter del registro E al dispositivo 
de listado. 







Si el registro E contiene un hex FF, el 
dispositivo de consola es interrogado para ver si 







IN un carácter está preparado. Si no hay ninguno, 
DIRECT se devuelve un 00 al programa de llamada en el 
CONSOLE registro A, en caso contrario el carácter 













OUT detectado se devuelve al registro A. Si el registro 
E contiene cualquier carácter distinto de FF hex, 
aquel carácter es transferido para visualización 
en consola. Todos los caracteres de control CCP 
se ignoran. El usuario debe proteger el programa 
contra caracteres disparatados que sean enviados 
/ recibidos por el dispositivo de consola. 


GET 
IOBYTE 





Ninguno A=IOBYTE 









Coloca una copia del byte almacenado en la 
situación 0003 hex del registro A antes de 
devolver el control al programa de llamada. 


Coloca una copia del valor del registro E en la 
posición de memoria 0003 hex antes de devolver 
el control al programa de llamada. 

















SET 
IOBYTE 


E=IOBYTE | Ninguno 

























PRINT 
STRING 


DE=Direc- 
ción de hilera 


Envia la cadena de caracteres almacenados 
empezando en la dirección almacenada en el par 
de registro DE al dispositivo de consola. Todos 
los caracteres en las direcciones siguientes se 
envian hasta que el BDOS encuentra una 
posición de memoria que contenga un 24 hex 
(un *S” ASCII). Los caracteres de control 

del CCP son controlados y realizados si se 
encuentran. 


Ninguno 





Nora: El CP/M-80 copia siempre los contenidos del registro H en el registro A si no hay que devolver 
nada espécíficamente al registro A. Algunos fabricantes, especialmente Microsoft, utilizan tal informa- 
ción para reducir el movimiento de información entre los registros H y A. 
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Tabla C-1. (Continuación.) 


O 


de entrada 











































READ 
CONSOLE 
BUFFER 


DE=Direo- 
ción de la 
memoria 
intermedia 


Datos en la 
memoria 
intermedia 


Esta función realiza esencialmente la misma que 
el CCP haría, en que toma los caracteres que 
mecanografía el usuario y los almacena en la 
memoria que empieza en la dirección 
almacenada en el par de registro DE. El primer 
byte en la memoria apuntado por el par DE 
debe ser la longitud máxima de la orden; el 
BDOS colocará el número de caracteres 
encontrados en el segundo byte, con la orden 
mecanografiada empezando con el tercer byte 
apuntado por el par DE. Todos los caracteres de 
edición del CCP estándar son reconocidos 
durante la entrada de la orden. 


El BDOS controla el estado del dispositivo de 
consola y devuelve un 00 hex si no hay ningún 
carácter preparado, y FF hex si se ha 
mecanografiado un carácter. 

1 byte devuelto en el registro H es 00 hex, 
entonces el CP/M está presente; si es 01, entonces 
está presente el MP/M. El byte devuelto en el 
registro L es 00 si la versión es anterior al CP/M 
2.0, 20 hex si la versión es 2.0, 21 hex si es 2.1, 
etcétera. 


Utilizado para indicar al CP/M que ponga a cero 





























GET 
CONSOLE 
STATUS 


















GET 
VERSION 
NUMBER 


HL=Versión 





















RESET 






DISK el subsistema de disco. Deberia utilizarse cada 
SYSTEM vez que se cambian los disquetes. 
SELECT Selecciona el disco que ha de ser utilizado para 


DISK. operaciones de disco subsiguientes. Un 00 hex en 
el registro E indica disco A, un 01 hex indica 


disco B, etc. 


Utilizado para activar un fichero de la unidad de 
disco actual y del área de usuario actual. El 
BDOS registra los primeros 14 bytes del bloque 
FCB designado e intenta encontrar un 
equivalente al nombre en el bloque. Un 3F hex 

(2 ASCII) puede utilizarse en cada una de las 
posiciones del nombre para indicar un carácter 
cualquiera. Si se encuentra un equivalente, la 
información relevante acerca de cste fichero se 
introduce en el resto del FCB por el CP/M-80. 
Un valor 00 hex a 03 en el registro A al retorno 
indica que la operación de apertura ha sido 
satisfactoria, mientras que un FF hex indica que 
no se ha podido encontrar el fichero. Si se 
utilizan signos interrogativos para identificar un 
fichero, se utiliza la primera entrada equivalente. 









OPEN 
FILE 





A=Código 
de 
“encontrado” 
no 
encontrado 






































Nora: El CP/M-80 copia siempre los contenidos del registro H en el registro A si no hay que devolver 
nada especificamente al registro A. Algunos fabricantes, especialmente Microsoft, utilizan tal informa- 
ción para reducir el movimiento de información entre los registros H y A. 
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Tabla C-L. 


(Continuación.) 
















Parámetro(s) 


Parámetro(s) 
de entrada h 


de salida 












Código de 
“encontrado” 
no encontrado 
































SEARCH | DE=Direc- 





'ódigo de 





FOR ción FCB :ncontrado”” 
FIRST no encontrado 
SEARCH | Ninguno — |A=Código de 
FOR encontrado”, 











NEXT no encontrado 
DELETE A=Código de 
FILE ción FCB— | encontrado 
no encontrado 
READ DE=Diree- | A=Código 
SEQUEN- | ción FCB— | de error 


TIAL 




















Aclara 





Realiza lo contrario de la función de apertura de 
fichero, Una operación de cerrar lichero debe ser 
realizada después de cada utilización de un 
ichero que contiene en su interior información 
escrita, 





Realiza lo mismo que la función de apertura de 
fichero, con la diferencia de que la memo: 
intermedia de disco se llena con el registro de 
128 bytes que es la entrada de directorio del 
fichero comparado. 





Realiza lo mismo que la función búsqueda del 
primer caso, excepto que la búsqueda continúa 
desde la última entrada comparada. 





Cambia un indicador en la entrada para el 
fichero apuntado por el FCB de forma que el 
CP/M-80 no siga reconociéndolo como un fichero 
válido. No se borra prácticamente ninguna 
información cuando se realiza esta función, 
“aunque escrituras subsiguientes en el disquete 
utilizarán el área previamente asociada al fichero 
borrado”. 





Si un fichero ha sido activado para su uso por la 
función de apertura o de creación de fichero, la 
función de lectura secuencial lee el próximo 
bloque de 128 bytes en la memoria en la 
dirección actual de DMA. El valor 00 hex se 
devuelve al registro A si la lectura ha sido 
satisfactoria, mientras que un valor distinto a 
¡ero en el registro A indica fracaso 





Si se ha activado un fichero para realizar una 
función de apertura o una función fichero, la 
función de escritura secuencial escribe el bloque 
de 128 bytes que se encuentra en la dirección de 
DMA en curso, en el registro de 128 bytes que 
sigue al fichero especificado. 


Crea un nuevo fichero con la información 


















WRITE Direc- | A=Código 
SEQUEN- | ción FCB [de error 
TIAL 

MAKE DE=Direc= 

FILE ción FCB— | DIR 


li 





(nombre) indicada por el FCB. El CP/M-80 no 
controla si el fichero indicado existe ya, de modo 
que primero hay que comprobar si existe el 
fichero (o borrarlo). Un fichero creado de nuevo 
no necesita ser abierto, porque la función de 
ercar fichero también realiza las operaciones de 
apertura necesarias. 










Nora: El CP/M-80 copia siempre los contenidos del registro H en el registro A si no hay que devolver 
nada especificamente al registro A. Algunos fabricantes, especialmente Microsoft, utilizan tal informa- 
ción para reducir el movimiento de información entre los registros H y A. 
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Tabla C-1. (Continuación.) 
— AE 


Parámetro(s) | Parámetro(s) 
de entra de salida 





Aclaración 











17 | RENAME | DE=Direc- | A=Código | Cambia el nombre del fichero referenciado por 
FILE ción FCB— | DIR los primeros 16 bytes del FCB al nombre de los 
segundos 16 bytes. 








18 | RETURN | Ninguno HL=Dísco | Los bits del registro HL se utilizan para 
LOGIN en curso. especificar las unidades de disco que están 
VECTOR activas. El primer bit del registro L se refiere a la 


unidad A, el último bit del registro H 
corresponde a la unidad P, la más alta posible. 
Un valor 1 del bit indica unidad activa, un cero 
denota unidad inactiva. 





19 | RETURN | Ninguno A=Disco — | Los múmeros 0 a 15 son utilizados para 
CURRENT actual representar la unidad de disco por defecto en 
DISK curso como retorno de esta función, 

lA | SET DMA Ninguno Utilizado para seleccionar el bloque de memoria 
ADDRESS de 128 bytes que ha de utilizarse como memoria 


intermedia en todas las transferencias de disco. 
Sobre la puesta a cerco del sistema o del disco, 
fría o caliente, la memoria intermedia se sitúa en 
0080 hex en un sistema CP/M normal. 





18 | Ger Ninguno HL=Direc- | Devuelve la dirección de comienzo del vector de 
ALLOC ción de ubicación, una tabla que indica las posiciones del 
ADDRESS ubicación — | disquete que se utilizan y que es mantenida en 





memoria para cada unidad de disco en linea. 


IC | WRITE Ninguno Ninguno Procura protección de escritura temporal para el 
PROTECT disquete en la unidad de disco por defecto en 
DISK curso, 





1D | GETR/O | Ninguno 
VECTOR 


Devuelve un valor de 16 bits en los registros HL, 
lo que indica las unidades del sistema cuya 
escritura está protegida. Las unidades están 
asignadas como en el VECTOR LOGIN, con un 
valor 1 indicando protección de escritura 





1 | serrie | DE=Direc- | A=Código | Fija los atributos de fichero que indican 


ATTRI- ción FCB— | DIR sistema/directorio y estado R/O o R/W para el 
BUTES fichero apuntado por la dirección del FCB. 

1F- | GET DISK | Ninguno HL=Direc- | Recupera el bloque de parámetros del disco para 
PARMS ción DPB | la unidad de disco activa en curso. Estos 





parámetros pueden utilizarse para determinar el 
espacio disponible en un disquete o para cam! 
las características de la unidad de disco bajo 
¡ll control del usuario. 

















Nora: El CP/M-80 copia siempre los contenidos del registro H en el registro A si no hay que devolver 
nada especificamente al registro A. Algunos fabricantes, especialmente Microsoft, utilizan tal informa- 
para reducir el movimiento de información entre los registros H y A. 
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Tabla C-1. (Continuación.) 


Parámetro(s) 
de entrada 








GET USER 





CODE 
SET USER | E=Código 
CODE de usuario 
21 | READ DE=Direc» 
RANDOM | ción FCB 
2 | WRITE DE=Direc- 
RANDOM | ción FCB 


23 | COMPUTE 




















FILE SIZE | ción FCB 

24 | ser DE=Direc- 
RANDOM | ción FCB 
RECORD 

25 | RESET DE=Bits de 
DRIVE puesta a cero 

de impulsor 

28 | werre | DE=Direc- 
RANDOM | ción FCB 
(ZERO) 












A=Usuario 
actual o. 
ninguno 


ACódigo 
de error 


A=Código 


de error. 


Conjunto 
RRF 


Conjunto 
RRF 


A=Código 
de error 


A=Código 
de error 


Nora: El CP/M-80 copia siempre los contenidos del registro H en el registro A si no hay que devolver 
nada especificamente al registro A. Algunos fabricantes, especialmente Microsoft, utilizan tal informa- 
ción para reducir el movimiento de información entre los registros H y A. 


















Si el registro E contiene un FF hex, el número 
de usuario se devuelve en el registro A. Para 
volver a fijar el número de usuario, el código de 
usuario adecuado está situado en el registro E. 
Mientras que la orden USER permite números 
de usuario de 0-15, esta función del BDOS puede 
fijar números de usuario de 0-31 


Lee el número de registro aleatorio contenido en 
los bytes 33., 34. y 35." (una direccion de 24 
bits) del FCB indicado. 


Escribe información de la dirección de DMA 
actual en el registro aleatorio apuntado por el 
número contenido en los bytes 33.5, 34. y 35 del 
FCB indicado. 


Devuelve el tamaño actual del fichero de registro 
aleatorio en los tres bytes que constituyen el 
campo de registro aleatorio del FCB. Si el tercer 
byte contiene un 1, entonces el fichero contiene 
el valor máximo de registro de 65.536, en otro 
caso el valor de los dos primeros bytes es un 
valor de 16 bits que representa el tamaño del 
fichero. 


Devuelve registro aleatorio siguiente (llena el 
campo de registro aleatorio del FCB) después del 
último registro leído secuencialmente, Digital 
Research sugiere que esta función es más 
adecuada para indexado de ficheros. 


Fuerza a las unidades especificadas a poner los 
bits de control a su estado inicial no en linea. 


Escribe un registro de todo ceros en el disquete 
antes de que se escriba un registro; útil para 
identificar registros aleatorios no utilizados (un 
registro no utilizado contendrá ceros en lugar de 
datos). 























Resumen de las llamadas 


del BIOS 











Tabla D-1. Definiciones de rutina BIOS del CP/M-80. 























r = 
Etiqueta de la Parámetro(s) | Parámetro(s A 
abla e salto pr] esa Aclaración 

COLDSTART Ninguno c=0 La rutina deberá realizar todas las 
operaciones necesarias de puesta en 
marcha, incluida la inicialización de 
todos los valores de la página base. 
Antes de salir, el registro C deberá ser 
puesto a cero. 

WARMSTART | Ninguno C=Unidad — | La rutina deberá realizar todas las 
operaciones necesarias de nueva puesta 
en marcha, pero no necesita reinicilizar 
la página base. El registro C, a la salida, 
debería contener el número de unidad en 
curso. 

CONSOLE Ninguno A=Estado 

STATUS 

(CONST) 
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Tabla D-1. (Continuación.) 


Etiqueta de la Parámetro(s) |] Parámetro O 
tabla de salto de entrada de salida Aclaración 











CONSOLE* Ninguno A=Carácter 

INPUT 

READER* Ninguno A=Carácter La rutina debería esperar un carácter que 

INPUT se ha de introducir en el dispositivo 
adecuado y entonces devolver el carácter 
en el registro A. 

CONSOLE: C=Carácter Ninguno 

OUTPUT 

LisT+ C=Caricter Ninguno 

OUTPUT 

PUNCH* C=Carácter Ninguno La rutina debería tomar el carácter en el 

OUTPUT registro C y visualizarlo en el dispositivo | 
adecuado. 1 

HOME DISK Ninguno Ninguno La cabeza de la unidad de disco deberia 1] 
ser devuelta a la posición inicial (pista 0, 1] 
sector 0). 

SELECT DISK Cc HL=DHA La rutina debería seleccionar la unidad 





indicada por el número en el registro C. 
El registro HL al regresar deberia 
contener la dirección de la cabecera de 

parámetros del disco. ' 


SET TRACK 





Ninguno La pista indicada por el valor del registro 
C debería ser fijada en la pista siguiente 
para que acceda a ella el controlador de 
disco. 


SET SECTOR C=Sector Ninguno El sector indicado por el valor del 
registro C deberia ser fijado en la pista 


siguiente para que acceda a el el 
controlador de disco l 








SET DMA BC=Dirección — | Ninguno La dirección de DMA indicada por el 

ADDRESS DMA par de registros BC debería ser fijada | 
como la dirección para usar todas las 

transferencias de información desde la 

memoria al disquete y viceversa | 





READ DISK Ninguno 





Lectura de la pista y el sector en curso y | 
transfieren los datos a la dirección de 

DMA ya fijada. Un 01 hex deberá volver 
si existe un error durante la 
transferencia, 


Escritura de la pista y el sector en curso 
de los datos en la dirección de DMA. 





WRITE DISK Ninguno A 
















SECTOR 


BC=Sector HL=Sector 
fisico 


lógico 


















ndo el 





* Todas las entradas/salidas de consola y los dispositivos deberán realizarse en primer lugar mi 
IOBYTE (0003 hex) para determinar el dispositivo que se ha seleccionado. 
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Tabla D-1. (Continuación.) 








































Parámetro(s) 
de entrada 


Parámetro(s) 
de salida 


Etiqueta de la 
tabla de salto 


Aclaración 





TRANSLATION — | DE=Dirección Una rutina especial utilizada para 
del mapa sistemas que mantienen datos en bloques 
de sectores del orden de 128 bytes. El sector lógico 
en entrada se ha cambiado para reflejar 
el sector adecuado del disquete 
LIST STATUS Ninguno. Estado La rutina debería interrogar al 


dispositivo adecuado para ver si un 

carácter está preparado y devolver un 00 
hex al registro A si no lo está, o un FF 
hex si lo está. 
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Actualización de la hora en ASCII, 243 Problemas con “trazado” caracteres, 235-236 
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Mantenimiento de la hora actual, 243 

Mejoras, 225 

Mejoras para soportar protocolos diferentes, 236 
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379 
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Salida PUNCH (auxiliar), 166 


527 





528 CP/M Manual para programadores 


SECTRAN, traducción de sector lógico a físico, 172 
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BIOS estándar: 
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Vector de bits, AND booleano, Programa, 417, 
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434 
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Uso con entrada forzada, 237 

CONQUT: 

Procesamiento de secuencias de escape de salida, 240 

Salida de consola, en el BIOS, 165 

Secuencias de escape para introducir datos y hora, 242 

CONST: 

Estado de entrada de consola, en el BIOS, 58 

Problemas con programas que “tragan” caracteres, 236 

Uso de entrada forzada, 237 





a cero de disco, 106 








CONTROLE 
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Errores generados, 322 
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Usado para indicar final de fichero, 123 

Usado para terminar antes del cerrado de fichero (Close 
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Ejemplo de escritura aleatoria, 149 
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Caracteres de contr 
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Usado para cargar el CP/M, 14 


Cerrado de fichero: 
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Utilización de lectora/perforadora (auxiliares), 166 
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Función 22 del BDOS, 124 





Ci_eode: 
Tabla de códigos, retorno de código, Programa, 413, 
Explicación, 438 








Programa, 413, Explicación, 438 


Ct_index: 

Tabla de códigos, retorno de índice, Programa, 414; 
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CUnit: 
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Explicación, 437 

Cúpares 
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Programa, 412, Explicación, 437 


Ctostre: 
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Programa, 414, Explicación, 438 
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Si no se utiliza ninguna unidad de perforación, 87 


D | 
DATE: 
Programa C, fija la fecha, 473 


DDT: 

Herramienta de depuración dinámica, 201, 353 

Manual, 8 

Orden I usada para construir un nuevo sistema CP/M, 
212 

Orden R usada para construir un nuevo sistema CP/M, 
212 

Usado para controlar imágenes del CP/M, 221 

Usado para crear la imagen en memoria del CP/M, 207 

Usado para depuración de controladores de caracteres, 
379 

Usado para depurar controladores de disco, 391 


DESPOOL: 
Uso de entrada LISTST del BIOS, 171 


DIR: 
Visualización del directorio de ficheros, 59 
Dirección de DMA por defecto, 131 





DO: 
Sugerencias para programas de utilidad, 480 
DPB: 

(Véase Bloque de parámetros de disco) 
DPH: 


(Véase Cabeza de parámetros de disco) 


DTR: 
PROTOCOL, programa C para fijar protocolos, 465 
(Véase también Terminal de datos dispuesto) 


Densidad simple, una sola cara: 
Formato del disquete, 11 


Depuración básica para un BIOS: 342 
Depurando un nuevo sistema CP/M, 341 


Desbordamiento de la memoria: 
Depuración del controlador de caracteres, 384 


Desplazamiento de blog! 
En bloque de parámetros del disco, 39 
Desplazamiento de pistas: 

(Véase Pistas antes del directorio) 


Desplazamiento relativo de página: 
Uso para hacer llamadas directas al BIOS, 75 


Desplazamiento de sectores: 

En la cabeza de parámetros del disco, 34 
Efecto en prestaciones, 36 

Para la imagen CP/M en el disco, 206 


Desplazamiento de sectores (Shewing): 
(Véase Entrelazamiento de sectores) 


Digital Research: 
Manuales, $ 


Directivas IF/ENDIF: 
Utilizado para subrutinas de depuración, 346 


Directorio de ficheros: 

“Acceso directamente a las entradas, 428 

Acceso, funciones C, 429 

Acceso, por medio del BDOS £: funciones C, 438 

Bits de estado (atributo), 31 

Borrado de ficheros, ERA, 60 

Comparación de nombres, funciones C, 430 

Concepto, 21 

Detalles, 22 

Estructura de entrada, 27 

Extensión de fichero, 32 

Mapa del disco, 32 

Nombre y tipo de fichero en entrada, 33 

Número de entradas-1, en bloque de parámetros de 
disco, 42 

Número de pistas antes, 43 

Número de registro, 32 

“Número de usuario a la entrada, 27 

Proceso, funciones C, 431 

Visualización de contenidos, 59 





Directorio de lectura/escritura: 
Rw_dir, Programa, 408, Explicación, 429 


Directorio de sectores de repuest 
Depuración de controladores de disco, 394 


Disco por defecto: 
Cambio, 59 

En indicación del CCP, 54 
En página base, 69 
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Disco duro: 
Consideraciones especiales, 43 
División en varios lógicos, 46 


Disco de lectura/escritura: 

Llamadas directas al BIOS desde C, 428 

Disco lógico: 

División del disco rigido en varios discos lógicos, 46 

Cómo se representa en el bloque de control de fichero, 
50 

Selección, 108 

Disco lógico en curso: 

En página base, 69 


Disco lleno: 

Error devuelto desde escritura secuencial, 124 
Disco Mi: 

Usando memoria como un disco ultrarrápido, 252 
Disco RAM: 


Usando memoria como disco ultrarrápido, 252 

Discos de sólo lectura: 132 

Dispositivos lógicos: 

CON, 1.ST:, AUX:, RDR:, PUN:, 66 

Disquete: 

Distribución del disquete estándar CP/M, 45 

Disquetes editado 

Ficheros de Digital Research, 8 

Distribución del disco: 

El CP/M en los disquetes, 206 

Distribución de la memoria: 

Con CP/M cargado, 16 

Por ejemplo BIOS, 207 

Para entrada a SYSGEN, 204 

Dm_clr: 

Borrado de mapa de disco, Programa, 410, Explica 
433 

Dm_disp: 

Visualización de mapa de disco, Programa, 410, 
Explicación, 433 


E 

Ed: 

Editor, manual, 8 

ERA: 

Anulación (borrado) de ficheros, 60 


ERASE: 
Programa C, un medio más adecuado para borrar 
ficheros, 440 


Edición de línea de orden: 
Por el CCP, 55 


Edición de líneas: 
Usando lectura de cadenas de consola, 101-102 
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Ejemplo de programa base de comprobación, 390 
TIME, programa C para fijar la hora, 475 


Ejemplos de programas: 

Ordenación de disquete, 4 

Elección de tamaño de bloques: 22 

Encuentro (Find): 

Programa C, encuentra ficheros perdidos, 447 
Enrollamiento de compensador: 

Depuración del controlador de caracteres, 386 
Enteros cortos: 

Cambio menor del lenguaje C, 423 

Entrada de directorio: 110 

Definición en LIBRARY.H, 422 


Entrada en disco; 
Usando el sistema de puesta a cero del disco del BDOS, 
106-107 





Entrada forzada: 
Conceptos, 237 

Depuración del controlador de caracteres, 386 
Sugerencia para programas de utilidad, 479 
Entrada de lectora con pregunta por carácter: 
Problemas y soluciones, 85-86 





Entrada/salida: 
Entrada/salida ficticia con propósitos de depuración, 351 


Entrada/salida de caracteres: 
En el BIOS, 165 
Interrupciones para entrada, 2 
Manejo práctico de errores, 
Mejoras, 228-230 


Entrada/salida de disco: 
En el BIOS, 167 
Mejoras, 251 


Entrada/salida lógi 
Como la permite el BIOS, 18 











Entrelazamiento: 
(Véase Desplazamiento de sectores) 





Entrelazamiento de sector: 

(Véase Desplazamiento de sectores) 

Err—dír 

Visualización de error del 
Explicación, 429 








ectorio, Programa, 409, 


Error de construcción: 
Entrada/salida de cara 


Error de desbordamiento: 
Entrada/salida de caracteres, manejo, 323 


Error de paridad: 
Entrada/salida de caracteres, manejo, 323 





eres, manejo, 323 


Error de tiempo excedido en impresora: 
Manejo, 323 





Errores: 
Ejemplo de rutina de error de impresora, 324 
Hardware, análisis, 319 

Hardware, corrección, 321 

Hardware, estrategia de detección, 318 

Hardware, indicación, 319 

Manejo de los errores de disco, 326 

Manejo práctico de entrada/salida de caracteres, 322 
Mensajes de error de disco mejorados, 335 
Procesamiento errores hardware, 317 


Errores del BDOS: 
R/O, 133 

Sector dañado, 108, 170 
Selección, 108, 168 


Errores de disco: 
Estrategia, 326 











Errores del dispositivo de listado: 
Problemas con la función 5 del BDOS, 7, $9 


Errores de hardware: 

Procesamiento de, 317, Capítulo, 9 
Errores de impresora: 

Ejemplo de rutina, 324 

Uso del temporizador-centinela, 242 





Escritura aleatoria: 
Usando escritura secuencial, 124 





Escritura aleatoria con rellenado de ceros: 
Función 40 del BDOS, 158 
Escritura 34 del BDOS, 147 


Escritura de un byte en la consola: 
Función 2 del BDOS, 83 


Escritura de byte por dispositivo de listado: 
Función $ del BDOS, 88 


Escritura de byte por perforadora: 
Función 4 del BDOS, 86 


Escritura sobre el CCP: 
Para ganar memoria, 57 


Escritura diferida: 
En conjunción con memoria intermedia de pista, 251 


Escritura de disco (por medio del BIOS): 
Wri—disk, Programa, 405, Explicación, 430 





Escritura secuencis 
Función 21 del BDOS, 122 


Estado del archivo: 
En entrada de directorio de ficheros, 31 


Estado de consol 
Depuración de controlador de caracteres, 387 





Estructura: 
Del CP/M, 7 


Estructura de fichero COM: 211 
Estructura de fichero HEX: 211 











Etx/Acks 





Depuración de controladores de caracteres, 384, 388-389 
Explicación de protocolo, 236-237 

Protocolo, programa C para fijar protocolos, 465 
Examen de cadena: 

Strsen, 400 

Examen de cadena de mayúsculas: 

Ustrsen, 400 


Expansión de tab: 
Soportada por escritura de byte de consola, 84 
Usando visualización de cadena terminada en S, 99 





Extes 

En entrada de directorio de ficheros, 32 

De ficheros, conceptos, 22 

Extensión de fichero: 

Apertura de extensión 0 para entrada/salida aleatoria, 
146-148 

Conceptos, 22 

En entrada de directorio de ficheros, 32 


Manipulación para realizar entrada/salida aleatoria, 122- 
14 


F 


FCB: 

FCB por defecto en página base, 70 

(Véase también Bloque de control de fichero) 

FDOS: 

Término raramente usado para BDOS/CCP combinados 


FUNKEY: 
Programa C, fija las teclas-función, 476 


Fecha: 
Lectura de la fecha desde el controlador de consola, 241 
Mantenimiento de la fecha actual en el BIOS, 243 


Ficheros: 
Creación, secuencia de operaciones, 25-26 
Visualización de directorio, DIR, 59 


Ficheros aleatorios: 

Conceptos, 52 

Creación de un fichero vacío, 158 
Problema de ficheros dispersos, 52 
Tamaño virtual, 156 


Ficheros borrados: 
Recuperación, 32 


Ficheros cambiados: 

Bit de estado de fichero en entrada del directorio de 
ficheros, 32 

Ficheros COM: 

Cargados por el CCP, 54 

Ficheros distribuidor al azar: 

Problema, 52 
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Ficheros de sólo lectura: 
Bit de atributos, 134 


Ficheros secuenciales: 
Conceptos, 51 


Ficheros sistema: 

Bit de atributo, 134 

Bit de estado de fichero en la entrada del directorio de 
ficheros, 31 

No visualizado por DIR, 59 


Ficheros públicos 
Piezas para crear éstos. posibilidad. 
Sugerencia para programas de utilidad, 479 
Fijación de atributos de fichero: 

Función 30 del BDOS, 36, 134 

Fijación de bloque de control de búsqueda: 
Setscb, Programa, 409, Explicación, 431 








Fijación de la dirección DMA (lectura/escritura): Ñi 

Función 26 del BDOS, 131 

Necesario para búsqueda del primer nombre coincidente, 
115 


Fijación de disco lógico a sólo 
BDOS, 132 


Fijación del IOBYTE: 
Función $ del BDOS, 96 





Fijación del número de registro aleatorio: 
Función 36 del BDOS, 156 


Fijación/obtención del número de usuario: 
Función 32 del BDOS, 144 

Fijación de parámetros de disco para rd/wrt_disk: 
Set_disk, Programa, 406, Explicación, 429 


Filecopy: 
Sugerencia para programas de utilidad, 457 


Final de fichero: 
Detección usando lectura secuencial, 123 


Final de línea físico: 
CONTROLE, $5 


Formato de disquete: 
Conceptos, 11 


Funciones BDOS: 

0, Puesta a cero del sistema, 81 

1, Lectura de un byte de la consola, 82 

2, Escritura de un byte en la consola, 83 

3, Lectura de byte de lectora, 84 

4, Escritura de byte por perforadora, 86 

5, Escritura de byte por dispositivo de listado, 88 
6, EJS directa de la consola, 89 

7. Obtención del montaje IOBYTE, 95 

8, Fijación del IOBYTE, 96 

9. Visualización de cadena terminada en $, 99 
10, Lectura de cadena de la consola, 101 

11, Lectura de estado de la consola, 104 

12, Obrención del número de versión de CP/M, 105 
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13, Puesta a cero del sistema de disco, 106 

14, Selección del disco lógico, 108 

15, Apertura de fichero, 109 

16, Cerrado de fichero, 113 

17, Búsqueda del primer nombre que corresponda, 114 

18, Búsqueda del siguiente nombre que corresponda, 118 

19, Borrado de fichero, 120 

20, Lectura secuencial, 121 

21, Escritura secuencial, 122 

22, Creación de un fichero, 124 

23, Cambio de nombre de un fichero, 127 

24, Obtención discos activos, 129 

25, Obtención del disco actual por defecto, 130 

26, Fijación de la dirección DMA, 131 

27, Obtención del vector de situación, 132 

28, Situación del disco, lógico en modo de sólo lectura, 
132 

29, Obtención de los discos en estado de sólo lectura, 133 

30, Fijación de atributos de fichero, 134 

31, Obtención de la dirección del bloque de parámetros 
de disco, 138 

32, Fijación/obtención del número de usuario, 144 

33, Lectura aleatoria, 145 

34, Escritura aleatoria, 147 

35, Obtención del tamaño de fichero, 155 

36, Fijación del múmero de registro aleatorio, 156 

37, Puesta a cero del controlador de disco lógico, 157 

40, Escritura aleatoría con rellenado de ceros, 158 


G 


GETC: 

Ejemplo de lectura secuencial, 122 

GETDPB: 

Ejemplo de obtención de dirección de bloque de 
parámetros de disco, 139 

GFA: 

Ejemplo de obtención de atributos de fichero, 135 

GNFC: 

Ejemplo de búsqueda primer caso, caso síguiente, 115 

Get_eba: 

Obtención de dirección del bloque de configuración, 400 

Get_dpb: 

Obtención de dirección del bloque de parámetros, 
Programa, 411 

Get_nde: 

Obtención de la próxima entrada del directorio, 
Programa, 406, Explicación, 429 

Get_afa: 

Obtención del próximo nombre de fichero, Programa, 
404, Explicación, 439 
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HOME: 
Inicialización de cabezas de disco, en el BIOS, 168 





LL 


HSTBUF: 
En el BIOS, 167 


Heath/Zenith: 
Versión especial del CP/M, 65 


TOBYTE: 

Equivalencias para campos de bits, 96 

Estructura, 66 

Uso con entrada/salida directa de consola para 
comunicaciones, 91 

Uso para examinar línea de comunicación, 86 





Imagen de memoria: 
Comprobación de un sistema nuevo, 221 
De un nuevo sistema CP/M, 202 


Impresoras paralelo: 
Procesamiento de errores, 324 


Indicación: 
Desde el CCP, 54 


Inicialización de subrutinas de depuración: 346 


Interacciones: 
Entre CCP, BDOS y BIOS, 19 


Interrupciones: 

Arquitectura, 233 

Depuración de las rutinas de servicio, 352 

Memorias intermedias circulares, 235 

Procesamiento de exceso de datos en la memoria 
intermedia, 237 

Uso para controladores de entrada de caracteres, 232 


J 


Johnson-Laird Inc: 
Pedidos de disquetes, $ 


L 


LIBRARY.C: 
Biblioteca de funciones de utilidad, 400 


LIBRARY. H: 

Cabeza para funciones de LIBRARY.C, 418 

LIST: 

Salida de listado, en el BIOS, 166 

LISTST: 

Estado de salida de dispositivo de listado, en el BIOS, 
m7 

LST: 

Dispositivo lógico de listado, 66 

Lectura aleatoria: 

Función 33 del BDOS, 145 


Lectura aleatoria: 
Usando lectura secuencial, 123 








Lectura de un byte de la consola: 
Función | del BDOS, 82 


Lectura de byte de lectora: 
Función 3 del BDOS, 84 


Lectura de cadena de la consola: 
Función 10 del BDOS, 101 


Lectura de disco (por medio del BIOS): 
Rd_disk, Programa, 405, Explicación, 429 


Lectura de estado de la consola: 
Función 11 del BDOS, 104 


Lectura secuencial: 

Función 20 del BDOS, 121 

Lenguaje C: 

Manuales de referencia, 4 

Utilización para programas de utilidad, 399 
Letras minúsculas en nombre de fichero: 126 
Línea de orden: 

Borrado del último carácter mecanografíado, 57 
Eliminación, CONTROL, 57 

Repetición, CONTROLA, 57 


Línea de orden Undo: 
CONTROL, 57 


Lista de control de depuración: 

Controladores de disco, 391 

Reloj de tiempo real, 389 

Rutinas de servicio de interrupción, 385 
Rutinas de servicio de no interrupción, 385 
Salida de caracteres, 388 

Loadsys: 

Sugerencias para programas de utilidad, 479 
Longitudes de registro variables: 
Procesamiento en ficheros aleatorios, 147, 148 


LL 


Llamadas directas al BIOS: 
Cuando hay que evitarlas, 18 
Ejemplo de programa, 171 
Ejemplos, 76 


M 


MAC: 

Macroensamblador, 201 

MAKE: 

Programa C, hace ficheros visibles/invisibles, 458 

BO: 

Macroensamblador, 201 

MOVCPM: 

En conjunción con piezas del CP/M, 254 

Reubicación del CCP y el BIOS, 219 

Uso en la construcción de un nuevo sistema CP/M, 198 
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MOVE: 

Programa C, traslada ficheros entre números de usuario, 
454 

MSGOUT: 

Ejemplo de escritura de byte consola, $4 

MSGOUTE: 

Ejemplo de escritura de byte consola, 85 

Manejo de sectores dañados: 327 

En el BIOS, 169 

Sugerencia para programas de utilidad, 457, 479 


Manuales: 

De Digital Rescarch, 8 

Mapa de bits: 

(Véase Vector de situación) 

Mapa de disco: 

En entrada de directorio de ficheros, 32 


Mapa de disco: 
Cómo se usa en las funciones C, 432 


Máscara de blog 
En bloque de parámetros del disco, 39 
Máscara de extensión: 

En bloque de parámetros del disco, 39 
Mecanografiado en avance (Type-ahead): 
Conceptos, 234 


Procesamiento de desbordamiento de memoria 
intermedia, 237 





Memoria: 

Encuentro del tamaño del área disponible para 
programas, 75 

Usada como un disco ultrarrápido, 252 

Uso de memoria “desconocida” para memoria 
intermedia, 234 

Visualización en subrutinas de desinsectación, 347 


Memoria intermedia circular: 

Para entrada de control de interrupciones, 234 
Estructura de la tabla de dispositivos, 245 
Memoria intermedia de disco: 
En cabeza de parámetros de disco, 38 
Memoria intermedia de DMA: 

Por defecto, en página base, 70 
Memoria intermedia de DMA por defect 
En página base, 70 

Memoria intermedia de fujo: 

“Antes de cerrado de fichero (Close File) del BDOS, 113 


Memoria intermedia grande (host buffer): 
En el BIOS, 167 

Mensajes: 

Como ayuda a depuración, 350 


Mensajes de error: 
Depuración de controladores de disco, 395, Capitulo, 12 
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Nombre/tipo de fichero: 
En entrada de directorio de fichero, 28 


Nombres de fichero ambiguos: 

Conceptos y restricciones, 29 

Ejemplo de procesamiento, 430 

Evitar el cambio de nombre de fichero, 127 

Sugerencia para programas de utilidad, 457 

Utilizado en apertura de ficheros BDOS, 110 

Utilizado en búsqueda del primer nombre coincidente, 
114 

Utilizado en DIR, 59 

Utilizado en ERA, 60 


Notación: 
Por ejemplo diálogo de consola, 3 

Nuevo nombre de un fichero: 

REN, 61 

Número de entradas al directorio de ficheros: 
En el bloque de parámetros del disco, 42 


Número máximo de bloque: 
En el bloque de parámetros del disco, 41 





Número de regis! 

En la entrada del directorio de ficheros, 32 

Manipulación para terminar la entrada/salida aleatoria, 
123, 124 


Número de registro aleato: 
En el ECB, fijado para escritura aleatoria, 146 
En el FCB, fijado para lectura aleatoria, 146 





Número de registro en curso: 

En FCB, invariable para escritura aleatoria, 146 

En FCB, invariable para lectura aleatoria, 146 

Número de usuario: 

Cambio bajo control de programa, 144 

Cambio usando USER, 62 

En la entrada del directorio de ficheros, 27 

Modificación para hacerlo aparecer en la indicación del 
Ccp, 255 

En la página base, 69 

Sugerencia para programas de utilidad, 457 

Visualización, 63 

Número de usuario en curso: 

En página base, 69 

Visualización, 63 


o 


OM: 
Ejemplo de visualización de cadena terminada en $, 100 


OPENF: 
Ejemplo de apertura de fichero, 111 


Obtención de la configuración del IOBYTE; 
Función 7 del BDOS, 95 


Obtención de dirección del bloque de configuración: 

Gei—cba, 400 

Obtención de la dirección del bloque de parámetros de 
disco: 

Función 31 del BDOS, 138 

Obtención de la dirección del bloque de parámetros de 
disco: 

Get—dpb, Programa, 411 





Obtención del disco actual por defecto: 
Función 25 del BDOS, 130 

Obtención de los discos en estado de sólo lectura: 
Función 29 del BDOS. 133 

Obtención del número de versión del CP/M: 
Función 12 del BDOS, 105 

Obtención de próxima entrada del directorio: 
Get—nde, Programa, 406, Explicación, 429 
Obtención de próximo nombre de fichero: 
Get_nín, Programa, 404, Explicación, 439 
Obtención del tamaño de fichero: 

Función 35 del BDOS, 155 

Obtención del vector de situación: 

Función 27 del BDOS, 132 


Open_—di 
Apertura de directorio, Programa, 406, Explicación, 429 








Ordenes incorporadas: 
En el CCP, 54 


Ordenes residentes del CCP: 17 


Organizaciones de fichero: 
Conceptos, 49 


P 
PIP: 
Usado para comprobar un BIOS nuevo, 397 


PROM fantasma (Shadow PROM): 
Usada para cargar el CP/M, 13 


PROTOCOL: 
Programa C, fija protocolos de línea serie, 465 
PU 
Perforadora lógica, 66 

PUNCH: 

Salida de perforación (auxiliar), en el BIOS, 166 
PUTC 
Ejemplo de escritura secuencial, 125 

PUTCPM: 

Ejemplo de programa, 208 

Escritura de una utilidad, 206 

Página base: 

Ejemplo de volcado de memoria, 71 

Fijación por el CCP para programa cargado, 64 
Número de usuario en curso, 69 




















Parámetros: 

Programa ejemplo para procesar parámetros de orden, 
73 

Personalización: 

De CP/M, vista general, 10 


Petición de envio: 
Explicación del protocolo RTS, 


Pista: 
Llenado con configuración conocida, 346 
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icio de interrupción 





Pistas antes del directori 
En el bloque de parámetros de disco, 43 
Posición 0000H: 

Uso para arranque caliente, 16 

Posición 0005H: 

Ejemplos sencillos de uso, 26 

Uso para llamadas a función del BDOS, 17 
Prestaciones: 

Efecto del desplazamiento de sectores, 35 
Principio de la RAM: 

Encontrar, por medio de página bas 








, TO 


Procesador de órdenes de consola: 
(Véase CCP) 

Programas C: 
ASSIGN, asignación de dispositivos lógicos a fisicos, 469 
DATE, fijación de la fecha, 473 

ERASE, un modo mejor de eliminar ficheros, 440 
FIND, encuentra ficheros perdidos, 447 

FUNKEY, fija teclas-función, 476 

MAKE, hace los ficheros visibles/invisibles, 458 

MOVE, traslada ficheros entre números de usuario, 454 
PROTOCOL, fija protocolos de linea seric, 465 

SPACE, muestra espacios del disco utilizados libres. 450 
SPEED, fija velocidad de transmisión (baud rate). 462 
TIME, fija la hora, 473 

UNERASE, recupera ficheros eliminados, 442 








Programa de depuración incorporado: 343 
Programas de utilidad: 399 


Protección de ficheros: 
Caracteres especiales en el nombre de fichero, 126 





Protección de ficheros: 

Sugerencia para programas de utilidad, 457 
Propietario: 

Sugerencia para programas de utilidad, 457 
Protegidofno protegido: 

Sugerencia para programas de utilidad. 457 
Protocolo: 

Definiciones en LIBRARY.H, 420 

Soporte en el BIOS mejorado, 236 

Soporte por medio de la tabla de dispositivos, 245 


Indice 537 


Xon/Xofl, usado por TYPE, 62 
(Véase también Terminal de datos preparado; Petición de 
envio; Xon/Xof!; Etx/Ack) 


Público/privado: 
Sugerencia para programas de utilidad, 479 





Puesta a cero: 
Señal usada para empezar a cargar el CP/M, 13 





Puesta a cero del controlador de disco lógico: 
Función 37 del BDOS, 157 
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En el bloque de parámetros de disco, 40 


Secuencias de escape: 

Entrada, depuración de controlador de caracteres, 387 
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